Edinburgh IMP77 Compiler - Version 8.4 1 %BEGIN .Ltext0: PRINTNAME.6388: .LFB186: .LVL136: subq $8, %rsp 2 %STRING(255)%FN PRINTNAME(%INTEGER N) .LVL0: movq %rdi, %rax call _imp_initialise@PLT .LVL137: movl $0, %edx movl $0, %esi movl $16, %edi call FAULT.6493 .LVL138: 3 %INTEGER V, K 4 %owninteger count=0 5 count=count+1 movl COUNT.6392(%rip), %ecx leal 1(%rcx), %edx movl %edx, COUNT.6392(%rip) 6 %if count=1 %then %result="JAMES" 7 %if count=2 %then %result="JIM" 8 %result="???" movb $0, (%rdi) 9 %END ret .L2: .L4: .LFE186: SWRITE.6450: .LFB188: ?K unused ?V unused ?N unused 10 11 %STRING(255)%FN MESSAGE(%INTEGER N) .LVL26: pushq %r15 pushq %r14 pushq %r13 pushq %r12 pushq %rbp pushq %rbx subq $4472, %rsp movq %rdi, %rbx movl %esi, %ebp movq %fs:40, %rax movq %rax, 4456(%rsp) xorl %eax, %eax 12 !*********************************************************************** 13 !* OUTPUTS AN ERROR MESSAGE STORED IN A COMPRESSED FORMAT * 14 !* 1 %REPEAT is not required * 15 !* 2 Label & has already been set in this block * 16 !* 4 & is not a Switch name at current textual level * 17 !* 5 Switch name & in expression or assignment * 18 !* 6 Switch label &(#) set a second time * 19 !* 7 Name & has already been declared * 20 !* 8 Routine or fn & has more parameters than specified * 21 !* 9 Parameter # of & differs in type from specification * 22 !* 10 Routine or fn & has fewer parameters than specified * 23 !* 11 Label & referenced at line # has not been set * 24 !* 12 %CYCLE at line # has two control clauses * 25 !* 13 %REPEAT for %CYCLE at line # is missing * 26 !* 14 %END is not required * 27 !* 15 # %ENDs are missing * 28 !* 16 Name & has not been declared * 29 !* 17 Name & does not require parameters or subscripts * 30 !* 18 # too few parameters provided for & * 31 !* 19 # too many parameters provided for & * 32 !* 20 # too few subscripts provided for array & * 33 !* 21 # too many subscripts provided for array & * 34 !* 22 Actual parameter # of & conflicts with specification * 35 !* 23 Routine name & in an expression * 36 !* 24 Integer operator has Real operands * 37 !* 25 Real expression in integer context * 38 !* 26 # is not a valid %EVENT number * 39 !* 27 & is not a routine name * 40 !* 28 Routine or fn & has specification but no body * 41 !* 29 %FUNCTION name & not in expression * 42 !* 30 %RETURN outwith routine body * 43 !* 31 %RESULT outwith fn or map body * 44 !* 34 Too many textual levels * 45 !* 37 Array & has too many dimensions * 46 !* 38 Array & has upper bound # less than lower bound * 47 !* 39 Size of Array & is more than X'FFFFFF' bytes * 48 !* 40 Declaration is not at head of block * 49 !* 41 Constant cannot be evaluated at compile time * 50 !* 42 # is an invalid repetition factor * 51 !* 43 %CONSTANT name & not in expression * 52 !* 44 Invalid constant initialising & after # items * 53 !* 45 Array initialising items expected ## items given # * 54 !* 46 Invalid %EXTERNAL %EXTRINSIC or variable %SPEC * 55 !* 47 %ELSE already given at line # * 56 !* 48 %ELSE invalid after %ON %EVENT * 57 !* 49 Attempt to initialise %EXTRINSIC or %FORMAT & * 58 !* 50 Subscript of # is outwith the bounds of & * 59 !* 51 %FINISH is not required * 60 !* 52 %REPEAT instead of %FINISH for %START at line # * 61 !* 53 %FINISH for %START at line # is missing * 62 !* 54 %EXIT outwith %CYCLE %REPEAT body * 63 !* 55 %CONTINUE outwith %CYCLE %REPEAT body * 64 !* 56 %EXTERNALROUTINE & at wrong textual level * 65 !* 57 Executable statement found at textual level zero * 66 !* 58 Program among external routines * 67 !* 59 %FINISH instead of %REPEAT for %CYCLE at line # * 68 !* 61 Name & has already been used in this %FORMAT * 69 !* 62 & is not a %RECORD or %RECORD %FORMAT name * 70 !* 63 %RECORD length is greater than # bytes * 71 !* 64 Name & requires a subname in this context * 72 !* 65 Subname & is not in the %RECORD %FORMAT * 73 !* 66 Expression assigned to record & * 74 !* 67 Records && and & have different formats * 75 !* 69 Subname && is attached to & which is not of type %RECORD * 76 !* 70 String declaration has invalid max length of # * 77 !* 71 & is not a String variable * 78 !* 72 Arithmetic operator in a String expression * 79 !* 73 Arithmetic constant in a String expression * 80 !* 74 Resolution is not the correct format * 81 !* 75 String expression contains a sub expression * 82 !* 76 String variable & in arithmetic expression * 83 !* 77 String constant in arithmetic expression * 84 !* 78 String operator '.' in arithmetic expression * 85 !* 80 Pointer variable & compared with expression * 86 !* 81 Pointer variable & equivalenced to expression * 87 !* 82 & is not a pointer name * 88 !* 83 && and & are not equivalent in type * 89 !* 86 Global pointer && equivalenced to local & * 90 !* 87 %FORMAT name & use in expression * 91 !* 90 Untyped name & used in expression * 92 !* 91 %FOR control variable & not integer * 93 !* 92 %FOR clause has zero step * 94 !* 93 %FOR clause has noninteger number of traverses * 95 !* 95 Name & not valid in assembler * 96 !* 96 Operand # not valid in assembler * 97 !* 97 Assembler construction not valid * 98 !* 98 Addressability * 99 !* 99 Facility not supported by target hardware * 100 !* 101 Source line has too many continuations * 101 !* 102 Workfile of # Kbytes is too small * 102 !* 103 Dictionary completely full * 103 !* 104 Dictionary completely full * 104 !* 105 Too many textual levels * 105 !* 106 String constant too long * 106 !* 107 Compiler tables are completely full * 107 !* 108 Condition too complicated * 108 !* 109 Compiler inconsistent * 109 !* 110 Input ended * 110 !* 201 Long integers are inefficient as subscripts * 111 !* 202 Name & not used * 112 !* 203 Label & not used * 113 !* 204 Global %FOR control variable & * 114 !* 205 Name & not addressable * 115 !* 206 Semicolon in comment text * 116 !* 207 %CONSTANT variable & not initialised * 117 !* 208 Unsupported precision used - nearest available substituted * 118 !* 209 Target machine is word addressed? * 119 !* 210 Redundant %ALIAS provided * 120 !* 255 SEE IMP MANUAL * 121 !*********************************************************************** 122 %CONSTBYTEINTEGERARRAY OUTTT(0:63)='?','A','B','C','D','E','F','G', 123 'H','I','J','K','L','M','N', 124 'O','P','Q','R','S','T','U', 125 'V','W','X','Y','Z','&','-', 126 '/','''','(',')', 127 'a','b','c','d','e','f','g', 128 'h','i','j','k','l','m','n', 129 'o','p','q','r','s','t','u', 130 'v','w','x','y','z','.','%', 131 '#','?'(2) 132 %CONSTINTEGER WORDMAX= 780,DEFAULT= 776 133 %CONSTshortINTEGERARRAY WORD(0:WORDMAX)=0,%C leaq 1296(%rsp), %rdi .LVL27: leaq .LC0(%rip), %rsi .LVL28: movl $195, %ecx rep movsq movzwl (%rsi), %eax movw %ax, (%rdi) 134 1, 32769, 32771, 32772, 32773, 2, 32775, 32776, 135 32777, 32778, 32780, 32781, 32782, 32783, 32784, 4, 136 32776, 32771, 32772, 32785, 32786, 32788, 32789, 32790, 137 32792, 32794, 5, 32786, 32788, 32776, 32782, 32795, 138 32797, 32798, 6, 32786, 32800, 32801, 32781, 32785, 139 32802, 32804, 7, 32805, 32776, 32777, 32778, 32780, 140 32806, 8, 32808, 32797, 32810, 32776, 32777, 32811, 141 32812, 32814, 32815, 9, 32817, 32819, 32820, 32776, 142 32821, 32782, 32823, 32824, 32825, 10, 32808, 32797, 143 32810, 32776, 32777, 32828, 32812, 32814, 32815, 11, 144 32775, 32776, 32829, 32789, 32831, 32819, 32777, 32772, 145 32780, 32781, 12, 32832, 32789, 32831, 32819, 32777, 146 32834, 32835, 32837, 13, 32769, 32839, 32832, 32789, 147 32831, 32819, 32771, 32840, 14, 32842, 32771, 32772, 148 32773, 15, 32819, 32843, 32844, 32840, 16, 32805, 149 32776, 32777, 32772, 32780, 32806, 17, 32805, 32776, 150 32845, 32772, 32846, 32812, 32797, 32848, 18, 32819, 151 32850, 32851, 32812, 32852, 32839, 32776, 19, 32819, 152 32850, 32854, 32812, 32852, 32839, 32776, 20, 32819, 153 32850, 32851, 32848, 32852, 32839, 32855, 32776, 21, 154 32819, 32850, 32854, 32848, 32852, 32839, 32855, 32776, 155 22, 32856, 32858, 32819, 32820, 32776, 32860, 32862, 156 32825, 23, 32808, 32788, 32776, 32782, 32863, 32795, 157 24, 32864, 32866, 32777, 32868, 32869, 25, 32868, 158 32795, 32782, 32871, 32873, 26, 32819, 32771, 32772, 159 32785, 32875, 32876, 32878, 27, 32776, 32771, 32772, 160 32785, 32880, 32788, 28, 32808, 32797, 32810, 32776, 161 32777, 32825, 32882, 32883, 32884, 29, 32885, 32788, 162 32776, 32772, 32782, 32795, 30, 32887, 32889, 32880, 163 32884, 31, 32891, 32889, 32810, 32797, 32893, 32884, 164 34, 32894, 32854, 32792, 32895, 37, 32897, 32776, 165 32777, 32850, 32854, 32898, 38, 32897, 32776, 32777, 166 32900, 32901, 32819, 32902, 32814, 32903, 32901, 39, 167 32904, 32820, 32897, 32776, 32771, 32811, 32814, 32905, 168 32907, 40, 32908, 32771, 32772, 32789, 32911, 32820, 169 32784, 41, 32912, 32914, 32916, 32917, 32789, 32919, 170 32804, 42, 32819, 32771, 32863, 32921, 32923, 32925, 171 43, 32927, 32788, 32776, 32772, 32782, 32795, 44, 172 32929, 32931, 32933, 32776, 32936, 32819, 32937, 45, 173 32897, 32933, 32937, 32938, 32940, 32937, 32941, 32819, 174 46, 32929, 32942, 32944, 32797, 32946, 32948, 47, 175 32949, 32778, 32941, 32789, 32831, 32819, 48, 32949, 176 32921, 32936, 32950, 32876, 49, 32951, 32953, 32954, 177 32944, 32797, 32956, 32776, 50, 32958, 32820, 32819, 178 32771, 32889, 32960, 32961, 32820, 32776, 51, 32963, 179 32771, 32772, 32773, 52, 32769, 32965, 32820, 32963, 180 32839, 32967, 32789, 32831, 32819, 53, 32963, 32839, 181 32967, 32789, 32831, 32819, 32771, 32840, 54, 32969, 182 32889, 32832, 32769, 32884, 55, 32970, 32889, 32832, 183 32769, 32884, 56, 32972, 32776, 32789, 32976, 32792, 184 32794, 57, 32977, 32979, 32981, 32789, 32792, 32794, 185 32982, 58, 32983, 32985, 32986, 32988, 59, 32963, 186 32965, 32820, 32769, 32839, 32832, 32789, 32831, 32819, 187 61, 32805, 32776, 32777, 32778, 32780, 32990, 32782, 188 32783, 32956, 62, 32776, 32771, 32772, 32785, 32991, 189 32797, 32991, 32956, 32788, 63, 32991, 32993, 32771, 190 32995, 32814, 32819, 32907, 64, 32805, 32776, 32997, 191 32785, 32999, 32782, 32783, 32873, 65, 33001, 32776, 192 32771, 32772, 32782, 32960, 32991, 32956, 66, 33003, 193 33005, 32953, 33007, 32776, 67, 33009, 33011, 33012, 194 32776, 33013, 33014, 33016, 69, 33001, 33011, 32771, 195 33018, 32953, 32776, 33020, 32771, 32772, 32820, 32823, 196 32991, 70, 33021, 33023, 32777, 32921, 33026, 32993, 197 32820, 32819, 71, 32776, 32771, 32772, 32785, 33021, 198 32946, 72, 33027, 32866, 32782, 32785, 33021, 32795, 199 73, 33027, 32931, 32782, 32785, 33021, 32795, 74, 200 33029, 32771, 32772, 32960, 33031, 33033, 75, 33021, 201 32795, 33035, 32785, 33037, 32795, 76, 33021, 32946, 202 32776, 32782, 33038, 32795, 77, 33021, 32931, 32782, 203 33038, 32795, 78, 33021, 32866, 33040, 32782, 33038, 204 32795, 80, 33041, 32946, 32776, 33043, 32862, 32795, 205 81, 33041, 32946, 32776, 33045, 32953, 32795, 82, 206 32776, 32771, 32772, 32785, 33048, 32788, 83, 33011, 207 33012, 32776, 32844, 32772, 33050, 32782, 32823, 86, 208 33052, 33048, 33011, 33045, 32953, 33054, 32776, 87, 209 32956, 32788, 32776, 33055, 32782, 32795, 90, 33056, 210 32788, 32776, 32990, 32782, 32795, 91, 33058, 32835, 211 32946, 32776, 32772, 32871, 92, 33058, 33059, 32777, 212 32982, 33061, 93, 33058, 33059, 32777, 33062, 32878, 213 32820, 33064, 90, 33056, 32788, 32776, 32990, 33066, 214 32946, 95, 32805, 32776, 32772, 32875, 32782, 33067, 215 96, 33069, 32819, 32772, 32875, 32782, 33067, 97, 216 33071, 33073, 32772, 32875, 98, 33076, 99, 33079, 217 32772, 33081, 33083, 33084, 33086, 101, 33088, 32831, 218 32777, 32850, 32854, 33090, 102, 33093, 32820, 32819, 219 33095, 32771, 32850, 33097, 103, 33098, 33100, 33102, 220 104, 33098, 33100, 33102, 105, 32894, 32854, 32792, 221 32895, 106, 33021, 32931, 32850, 33103, 107, 33104, 222 33106, 32844, 33100, 33102, 108, 33108, 32850, 33110, 223 109, 33104, 33113, 110, 33116, 33117, 201, 33118, 224 33119, 32844, 33121, 33066, 32848, 202, 32805, 32776, 225 32772, 32990, 203, 32775, 32776, 32772, 32990, 204, 226 33052, 33058, 32835, 32946, 32776, 205, 32805, 32776, 227 32772, 33124, 206, 33127, 32782, 33129, 33131, 207, 228 32927, 32946, 32776, 32772, 33132, 208, 33135, 33138, 229 32990, 33140, 33141, 33143, 33145, 209, 33148, 33150, 230 32771, 33152, 33153, 210, 33155, 33157, 32852, 255, 231 33159, 33160, 33161, 0 232 %CONSTINTEGERARRAY LETT(0: 394)=0,%C leaq 2864(%rsp), %rdi leaq .LC1(%rip), %rsi movl $197, %ecx rep movsq movl (%rsi), %eax movl %eax, (%rdi) .LVL29: 233 X'7890A80B',X'02A00000',X'53980000',X'5D7E8000', 234 X'652E3AD3',X'652C8000',X'190C52D8',X'36000000', 235 X'510E6000',X'436652C3',X'49C80000',X'452CB700', 236 X'672E8000',X'53700000',X'69453980',X'4565F1D6', 237 X'42000000',X'27BD3A47',X'50000000',X'5D0DB280', 238 X'43A00000',X'47AE594B',X'5DA00000',X'692F1A6B', 239 X'43600000',X'592ED2D8',X'4BC6194B',X'679D37DC', 240 X'5F900000',X'439E74CF',X'5D6CB768',X'590C52D8', 241 X'36FFB000',X'672C77DD',X'48000000',X'694DB280', 242 X'1D0DB280',X'492C7643',X'652C8000',X'257EBA53', 243 X'5D280000',X'4D700000',X'5B7E5280',X'610E50DB', 244 X'4BA4B966',X'69443700',X'6784B1D3',X'4D4CB200', 245 X'210E50DB',X'4BA4B900',X'7A000000',X'5F300000', 246 X'494CD34B',X'65980000',X'69CE1280',X'4D95F680', 247 X'6784B1D3',X'4D4C70E9',X'537DC000',X'4D2EF2E4', 248 X'652CD2E5',X'4B7472C8',X'594DD280',X'781B2199', 249 X'0A000000',X'69BDE000',X'477DDA65',X'5F600000', 250 X'47643AE7',X'4B980000',X'4D7E4000',X'5B4E79D3', 251 X'5D380000',X'7829C200',X'7829C266',X'4394A000', 252 X'497CB980',X'652E3AD3',X'65280000',X'67AC59C7', 253 X'654E1A66',X'697DE000',X'4D2EE000',X'6195FB53', 254 X'492C8000',X'5B0DDC80',X'439650F2',X'031E9AC3', 255 X'58000000',X'610E50DB',X'4BA4B900',X'477DD359', 256 X'531E9980',X'6F4E9400',X'43700000',X'137692CF', 257 X'4B900000',X'5F84B943',X'697E4000',X'252C3600', 258 X'5F84B943',X'5D266000',X'537692CF',X'4B900000', 259 X'477DDA4B',X'71A00000',X'6D0D94C8',X'782AC29D', 260 X'28000000',X'5DADB14B',X'64000000',X'657EBA53', 261 X'5D280000',X'45AE8000',X'5D780000',X'457C9C80', 262 X'7832A707',X'2849E700',X'7890AA2B',X'24700000', 263 X'5FAE9BD3',X'69400000',X'7890A9AB',X'18A00000', 264 X'5B0E0000',X'297DE000',X'592ED2D9',X'66000000', 265 X'039650F2',X'494DB2DD',X'674DF766',X'6B8612E4', 266 X'457EB748',X'592E7980',X'597EF2E4',X'274F5280', 267 X'30F0C30D',X'0C30CF00',X'45CE92E6',X'092C7643', 268 X'650E94DF',X'5C000000',X'512C3200',X'077DD9E9', 269 X'43768000',X'470DD75F',X'68000000',X'45280000', 270 X'4BB4366B',X'43A4B200',X'477DB853',X'59280000', 271 X'5376D0D9',X'53200000',X'652E12E9',X'53A537DC', 272 X'4D0C7A5F',X'64000000',X'7819E727',X'2809CA00', 273 X'1376D0D9',X'53200000',X'477DD9E9',X'43768000', 274 X'53753A53',X'436539D3',X'5D380000',X'433692E4', 275 X'53A4B6E6',X'4BC612C7',X'692C8000',X'7BE80000', 276 X'4F4ED2DC',X'782B0A0B',X'24702600',X'782B0A25', 277 X'12726486',X'6D0E54C3',X'4564A000',X'789A0286', 278 X'7829898A',X'7879C000',X'03A692DB',X'61A00000', 279 X'69780000',X'53753A53',X'436539CA',X'7831E91B', 280 X'02A00000',X'27AC59C7',X'654E1A00',X'6944A000', 281 X'457EB749',X'66000000',X'78312713',X'26400000', 282 X'53767A4B',X'43200000',X'789A80A5',X'28000000', 283 X'782B04A8',X'7819E729',X'1272A280',X'782B0A0B', 284 X'24702625',X'1EAA849D',X'0A000000',X'6F95F74E', 285 X'0BC4B1EB',X'690C564A',X'67A43A4B',X'5B2DDA00', 286 X'4D7EB748',X'752E5780',X'2195F3E5',X'43680000', 287 X'436DF74E',X'4BC692E5',X'5D0D8000',X'657EBA53', 288 X'5D2E6000',X'6B9CB200',X'7890A19F',X'24200000', 289 X'592DD3E9',X'50000000',X'4F94B0E9',X'4B900000', 290 X'652E3AD3',X'652E6000',X'67AC5743',X'5B280000', 291 X'27AC5743',X'5B280000',X'0BC6194B',X'679D37DC', 292 X'439E74CF',X'5D2C8000',X'652C77E5',X'48000000', 293 X'252C77E5',X'49980000',X'36D80000',X'43748000', 294 X'510ED280',X'494CD34B',X'652DDA00',X'4D7E56C3', 295 X'69980000',X'43A690C7',X'512C8000',X'6F4531D0', 296 X'27A654DD',X'4E000000',X'492C7643',X'650E94DF', 297 X'5C000000',X'5B0F0000',X'03953A51',X'5B2E94C6', 298 X'252E77D9',X'6BA537DC',X'477E594B',X'47A00000', 299 X'4D7E56C3',X'68000000',X'477DDA43',X'53766000', 300 X'67AC4000',X'43953A51',X'5B2E94C6',X'3DDBC000', 301 X'217D3769',X'4B900000',X'477DB843',X'652C8000', 302 X'4B8EB4ED',X'4364B747',X'4B200000',X'617D3769', 303 X'4B900000',X'4B8EB4ED',X'4364B768',X'0F65F143', 304 X'58000000',X'597C70D8',X'6B9CA000',X'2B769CE1', 305 X'4B200000',X'7831E900',X'47643AE7',X'4A000000', 306 X'67A4B800',X'5D7DD4DD',X'692CF2E4',X'69943B4B', 307 X'659CB980',X'43980000',X'439E72DB',X'4564B900', 308 X'1F84B943',X'5D200000',X'039E72DB',X'4564B900', 309 X'477DD9E9',X'65AC7A53',X'5F700000',X'0324994B', 310 X'679C3153',X'594E9C80',X'0D0C74D9',X'53A72000', 311 X'67AE185F',X'65A4B200',X'45C80000',X'690E53CB', 312 X'68000000',X'510E526F',X'4394A000',X'277EB947', 313 X'4A000000',X'477DDA53',X'5DAC3A53',X'5F766000', 314 X'2F7E55CD',X'5364A000',X'17173A4B',X'66000000', 315 X'676C3658',X'094C7A53',X'5F743972',X'477DB859', 316 X'4BA4B672',X'4DAD9600',X'597DD380',X'077DB853', 317 X'592E4000',X'690C564B',X'66000000',X'077DD253', 318 X'694DF700',X'477DB859',X'531C3A4B',X'48000000', 319 X'537477DD',X'674E7A4B',X'5DA00000',X'13761AE8', 320 X'4B7492C8',X'197DD380',X'537692CF',X'4B966000', 321 X'5374B34D',X'531D32DD',X'68000000',X'4324994B', 322 X'679C3159',X'4A000000',X'272DB4C7',X'5F65F700', 323 X'477DB6CB',X'5DA00000',X'692F1A00',X'53753A53', 324 X'436539CB',X'48000000',X'2B767AE1',X'617E5A4B', 325 X'48000000',X'6194B1D3',X'674DF700',X'38000000', 326 X'5D2C394B',X'67A00000',X'43B434D9',X'43159280', 327 X'67AC59E9',X'53A6BA4B',X'48000000',X'290E53CB', 328 X'68000000',X'5B0C7453',X'5D280000',X'6F7E5200', 329 X'4324994B',X'679CB27E',X'252C9ADD',X'490DDA00', 330 X'78098483',X'26000000',X'2628A000',X'126A0000', 331 X'1A09CA83',X'18000000' 332 %INTEGER I,J,K,M,Q,S 333 %STRING(70)OMESS 334 OMESS=" " 335 %CYCLE I=1,1,WORDMAX-1 336 ->FOUND %IF N=WORD(I) leaq 272(%rsp), %rsi leaq 16(%rsp), %rdi movl $70, %edx call _imp_strncpy@PLT .LVL30: .LBB132: movswl 1298(%rsp), %eax cmpl %eax, %ebp je .L28 movl $2, %edx leaq 1296(%rsp), %rcx .LVL31: .L19: .LDL2: .LDL3: movswl (%rcx,%rdx,2), %esi cmpl %ebp, %esi je .L20 addq $1, %rdx .LVL33: 337 %REPEAT 338 I=DEFAULT movl $776, %eax .L18: .LVL35: .L20: .LDL4: 339 FOUND: 340 J=1 cmpq $780, %rdx jne .L19 .LVL34: .LBE132: 341 %CYCLE movl %edx, %eax .LVL32: movl $1, %eax jmp .L20 .LVL39: .L24: .LBE136: 342 K=WORD(I+J) addl $1, %eax cltq movzwl 1296(%rsp,%rax,2), %r13d .LVL36: 343 %IF K&X'8000'=0 %THEN %EXIT testb $1, %r13b je .L21 .L22: 344 K=K&X'7FFF' andl $32767, %r13d .LVL37: .LDL5: .LDL6: .LBB133: .LBB134: 345 OMESS=OMESS." " %UNLESS J=1 346 {%UNTIL M&1=0} %CYCLE 347 M=LETT(K); S=25 movslq %r13d, %rax movl 2864(%rsp,%rax,4), %ebp .LVL47: 348 {%UNTIL S<0} %CYCLE movl $25, %ebx 349 Q=M>>S&63; movl %ebp, %eax movl %ebx, %ecx shrl %cl, %eax 350 %IF Q\=0 %THEN OMESS=OMESS.TOSTRING(OUTTT(Q)) testb $63, %al je .L24 .LVL42: .LBB137: .LBB135: 351 S=S-6 subl $6, %ebx .LVL40: 352 %REPEAT %UNTIL S<0 cmpl $-5, %ebx je .L32 .LVL41: .L23: 353 K=K+1 leaq 784(%rsp), %r15 leaq 16(%rsp), %r12 leaq 1040(%rsp), %rax movq %rax, 8(%rsp) jmp .L26 .LVL38: .L28: .LBE134: .LBE133: .LBB136: movq 8(%rsp), %rdx movq %r12, %rsi movq %r15, %rdi call _imp_join@PLT .LVL43: .LBE135: .LBE137: movl $70, %edx movq %r14, %rsi movq %r12, %rdi call _imp_strncpy@PLT .LVL44: jmp .L24 .LVL45: .L32: .L25: addl $1, %r13d .LVL46: .L26: leaq 528(%rsp), %r14 jmp .L23 .LVL48: .L21: 354 %REPEAT %UNTIL M&1=0 355 J=J+1 356 %REPEAT 357 %RESULT=OMESS movq 16(%rsp), %rax movq 24(%rsp), %rdx movq %rax, (%rbx) movq %rdx, 8(%rbx) movq 32(%rsp), %rax movq 40(%rsp), %rdx movq %rax, 16(%rbx) movq %rdx, 24(%rbx) movq 48(%rsp), %rax movq 56(%rsp), %rdx movq %rax, 32(%rbx) movq %rdx, 40(%rbx) movq 64(%rsp), %rax movq 72(%rsp), %rdx movq %rax, 48(%rbx) movq %rdx, 56(%rbx) movq 80(%rsp), %rax movq 88(%rsp), %rdx movq %rax, 64(%rbx) movq %rdx, 72(%rbx) movq 96(%rsp), %rax movq 104(%rsp), %rdx movq %rax, 80(%rbx) movq %rdx, 88(%rbx) movq 112(%rsp), %rax movq 120(%rsp), %rdx movq %rax, 96(%rbx) movq %rdx, 104(%rbx) movq 128(%rsp), %rax movq 136(%rsp), %rdx movq %rax, 112(%rbx) movq %rdx, 120(%rbx) movq 144(%rsp), %rax movq 152(%rsp), %rdx movq %rax, 128(%rbx) movq %rdx, 136(%rbx) movq 160(%rsp), %rax movq 168(%rsp), %rdx movq %rax, 144(%rbx) movq %rdx, 152(%rbx) movq 176(%rsp), %rax movq 184(%rsp), %rdx movq %rax, 160(%rbx) movq %rdx, 168(%rbx) movq 192(%rsp), %rax movq 200(%rsp), %rdx movq %rax, 176(%rbx) movq %rdx, 184(%rbx) movq 208(%rsp), %rax movq 216(%rsp), %rdx movq %rax, 192(%rbx) movq %rdx, 200(%rbx) movq 224(%rsp), %rax movq 232(%rsp), %rdx movq %rax, 208(%rbx) movq %rdx, 216(%rbx) movq 240(%rsp), %rax movq 248(%rsp), %rdx movq %rax, 224(%rbx) movq %rdx, 232(%rbx) movq 256(%rsp), %rax movq 264(%rsp), %rdx movq %rax, 240(%rbx) movq %rdx, 248(%rbx) 358 %END movq %rbx, %rax movq 4456(%rsp), %rdx xorq %fs:40, %rdx je .L27 .LVL49: call __stack_chk_fail@PLT .LVL50: .L27: addq $4472, %rsp popq %rbx popq %rbp .LVL51: popq %r12 popq %r13 .LVL52: popq %r14 popq %r15 ret .LFE187: WARN.6631: .LFB190: 359 %STRING(16)%FN SWRITE(%INTEGER VALUE, PLACES) .LVL1: pushq %r15 pushq %r14 pushq %r13 pushq %r12 pushq %rbp pushq %rbx subq $2856, %rsp movq %rdi, %r12 movl %esi, %ebp movq %fs:40, %rax movq %rax, 2840(%rsp) xorl %eax, %eax 360 %STRING (16) S 361 %STRING(1)SIGN 362 %INTEGER D0, D1, D2 363 PLACES=PLACES&15 andl $15, %edx .LVL2: movl %edx, 4(%rsp) .LVL3: 364 SIGN=" " 365 S="" 366 %IF VALUE<0 %THEN SIGN="-" %AND VALUE=-VALUE leaq 528(%rsp), %rsi .LVL4: leaq 272(%rsp), %rdi .LVL5: movl $1, %edx .LVL6: call _imp_strncpy@PLT .LVL7: testl %ebp, %ebp js .L15 .L6: .LBB122: .LBB123: 367 D0=VALUE leaq 784(%rsp), %rsi leaq 16(%rsp), %rdi movl $16, %edx call _imp_strncpy@PLT .LVL8: 368 %CYCLE 369 D1=D0//10 movl $1717986919, %edx movl %ebp, %eax imull %edx sarl $2, %edx sarl $31, %ebp .LVL10: movl %edx, %ebx subl %ebp, %ebx movl %ebx, %ebp .LVL11: .LBB125: .LBB124: movq %r13, %rdx movq %r14, %rsi movq %r15, %rdi call _imp_join@PLT .LVL12: .LBE124: .LBE125: movl $16, %edx movq 8(%rsp), %rsi movq %r13, %rdi call _imp_strncpy@PLT .LVL13: testl %ebx, %ebx jne .L7 .L8: .LBB126: .LBB127: leaq 1040(%rsp), %rsi leaq 272(%rsp), %rdi movl $1, %edx call _imp_strncpy@PLT .LVL22: 370 D2=D0-10*D1 371 S=TOSTRING(D2+'0').S 372 D0=D1 negl %ebp .LVL23: jmp .L6 .LVL24: .L16: 373 %REPEAT %UNTIL D0=0 leaq 2576(%rsp), %r15 leaq 16(%rsp), %r13 leaq 1552(%rsp), %r14 .LBE123: .LBE122: leaq 1296(%rsp), %rax movq %rax, 8(%rsp) .LVL9: .L7: 374 S=SIGN.S 375 S=" ".S %WHILE LENGTH(S)<=PLACES 376 %RESULT=S leaq 2576(%rsp), %rdi leaq 16(%rsp), %rbx .LVL14: leaq 272(%rsp), %rsi movq %rbx, %rdx call _imp_join@PLT .LVL15: .LBE127: .LBE126: leaq 1808(%rsp), %rsi movl $16, %edx movq %rbx, %rdi call _imp_strncpy@PLT .LVL16: movzbl 16(%rsp), %eax cmpl %eax, 4(%rsp) jl .L9 .LBB128: .LBB129: movzbl 16(%rsp), %eax cmpl 4(%rsp), %eax jle .L10 .L9: movq 16(%rsp), %rax movq 24(%rsp), %rdx movq %rax, (%r12) movq %rdx, 8(%r12) movq 32(%rsp), %rax movq 40(%rsp), %rdx movq %rax, 16(%r12) movq %rdx, 24(%r12) movq 48(%rsp), %rax movq 56(%rsp), %rdx movq %rax, 32(%r12) movq %rdx, 40(%r12) movq 64(%rsp), %rax movq 72(%rsp), %rdx movq %rax, 48(%r12) movq %rdx, 56(%r12) movq 80(%rsp), %rax movq 88(%rsp), %rdx movq %rax, 64(%r12) movq %rdx, 72(%r12) movq 96(%rsp), %rax movq 104(%rsp), %rdx movq %rax, 80(%r12) movq %rdx, 88(%r12) movq 112(%rsp), %rax movq 120(%rsp), %rdx movq %rax, 96(%r12) movq %rdx, 104(%r12) movq 128(%rsp), %rax movq 136(%rsp), %rdx movq %rax, 112(%r12) movq %rdx, 120(%r12) movq 144(%rsp), %rax movq 152(%rsp), %rdx movq %rax, 128(%r12) movq %rdx, 136(%r12) movq 160(%rsp), %rax movq 168(%rsp), %rdx movq %rax, 144(%r12) movq %rdx, 152(%r12) movq 176(%rsp), %rax movq 184(%rsp), %rdx movq %rax, 160(%r12) movq %rdx, 168(%r12) movq 192(%rsp), %rax movq 200(%rsp), %rdx movq %rax, 176(%r12) movq %rdx, 184(%r12) movq 208(%rsp), %rax movq 216(%rsp), %rdx movq %rax, 192(%r12) movq %rdx, 200(%r12) movq 224(%rsp), %rax movq 232(%rsp), %rdx movq %rax, 208(%r12) movq %rdx, 216(%r12) movq 240(%rsp), %rax movq 248(%rsp), %rdx movq %rax, 224(%r12) movq %rdx, 232(%r12) movq 256(%rsp), %rax movq 264(%rsp), %rdx movq %rax, 240(%r12) movq %rdx, 248(%r12) 377 %END movq %r12, %rax movq 2840(%rsp), %rcx xorq %fs:40, %rcx jne .L16 .LVL20: addq $2856, %rsp popq %rbx popq %rbp popq %r12 popq %r13 popq %r14 popq %r15 ret .LVL21: .L15: call __stack_chk_fail@PLT .LVL25: .LFE188: .section .rodata .align 32 .LC0: .align 32 .LC1: .long 0 .long 2022746123 .long 44040192 .long 1402470400 .long 1568571392 .long 1697528531 .long 1697415168 .long 420238040 .long 905969664 .long 1359896576 .long 1130779331 .long 1237843968 .long 1160558336 .long 1731100672 .long 1399848960 .long 1766144384 .long 1164308950 .long 1107296256 .long 666712647 .long 1342177280 .long 1561178752 .long 1134559232 .long 1202608459 .long 1570766848 .long 1764694635 .long 1130364928 .long 1496240856 .long 1271273803 .long 1738356700 .long 1603272704 .long 1134458063 .long 1567405928 .long 1493979864 .long 922726400 .long 1730967517 .long 1207959552 .long 1766699648 .long 487436928 .long 1227650627 .long 1697415168 .long 629062227 .long 1562902528 .long 1299185664 .long 1535005312 .long 1628328155 .long 1269086566 .long 1766078208 .long 1736749523 .long 1296871936 .long 554586331 .long 1269086464 .long 2046820352 .long 1596981248 .long 1229771595 .long 1704460288 .long 1775112832 .long 1301673600 .long 1736749523 .long 1296855273 .long 1400750080 .long 1294922468 .long 1697436389 .long 1265922760 .long 1498272384 .long 2015043993 .long 167772160 .long 1774051328 .long 1199430245 .long 1600126976 .long 1197751015 .long 1268252672 .long 1300119552 .long 1531869651 .long 1563951104 .long 2016002560 .long 2016002662 .long 1133813760 .long 1232910720 .long 1697528531 .long 1697120256 .long 1739348423 .long 1699617382 .long 1769857024 .long 1294917632 .long 1637219155 .long 1227653120 .long 1527635072 .long 1133924594 .long 52337347 .long 1476395008 .long 1628328155 .long 1269086464 .long 1199428441 .long 1394514304 .long 1867420672 .long 1131413504 .long 326537935 .long 1267728384 .long 1602533699 .long 1769881600 .long 623654400 .long 1602533699 .long 1562796032 .long 1400279759 .long 1267728384 .long 1199430219 .long 1906311168 .long 1829606600 .long 2016068253 .long 671088640 .long 1571664203 .long 1677721600 .long 1702804051 .long 1562902528 .long 1169063936 .long 1568145408 .long 1165794432 .long 2016585479 .long 675931904 .long 2022746667 .long 611319808 .long 1605278675 .long 1765801984 .long 2022746539 .long 413138944 .long 1527644160 .long 696115200 .long 1496240857 .long 1711276032 .long 60182770 .long 1229828829 .long 1733162854 .long 1803948772 .long 1165932360 .long 1496217984 .long 1501491940 .long 659509888 .long 821084941 .long 204525312 .long 1171165926 .long 153908803 .long 1695454431 .long 1543503872 .long 1361850880 .long 125688297 .long 1131839488 .long 1192089439 .long 1744830464 .long 1160249344 .long 1270101611 .long 1134866944 .long 1199421523 .long 1495793664 .long 1400295641 .long 1394606080 .long 1697518313 .long 1403336668 .long 1292663391 .long 1677721600 .long 2014963495 .long 671730176 .long 326553817 .long 1394606080 .long 1199430121 .long 1131839488 .long 1400191571 .long 1130707411 .long 1563951104 .long 1127650020 .long 1403303654 .long 1271272135 .long 1764524032 .long 2078801920 .long 1330565852 .long 2016086539 .long 611329536 .long 2016086565 .long 309486726 .long 1829655747 .long 1164222464 .long 2023359110 .long 2015988106 .long 2021244928 .long 61248219 .long 1637875712 .long 1769472000 .long 1400191571 .long 1130707402 .long 2016536859 .long 44040192 .long 665606599 .long 1699617280 .long 1766105088 .long 1165932361 .long 1711276032 .long 2016487187 .long 641728512 .long 1400273483 .long 1126170624 .long 2023391397 .long 671088640 .long 2016085160 .long 2014963497 .long 309502592 .long 2016086539 .long 611329573 .long 514491549 .long 167772160 .long 1872099150 .long 197439979 .long 1762416202 .long 1738816075 .long 1529731584 .long 1300150088 .long 1965971328 .long 563475429 .long 1130889216 .long 1131280206 .long 1271304933 .long 1561165824 .long 1702804051 .long 1563320320 .long 1805431296 .long 2022744479 .long 606076928 .long 1496175593 .long 1342177280 .long 1335144681 .long 1267728384 .long 1697528531 .long 1697538048 .long 1739347779 .long 1529348096 .long 665605955 .long 1529348096 .long 197531979 .long 1738356700 .long 1134458063 .long 1563197440 .long 1697413093 .long 1207959552 .long 623671269 .long 1234698240 .long 920125440 .long 1131708416 .long 1359925888 .long 1229771595 .long 1697503744 .long 1300125379 .long 1771569152 .long 1134989511 .long 1361870848 .long 1866805712 .long 665212125 .long 1308622848 .long 1227650627 .long 1695454431 .long 1543503872 .long 1527709696 .long 60111441 .long 1529779398 .long 623802329 .long 1805989852 .long 1199462731 .long 1201668096 .long 1300125379 .long 1744830464 .long 1199430211 .long 1400266752 .long 1739341824 .long 1133853265 .long 1529779398 .long 1037811712 .long 561854313 .long 1267728384 .long 1199421507 .long 1697415168 .long 1267643629 .long 1130673991 .long 1260388352 .long 1635596137 .long 1267728384 .long 1267643629 .long 1130674024 .long 258339139 .long 1476395008 .long 1501327576 .long 1805426688 .long 729193697 .long 1260388352 .long 2016536832 .long 1197751015 .long 1241513984 .long 1738848256 .long 1568527581 .long 1764553444 .long 1771322187 .long 1704769920 .long 1134034944 .long 1134457563 .long 1164228864 .long 528791875 .long 1562378240 .long 60715739 .long 1164228864 .long 1199430121 .long 1705802323 .long 1601175552 .long 52730187 .long 1738289491 .long 1498324096 .long 218920153 .long 1403461632 .long 1739462751 .long 1705292288 .long 1170735104 .long 1762546635 .long 1744830464 .long 1359893103 .long 1133813760 .long 662616391 .long 1241513984 .long 1199430227 .long 1571568211 .long 1601593344 .long 796808653 .long 1399103488 .long 387398219 .long 1711276032 .long 1735145048 .long 156006995 .long 1601452402 .long 1199421529 .long 1269085810 .long 1303221760 .long 1501418368 .long 125679699 .long 1496203264 .long 1762416203 .long 1711276032 .long 125686355 .long 1766717184 .long 1199421529 .long 1394358859 .long 1207959552 .long 1400141789 .long 1733196363 .long 1570766848 .long 326507240 .long 1265930952 .long 427676544 .long 1400279759 .long 1268146176 .long 1400157005 .long 1394422493 .long 1744830464 .long 1126472011 .long 1738289497 .long 1241513984 .long 657306823 .long 1600517888 .long 1199421131 .long 1570766848 .long 1764694528 .long 1400191571 .long 1130707403 .long 1207959552 .long 729184993 .long 1635670603 .long 1207959552 .long 1637134803 .long 1733162752 .long 939524096 .long 1563179339 .long 1738539008 .long 1135883481 .long 1125487232 .long 1739348457 .long 1403435595 .long 1207959552 .long 688804811 .long 1744830464 .long 1527542867 .long 1562902528 .long 1870549504 .long 1126472011 .long 1738322558 .long 623680221 .long 1225644544 .long 2013889667 .long 637534208 .long 640196608 .long 308936704 .long 436849283 .long 402653184 MESSAGE.6402: .LFB187: 378 %ROUTINE FAULT(%INTEGER N, DATA, IDENT) .LVL73: pushq %r15 pushq %r14 pushq %r13 pushq %r12 pushq %rbp pushq %rbx subq $12072, %rsp movl %edi, %r12d movl %esi, %r15d movl %edx, 12(%rsp) movq %fs:40, %rax movq %rax, 12056(%rsp) xorl %eax, %eax .LVL74: 379 !*********************************************************************** leaq 2320(%rsp), %r14 leaq 16(%rsp), %rbx leaq 2576(%rsp), %r13 .LBE129: .LBE128: leaq 2064(%rsp), %rbp .LVL17: .L10: .LBB131: .LBB130: movq %rbx, %rdx movq %r13, %rsi movq %r14, %rdi call _imp_join@PLT .LVL18: .LBE130: .LBE131: movl $16, %edx movq %rbp, %rsi movq %rbx, %rdi call _imp_strncpy@PLT .LVL19: .LDL1: 380 !* SETS UP AN ERROR MESSAGE AND SHOVES IT OUT ONTO THE LISTING * 381 !* AN ALSO OPTIONALLY TO THE TERMINAL * 382 !*********************************************************************** 383 %INTEGER I, J, S, T, Q, QMAX, LENGTH 384 %STRING(255)MESS1,MESS2,WK1,WK2 385 MESS1=""; MESS2="" 386 %IF N=100 %THEN %START; ! SYNTAX FAULTS ARE SPECIAL cmpl $100, %r12d je .L56 .L40: .LBB152: .LBB153: .LBB154: .LBB155: 387 MESS1=" leaq 1296(%rsp), %rsi .LVL75: leaq 272(%rsp), %rdi .LVL76: movl $255, %edx .LVL77: call _imp_strncpy@PLT .LVL78: 388 * Failed to analyse line ".SWRITE(99,2)." 389 " leaq 16(%rsp), %rbx movl $2, %edx movl $99, %esi movq %rbx, %rdi call SWRITE.6450 .LVL103: leaq 10256(%rsp), %rdi movl $32, %ecx movq %rbx, %rsi rep movsq .LBE172: leaq 2064(%rsp), %rbx leaq 10256(%rsp), %rdx leaq 2320(%rsp), %rsi movq %rbx, %rdi call _imp_join@PLT .LVL104: .LBE171: leaq 11792(%rsp), %rdi leaq 10512(%rsp), %rdx movq %rbx, %rsi call _imp_join@PLT .LVL105: .LBE170: .LBE169: leaq 1808(%rsp), %rsi leaq 272(%rsp), %rdi movl $255, %edx call _imp_strncpy@PLT .LVL106: 390 J=0; S=0; T=0; Q=DATA; QMAX=IDENT>>16 391 LENGTH=IDENT&X'FFFF' 392 %IF Q=QMAX %THEN S=T leaq 1552(%rsp), %rsi leaq 528(%rsp), %rdi movl $255, %edx call _imp_strncpy@PLT .LVL79: 393 %FINISH %ELSE %START 394 MESS1=" jmp .L41 .LVL107: .L57: .LBB173: .LBB174: .LBB175: .LBB176: 395 *".SWRITE(99, 4)." " 396 MESS1=MESS1."FAULT".SWRITE(N,2) leaq 16(%rsp), %rbx movl $4, %edx movl $99, %esi movq %rbx, %rdi call SWRITE.6450 .LVL80: leaq 3344(%rsp), %rdi movl $32, %ecx movq %rbx, %rsi rep movsq .LBE155: leaq 2832(%rsp), %rbp leaq 3344(%rsp), %rdx leaq 3088(%rsp), %rsi movq %rbp, %rdi call _imp_join@PLT .LVL81: .LBE154: leaq 11792(%rsp), %r14 leaq 3600(%rsp), %rdx movq %rbp, %rsi movq %r14, %rdi call _imp_join@PLT .LVL82: .LBE153: .LBE152: leaq 2576(%rsp), %rsi leaq 272(%rsp), %r13 movl $255, %edx movq %r13, %rdi call _imp_strncpy@PLT .LVL83: .LBB156: .LBB157: .LBB158: 397 MESS2=MESSAGE(N) 398 %IF MESS2->WK1.("##").WK2 %THEN %C movl $2, %edx movl %r12d, %esi movq %rbx, %rdi call SWRITE.6450 .LVL84: leaq 4624(%rsp), %rdi movl $32, %ecx movq %rbx, %rsi rep movsq .LBE158: .LBB159: leaq 4112(%rsp), %rbp leaq 4368(%rsp), %rdx movq %r13, %rsi movq %rbp, %rdi call _imp_join@PLT .LVL85: .LBE159: leaq 4624(%rsp), %rdx movq %rbp, %rsi movq %r14, %rdi call _imp_join@PLT .LVL86: .LBE157: .LBE156: leaq 3856(%rsp), %rsi movl $255, %edx movq %r13, %rdi call _imp_strncpy@PLT .LVL87: .LBB160: leaq 1040(%rsp), %rdx leaq 784(%rsp), %rax subq $256, %rsp leaq 5648(%rsp), %rsi movl $32, %ecx movq %rsp, %rdi rep movsq subq $256, %rsp leaq 5648(%rsp), %rsi movl $32, %ecx movq %rsp, %rdi rep movsq movq %rdx, %rsi movq %rax, %rdi call _imp_resolve@PLT .LVL90: addq $512, %rsp testl %eax, %eax jne .L57 .L42: .LVL91: 399 MESS2=WK1.SWRITE(IDENT,1).WK2 movl %r12d, %esi movq %rbx, %rdi call MESSAGE.6402 .LVL88: leaq 4880(%rsp), %rdi movl $32, %ecx movq %rbx, %rsi rep movsq .LBE160: leaq 4880(%rsp), %rsi leaq 528(%rsp), %rdi movl $255, %edx call _imp_strncpy@PLT .LVL89: 400 %IF MESS2->WK1.("#").WK2 %THEN %C leaq 1040(%rsp), %rdx leaq 784(%rsp), %rax subq $256, %rsp leaq 6928(%rsp), %rsi movl $32, %ecx movq %rsp, %rdi rep movsq subq $256, %rsp leaq 6928(%rsp), %rsi movl $32, %ecx movq %rsp, %rdi rep movsq movq %rdx, %rsi movq %rax, %rdi call _imp_resolve@PLT .LVL92: addq $512, %rsp testl %eax, %eax jne .L58 .L43: .LVL93: 401 MESS2=WK1.SWRITE(DATA,1).WK2 leaq 16(%rsp), %rbx movl $1, %edx movl 12(%rsp), %esi movq %rbx, %rdi call SWRITE.6450 .LVL108: leaq 6160(%rsp), %rdi movl $32, %ecx movq %rbx, %rsi rep movsq .LBE176: leaq 5904(%rsp), %rbx leaq 6160(%rsp), %rdx leaq 784(%rsp), %rsi movq %rbx, %rdi call _imp_join@PLT .LVL109: .LBE175: leaq 11792(%rsp), %rdi leaq 1040(%rsp), %rdx movq %rbx, %rsi call _imp_join@PLT .LVL110: .LBE174: .LBE173: leaq 5648(%rsp), %rsi leaq 528(%rsp), %rdi movl $255, %edx call _imp_strncpy@PLT .LVL111: jmp .L42 .L58: .LBB177: .LBB178: .LBB179: .LBB180: 402 %IF MESS2->WK1.("&&").WK2 %THEN %C leaq 1040(%rsp), %rdx leaq 784(%rsp), %rax subq $256, %rsp leaq 8208(%rsp), %rsi movl $32, %ecx movq %rsp, %rdi rep movsq subq $256, %rsp leaq 8208(%rsp), %rsi movl $32, %ecx movq %rsp, %rdi rep movsq movq %rdx, %rsi movq %rax, %rdi call _imp_resolve@PLT .LVL94: addq $512, %rsp testl %eax, %eax jne .L59 .L44: .LVL95: 403 MESS2=WK1.PRINTNAME(DATA).WK2 leaq 16(%rsp), %rbx movl $1, %edx movl %r15d, %esi movq %rbx, %rdi call SWRITE.6450 .LVL112: leaq 7440(%rsp), %rdi movl $32, %ecx movq %rbx, %rsi rep movsq .LBE180: leaq 7184(%rsp), %rbx leaq 7440(%rsp), %rdx leaq 784(%rsp), %rsi movq %rbx, %rdi call _imp_join@PLT .LVL113: .LBE179: leaq 11792(%rsp), %rdi leaq 1040(%rsp), %rdx movq %rbx, %rsi call _imp_join@PLT .LVL114: .LBE178: .LBE177: leaq 6928(%rsp), %rsi leaq 528(%rsp), %rdi movl $255, %edx call _imp_strncpy@PLT .LVL115: jmp .L43 .L59: .LBB181: .LBB182: .LBB183: .LBB184: 404 %IF MESS2->WK1.("&").WK2 %THEN %C leaq 1040(%rsp), %rdx leaq 784(%rsp), %rax subq $256, %rsp leaq 9488(%rsp), %rsi movl $32, %ecx movq %rsp, %rdi rep movsq subq $256, %rsp leaq 9488(%rsp), %rsi movl $32, %ecx movq %rsp, %rdi rep movsq movq %rdx, %rsi movq %rax, %rdi call _imp_resolve@PLT .LVL96: addq $512, %rsp testl %eax, %eax jne .L60 .L45: 405 MESS2=WK1.PRINTNAME(IDENT).WK2 leaq 16(%rsp), %rbx movl %r15d, %esi movq %rbx, %rdi call PRINTNAME.6388 .LVL116: leaq 8720(%rsp), %rdi movl $32, %ecx movq %rbx, %rsi rep movsq .LBE184: leaq 8464(%rsp), %rbx leaq 8720(%rsp), %rdx leaq 784(%rsp), %rsi movq %rbx, %rdi call _imp_join@PLT .LVL117: .LBE183: leaq 11792(%rsp), %rdi leaq 1040(%rsp), %rdx movq %rbx, %rsi call _imp_join@PLT .LVL118: .LBE182: .LBE181: leaq 8208(%rsp), %rsi leaq 528(%rsp), %rdi movl $255, %edx call _imp_strncpy@PLT .LVL119: jmp .L44 .L60: .LBB185: .LBB186: .LBB187: .LBB188: 406 %IF N>100 %THEN MESS2=MESS2." Disaster" cmpl $100, %r12d jg .L61 .L41: movdqa 10768(%rsp), %xmm0 movaps %xmm0, 11536(%rsp) movdqa 10784(%rsp), %xmm1 movaps %xmm1, 11552(%rsp) movdqa 10800(%rsp), %xmm2 movaps %xmm2, 11568(%rsp) movdqa 10816(%rsp), %xmm3 movaps %xmm3, 11584(%rsp) movdqa 10832(%rsp), %xmm4 movaps %xmm4, 11600(%rsp) movdqa 10848(%rsp), %xmm5 movaps %xmm5, 11616(%rsp) movdqa 10864(%rsp), %xmm6 movaps %xmm6, 11632(%rsp) movdqa 10880(%rsp), %xmm7 movaps %xmm7, 11648(%rsp) movdqa 10896(%rsp), %xmm0 movaps %xmm0, 11664(%rsp) movdqa 10912(%rsp), %xmm1 movaps %xmm1, 11680(%rsp) movq 10928(%rsp), %r13 movq 10936(%rsp), %r14 movq %r13, 11696(%rsp) movq %r14, 11704(%rsp) movq 10944(%rsp), %rax movq 10952(%rsp), %rdx movq %rax, 11712(%rsp) movq %rdx, 11720(%rsp) movq 10960(%rsp), %rsi movq 10968(%rsp), %rdi movq %rsi, 11728(%rsp) movq %rdi, 11736(%rsp) movq 10976(%rsp), %r9 movq 10984(%rsp), %r10 movq %r9, 11744(%rsp) movq %r10, 11752(%rsp) movq 10992(%rsp), %rcx movq 11000(%rsp), %rbx movq %rcx, 11760(%rsp) movq %rbx, 11768(%rsp) movq 11008(%rsp), %r11 movq 11016(%rsp), %r12 .LVL97: movq %r11, 11776(%rsp) movq %r12, 11784(%rsp) .LBB161: .LBB162: pushq %r12 pushq %r11 pushq %rbx pushq %rcx pushq %r10 pushq %r9 pushq %rdi pushq %rsi pushq %rdx pushq %rax pushq %r14 pushq %r13 pushq 11016(%rsp) pushq 11016(%rsp) pushq 11016(%rsp) pushq 11016(%rsp) pushq 11016(%rsp) pushq 11016(%rsp) pushq 11016(%rsp) pushq 11016(%rsp) pushq 11016(%rsp) pushq 11016(%rsp) pushq 11016(%rsp) pushq 11016(%rsp) pushq 11016(%rsp) pushq 11016(%rsp) pushq 11016(%rsp) pushq 11016(%rsp) pushq 11016(%rsp) pushq 11016(%rsp) pushq 11016(%rsp) pushq 11016(%rsp) call _imp_printstring@PLT .LVL98: .LBE162: .LBE161: 407 %FINISH leaq 16(%rsp), %rbx movl 12(%rsp), %esi movq %rbx, %rdi call PRINTNAME.6388 .LVL120: leaq 10000(%rsp), %rdi movl $32, %ecx movq %rbx, %rsi rep movsq .LBE188: leaq 9744(%rsp), %rbx leaq 10000(%rsp), %rdx leaq 784(%rsp), %rsi movq %rbx, %rdi call _imp_join@PLT .LVL121: .LBE187: leaq 11792(%rsp), %rdi leaq 1040(%rsp), %rdx movq %rbx, %rsi call _imp_join@PLT .LVL122: .LBE186: .LBE185: leaq 9488(%rsp), %rsi leaq 528(%rsp), %rdi movl $255, %edx call _imp_strncpy@PLT .LVL123: jmp .L45 .L61: .LBB189: .LBB190: 408 PRINTSTRING(MESS1) 409 PRINTSTRING(MESS2) %IF MESS2#"" leaq 11792(%rsp), %rdi leaq 10512(%rsp), %rdx leaq 528(%rsp), %rbx movq %rbx, %rsi call _imp_join@PLT .LVL124: .LBE190: .LBE189: leaq 10256(%rsp), %rsi movl $255, %edx movq %rbx, %rdi call _imp_strncpy@PLT .LVL125: leaq 11536(%rsp), %rdi leaq 10768(%rsp), %rsi movl $32, %ecx rep movsq .LBB191: .LBB163: subq $256, %rsp leaq 11792(%rsp), %rsi movl $32, %ecx movq %rsp, %rdi rep movsq call _imp_printstring@PLT .LVL126: .LBE163: .LBE191: 410 NEWLINE 411 %IF N=109 %THEN %MONITOR addq $256, %rsp leaq 11024(%rsp), %rsi leaq 528(%rsp), %rdi call _imp_strcmp@PLT .LVL99: testl %eax, %eax jne .L62 .LBB164: .LBB165: call _imp_newline@PLT .LVL100: .L39: .LBE165: .LBE164: addq $256, %rsp leaq 11024(%rsp), %rsi movq %rbx, %rdi call _imp_strcmp@PLT .LVL127: testl %eax, %eax je .L64 leaq 11792(%rsp), %rdi leaq 11280(%rsp), %rsi movl $32, %ecx rep movsq .LBB192: .LBB193: subq $256, %rsp leaq 12048(%rsp), %rsi movl $32, %ecx movq %rsp, %rdi rep movsq call _imp_printstring@PLT .LVL128: .LBE193: .LBE192: .LBB195: .LBB166: addq $256, %rsp call _imp_newline@PLT .LVL129: .L49: .LDL7: .LBE166: .LBE195: .LBB196: .LBB197: movl $0, %edi call exit@PLT .LVL130: .L48: .L64: .LBE197: .LBE196: .LBB198: .LBB167: call _imp_newline@PLT .LVL131: jmp .L49 .LVL132: .L62: leaq 11792(%rsp), %rdi leaq 11280(%rsp), %rsi movl $32, %ecx rep movsq .LBE167: .LBE198: .LBB199: .LBB194: subq $256, %rsp leaq 12048(%rsp), %rsi movl $32, %ecx movq %rsp, %rdi rep movsq call _imp_printstring@PLT .LVL133: .LBE194: .LBE199: .LBB200: .LBB168: addq $256, %rsp call _imp_newline@PLT .LVL134: jmp .L39 .L63: .LBE168: .LBE200: 412 ! %IF N=109 %THEN PARM_DCOMP=1 %AND CODEOUT 413 %IF N>100 %THEN %STOP 414 %END ?I unused 415 %ROUTINE WARN(%INTEGER N,V) .LVL53: pushq %r14 pushq %r13 pushq %r12 pushq %rbx subq $4120, %rsp movl %edi, %eax movl %esi, %r12d movq %fs:40, %rcx movq %rcx, 4104(%rsp) xorl %ecx, %ecx .LBB138: movq 12056(%rsp), %rax xorq %fs:40, %rax jne .L63 addq $12072, %rsp popq %rbx popq %rbp popq %r12 popq %r13 popq %r14 popq %r15 .LVL101: ret .LVL102: .L56: .LBB169: .LBB170: .LBB171: .LBB172: call __stack_chk_fail@PLT .LVL135: .LFE189: .globl main main: .LFB185: 416 %STRING(30) T; %STRING(120) S 417 S=MESSAGE(N+200) 418 %IF S->S.("&").T %THEN S=S.PRINTNAME(V).T leaq 256(%rsp), %rsi pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) pushq 1528(%rsp) movq %rbx, %rdi call _imp_resolve@PLT .LVL58: addq $512, %rsp testl %eax, %eax jne .L37 .LVL59: .L34: .LBB139: .LBB140: .LBB141: 419 PRINTSTRING(" movq %rsp, %rdi .LVL54: leal 200(%rax), %esi .LVL55: call MESSAGE.6402 .LVL56: movq (%rsp), %rax movq 8(%rsp), %rdx movq %rax, 768(%rsp) movq %rdx, 776(%rsp) movq 16(%rsp), %rax movq 24(%rsp), %rdx movq %rax, 784(%rsp) movq %rdx, 792(%rsp) movq 32(%rsp), %rax movq 40(%rsp), %rdx movq %rax, 800(%rsp) movq %rdx, 808(%rsp) movq 48(%rsp), %rax movq 56(%rsp), %rdx movq %rax, 816(%rsp) movq %rdx, 824(%rsp) movq 64(%rsp), %rax movq 72(%rsp), %rdx movq %rax, 832(%rsp) movq %rdx, 840(%rsp) movq 80(%rsp), %rax movq 88(%rsp), %rdx movq %rax, 848(%rsp) movq %rdx, 856(%rsp) movq 96(%rsp), %rax movq 104(%rsp), %rdx movq %rax, 864(%rsp) movq %rdx, 872(%rsp) movq 112(%rsp), %rax movq 120(%rsp), %rdx movq %rax, 880(%rsp) movq %rdx, 888(%rsp) movq 128(%rsp), %rax movq 136(%rsp), %rdx movq %rax, 896(%rsp) movq %rdx, 904(%rsp) movq 144(%rsp), %rax movq 152(%rsp), %rdx movq %rax, 912(%rsp) movq %rdx, 920(%rsp) movq 160(%rsp), %rax movq 168(%rsp), %rdx movq %rax, 928(%rsp) movq %rdx, 936(%rsp) movq 176(%rsp), %rax movq 184(%rsp), %rdx movq %rax, 944(%rsp) movq %rdx, 952(%rsp) movq 192(%rsp), %rax movq 200(%rsp), %rdx movq %rax, 960(%rsp) movq %rdx, 968(%rsp) movq 208(%rsp), %rax movq 216(%rsp), %rdx movq %rax, 976(%rsp) movq %rdx, 984(%rsp) movq 224(%rsp), %rax movq 232(%rsp), %rdx movq %rax, 992(%rsp) movq %rdx, 1000(%rsp) movq 240(%rsp), %rax movq 248(%rsp), %rdx movq %rax, 1008(%rsp) movq %rdx, 1016(%rsp) .LBE138: leaq 768(%rsp), %rsi leaq 512(%rsp), %rbx movl $120, %edx movq %rbx, %rdi call _imp_strncpy@PLT .LVL57: 420 ? Warning :- ".S." at line No".SWRITE(101,1)) 421 NEWLINE movq %rsp, %rdi movl $1, %edx movl $101, %esi call SWRITE.6450 .LVL60: movq (%rsp), %rax movq 8(%rsp), %rdx movq %rax, 3584(%rsp) movq %rdx, 3592(%rsp) movq 16(%rsp), %rax movq 24(%rsp), %rdx movq %rax, 3600(%rsp) movq %rdx, 3608(%rsp) movq 32(%rsp), %rax movq 40(%rsp), %rdx movq %rax, 3616(%rsp) movq %rdx, 3624(%rsp) movq 48(%rsp), %rax movq 56(%rsp), %rdx movq %rax, 3632(%rsp) movq %rdx, 3640(%rsp) movq 64(%rsp), %rax movq 72(%rsp), %rdx movq %rax, 3648(%rsp) movq %rdx, 3656(%rsp) movq 80(%rsp), %rax movq 88(%rsp), %rdx movq %rax, 3664(%rsp) movq %rdx, 3672(%rsp) movq 96(%rsp), %rax movq 104(%rsp), %rdx movq %rax, 3680(%rsp) movq %rdx, 3688(%rsp) movq 112(%rsp), %rax movq 120(%rsp), %rdx movq %rax, 3696(%rsp) movq %rdx, 3704(%rsp) movq 128(%rsp), %rax movq 136(%rsp), %rdx movq %rax, 3712(%rsp) movq %rdx, 3720(%rsp) movq 144(%rsp), %rax movq 152(%rsp), %rdx movq %rax, 3728(%rsp) movq %rdx, 3736(%rsp) movq 160(%rsp), %rax movq 168(%rsp), %rdx movq %rax, 3744(%rsp) movq %rdx, 3752(%rsp) movq 176(%rsp), %rax movq 184(%rsp), %rdx movq %rax, 3760(%rsp) movq %rdx, 3768(%rsp) movq 192(%rsp), %rax movq 200(%rsp), %rdx movq %rax, 3776(%rsp) movq %rdx, 3784(%rsp) movq 208(%rsp), %rax movq 216(%rsp), %rdx movq %rax, 3792(%rsp) movq %rdx, 3800(%rsp) movq 224(%rsp), %rax movq 232(%rsp), %rdx movq %rax, 3808(%rsp) movq %rdx, 3816(%rsp) movq 240(%rsp), %rax movq 248(%rsp), %rdx movq %rax, 3824(%rsp) movq %rdx, 3832(%rsp) .LBE141: .LBB142: .LBB143: leaq 2816(%rsp), %r12 leaq 512(%rsp), %rdx leaq 3072(%rsp), %rsi movq %r12, %rdi call _imp_join@PLT .LVL61: .LBE143: leaq 2560(%rsp), %rbx leaq 3328(%rsp), %rdx movq %r12, %rsi movq %rbx, %rdi call _imp_join@PLT .LVL62: .LBE142: leaq 3840(%rsp), %rdi leaq 3584(%rsp), %rdx movq %rbx, %rsi call _imp_join@PLT .LVL63: movdqa 2304(%rsp), %xmm0 movaps %xmm0, 3840(%rsp) movdqa 2320(%rsp), %xmm1 movaps %xmm1, 3856(%rsp) movdqa 2336(%rsp), %xmm2 movaps %xmm2, 3872(%rsp) movdqa 2352(%rsp), %xmm3 movaps %xmm3, 3888(%rsp) movdqa 2368(%rsp), %xmm4 movaps %xmm4, 3904(%rsp) movdqa 2384(%rsp), %xmm5 movaps %xmm5, 3920(%rsp) movdqa 2400(%rsp), %xmm6 movaps %xmm6, 3936(%rsp) movdqa 2416(%rsp), %xmm7 movaps %xmm7, 3952(%rsp) movdqa 2432(%rsp), %xmm0 movaps %xmm0, 3968(%rsp) movdqa 2448(%rsp), %xmm1 movaps %xmm1, 3984(%rsp) movq 2464(%rsp), %r13 movq 2472(%rsp), %r14 movq %r13, 4000(%rsp) movq %r14, 4008(%rsp) movq 2480(%rsp), %rax movq 2488(%rsp), %rdx movq %rax, 4016(%rsp) movq %rdx, 4024(%rsp) movq 2496(%rsp), %rsi movq 2504(%rsp), %rdi movq %rsi, 4032(%rsp) movq %rdi, 4040(%rsp) movq 2512(%rsp), %r9 movq 2520(%rsp), %r10 movq %r9, 4048(%rsp) movq %r10, 4056(%rsp) movq 2528(%rsp), %rcx movq 2536(%rsp), %rbx movq %rcx, 4064(%rsp) movq %rbx, 4072(%rsp) movq 2544(%rsp), %r11 movq 2552(%rsp), %r12 movq %r11, 4080(%rsp) movq %r12, 4088(%rsp) .LBE140: .LBE139: .LBB144: .LBB145: pushq %r12 pushq %r11 pushq %rbx pushq %rcx pushq %r10 pushq %r9 pushq %rdi pushq %rsi pushq %rdx pushq %rax pushq %r14 pushq %r13 pushq 2552(%rsp) pushq 2552(%rsp) pushq 2552(%rsp) pushq 2552(%rsp) pushq 2552(%rsp) pushq 2552(%rsp) pushq 2552(%rsp) pushq 2552(%rsp) pushq 2552(%rsp) pushq 2552(%rsp) pushq 2552(%rsp) pushq 2552(%rsp) pushq 2552(%rsp) pushq 2552(%rsp) pushq 2552(%rsp) pushq 2552(%rsp) pushq 2552(%rsp) pushq 2552(%rsp) pushq 2552(%rsp) pushq 2552(%rsp) call _imp_printstring@PLT .LVL64: .LBE145: .LBE144: .LBB146: .LBB147: addq $256, %rsp call _imp_newline@PLT .LVL65: .LBE147: .LBE146: movq %rsp, %rbx movl %r12d, %esi movq %rbx, %rdi call PRINTNAME.6388 .LVL67: leaq 2048(%rsp), %rdi movl $32, %ecx movq %rbx, %rsi rep movsq .LBE151: leaq 1792(%rsp), %r12 .LVL68: leaq 2048(%rsp), %rdx leaq 512(%rsp), %rbx movq %rbx, %rsi movq %r12, %rdi call _imp_join@PLT .LVL69: .LBE150: leaq 3840(%rsp), %rdi leaq 256(%rsp), %rdx movq %r12, %rsi call _imp_join@PLT .LVL70: .LBE149: .LBE148: leaq 1536(%rsp), %rsi movl $120, %edx movq %rbx, %rdi call _imp_strncpy@PLT .LVL71: jmp .L34 .L38: call __stack_chk_fail@PLT .LVL72: .LFE190: FAULT.6493: .LFB189: 422 %END 423 FAULT(16,0,0) movq 4104(%rsp), %rax xorq %fs:40, %rax jne .L38 addq $4120, %rsp popq %rbx popq %r12 popq %r13 popq %r14 ret .LVL66: .L37: .LBB148: .LBB149: .LBB150: .LBB151: 424 WARN(2,76) movl $76, %esi movl $2, %edi call WARN.6631 .LVL139: .LBB201: .LBB202: movl $0, %edi call exit@PLT .LVL140: .LBE202: .LBE201: .LFE185: .comm COUNT.6392,4,4 .Letext0: 425 %ENDOFPROGRAM 101 Statements compiled