Edinburgh IMP77 Compiler - Version 8.4 1 %external %routine %spec close output .Ltext0: .align 1 .thumb .thumb_func OP.10282: .LFB189: 2 %external %routine %spec close input 3 %external %routine %spec open output(%integer i, %string(255) s) 4 %external %routine %spec open input(%integer i, %string(255) s) 5 %recordformat impcomfm(%integer statements, flags, code, gla, diags, perm, 6 %string(31) file, 7 %string(63) Option) 8 %externalrecord(impcomfm) IMPCOM 9 10 ! 11 ! On EMAS all shorts should be changed to integers. 12 ! Also, the INCLUDE facility will need to be modified. 13 ! 14 ! 15 !################################################### 16 ! Copyright: 1 January 1980 # 17 ! Interactive Datasystems (Edinburgh) Ltd. # 18 ! 32 Upper Gilmore Place # 19 ! Edinburgh EH3 9NJ # 20 ! All Rights Reserved # 21 !################################################### 22 23 %BEGIN @ args = 0, pretend = 0, frame = 107032 @ frame_needed = 0, uses_anonymous_args = 0 .LVL986: push {r4, r5, r6, r7, r8, r9, r10, lr} sub sp, sp, #107008 sub sp, sp, #272 ldr r2, .L993 .LPIC925: add r2, pc ldr r3, .L993+4 str r2, [sp, #248] ldr r3, [r2, r3] ldr r3, [r3] add r4, sp, #107008 add r4, r4, #268 str r3, [r4] add r4, sp, #2048 add r5, sp, #107008 add r5, r5, #264 add r3, sp, #107008 add r3, r3, #304 str r3, [r5] 24 %CONSTSTRING(4) version = "8.4" bl _imp_initialise(PLT) .LVL987: 25 26 !configuration parameters 27 28 %CONSTINTEGER max int = ((-1)>>1)//10 29 %CONSTINTEGER max dig = (-1)>>1-maxint*10 30 %CONSTINTEGER byte size = 8; !bits per byte 31 %CONSTINTEGER max tag = 800; !max no. of tags 32 %CONSTINTEGER max dict = 6000; !max extent of dictionary 33 %CONSTINTEGER name bits = 11 34 %CONSTINTEGER max names = 1<0 strings, <0 chars 154 %owninteger end mark = 0; !%end flag 155 %OWNINTEGER cont = ' ', 156 csym = ' '; !listing continuation marker 157 %OWNINTEGER decl = 0; !current declarator flags 158 %OWNINTEGER dim = 0; !arrayname dimension 159 %OWNINTEGER spec given = 0 160 161 %OWNINTEGER escape class = 0; !when and where to escape 162 %OWNINTEGER protection = 0, 163 atom flags = 0 164 %OWNINTEGER otype = 0; !current 'own' type 165 %OWNINTEGER reals ln = 1; ! =4 for %REALSLONG 166 %OWNINTEGER last1 = 0; !previous atom class 167 %OWNINTEGER gen type = 0 168 %OWNINTEGER ptype = 0; !current phrase type 169 %OWNINTEGER papp = 0; !current phrase parameters 170 %OWNINTEGER pformat = 0; !current phrase format 171 %OWNINTEGER force = 0; !force next ptype 172 %OWNINTEGER g = 0, 173 gg = 0, 174 map gg = 0; !grammar entries 175 %OWNINTEGER fdef = 0; !current format definition 176 %OWNINTEGER this = -1; !current recordformat tag 177 %OWNINTEGER nmin = 0; !analysis record atom pointer 178 %OWNINTEGER nmax = 0; !analysis record phrase pointer 179 %OWNINTEGER rbase = 0; !record format definition base 180 %OWNINTEGER stbase = 0; !constant work area base 181 %OWNINTEGER gmin = max grammar; !upper bound on grammar 182 %OWNINTEGER dmax = 1 183 %OWNINTEGER tmin = max tag; !upper bound on tags 184 %OWNINTEGER ss = 0; !source statement entry 185 %STRING(63) include file 186 %OWNINTEGER include list = 0, 187 include level= 0 188 %OWNINTEGER include = 0; !=0 unused, #0 being used 189 %OWNINTEGER perm = 1; !1 = compiling perm, 0 = program 190 %OWNINTEGER progmode = 0; !-1 = file, 1 = begin/eop 191 %OWNINTEGER sstype = 0; !-1:exec stat 192 ! 0: declaration 193 ! 1: block in 194 ! 2: block out 195 %OWNINTEGER spec mode = 0; !>=0: definition 196 ! -1: proc spec 197 ! -2: recordformat 198 %OWNINTEGER ocount = -1; !own constants wanted 199 %OWNINTEGER limit = 0; !lookup limit 200 %OWNINTEGER copy = 0; !duplicate name flag 201 %OWNINTEGER order = 0; !out of sequence flag 202 %OWNINTEGER for warn = 0; !non-local flag 203 %OWNINTEGER dubious = 0; !flag for dubious statements 204 %OWNINTEGER dp = 1 205 %OWNINTEGER pos1 = 0, 206 pos2 = 0; !error position 207 %OWNINTEGER pos = 0; !input line index 208 %OWNINTEGER dimension = 0; !current array dimension 209 %OWNINTEGER local = 0; !search limit for locals 210 %OWNINTEGER fm base = 0; !entry for format decls 211 %OWNINTEGER search base = 0; !entry for record_names 212 %OWNINTEGER format list = 0; !size of current format list 213 %INTEGER recid 214 %OWNBYTEINTEGERARRAY char(0:133) = nl(134); !input line 215 %INTEGERARRAY lit pool(0:lit max) 216 %OWNINTEGER lit = 0; !current literal (integer) 217 %OWNINTEGER lp = 0; !literals pointer 218 %OWNINTEGER block x = 0; !block tag 219 %OWNINTEGER list = 1; !<= to enable 220 %OWNINTEGER control = 0 221 %OWNINTEGER diag = 0; !diagnose flags 222 %SHORTINTEGERARRAY hash(0:max names) 223 %RECORD(tagfm)%ARRAY tag(0:max tag) 224 %SHORTINTEGERARRAY dict(1:max dict) 225 %BYTEINTEGERARRAY buff(1:512) 226 %OWNINTEGER bp = 0 227 228 !*** start of generated tables *** 229 %endoflist 575 !*** end of generated tables *** movw r6, #38918 mov r2, #65536 movs r1, #0 adds r0, r4, r6 bl memset(PLT) .LVL988: mov r8, #1 strb r8, [r4, r6] movw r3, #38919 adds r2, r4, r3 ldrh r1, [r5, #848] @ unaligned strh r1, [r4, r3] @ unaligned movs r3, #0 str r3, [r2, #2] @ unaligned strh r3, [r2, #6] @ unaligned movs r7, #4 movw r2, #39174 strb r7, [r4, r2] movw r1, #39175 adds r2, r4, r1 ldr r0, [r5, #856] str r0, [r4, r1] @ unaligned ldrb r1, [r5, #860] @ zero_extendqisi2 strb r1, [r2, #4] strh r3, [r2, #5] @ unaligned strb r3, [r2, #7] movs r6, #7 movw r2, #39430 strb r6, [r4, r2] movw ip, #39431 add lr, r4, ip ldr r2, .L993+12 .LPIC930: add r2, pc ldmia r2!, {r0, r1} str r0, [r4, ip] @ unaligned str r1, [lr, #4] @ unaligned mov lr, #8 movw r2, #39686 strb lr, [r4, r2] movw ip, #39687 add r9, r4, ip add r2, r5, #864 ldmia r2!, {r0, r1} str r0, [r4, ip] @ unaligned str r1, [r9, #4] @ unaligned movw r2, #39942 strb r7, [r4, r2] movw r1, #39943 adds r2, r4, r1 ldr r0, [r5, #876] str r0, [r4, r1] @ unaligned ldrb r1, [r5, #880] @ zero_extendqisi2 strb r1, [r2, #4] strh r3, [r2, #5] @ unaligned strb r3, [r2, #7] movw r2, #40198 strb r6, [r4, r2] movw ip, #40199 add r9, r4, ip ldr r2, .L993+16 .LPIC933: add r2, pc ldmia r2!, {r0, r1} str r0, [r4, ip] @ unaligned str r1, [r9, #4] @ unaligned movw r2, #40454 strb lr, [r4, r2] movw ip, #40455 add r9, r4, ip add r2, r5, #884 ldmia r2!, {r0, r1} str r0, [r4, ip] @ unaligned str r1, [r9, #4] @ unaligned movw r2, #40710 strb r7, [r4, r2] movw r1, #40711 adds r2, r4, r1 ldr r0, [r5, #896] str r0, [r4, r1] @ unaligned ldrb r1, [r5, #900] @ zero_extendqisi2 strb r1, [r2, #4] strh r3, [r2, #5] @ unaligned strb r3, [r2, #7] movw r2, #40966 strb lr, [r4, r2] movw ip, #40967 add r9, r4, ip add r2, r5, #904 ldmia r2!, {r0, r1} str r0, [r4, ip] @ unaligned str r1, [r9, #4] @ unaligned movw r2, #41222 strb r6, [r4, r2] movw ip, #41223 add r9, r4, ip ldr r2, .L993+20 .LPIC937: add r2, pc ldmia r2!, {r0, r1} str r0, [r4, ip] @ unaligned str r1, [r9, #4] @ unaligned movs r2, #5 movw r1, #41478 strb r2, [r4, r1] movw ip, #41479 add r1, r4, ip ldr r0, [r5, #916] str r0, [r4, ip] @ unaligned ldrh r0, [r5, #920] @ unaligned strh r0, [r1, #4] @ unaligned strh r3, [r1, #6] @ unaligned movw r1, #41734 strb r7, [r4, r1] movw ip, #41735 add r1, r4, ip ldr r0, [r5, #924] str r0, [r4, ip] @ unaligned ldrb r0, [r5, #928] @ zero_extendqisi2 strb r0, [r1, #4] adds r0, r1, r2 strh r3, [r1, #5] @ unaligned strb r3, [r0, #2] movw r1, #41990 strb lr, [r4, r1] movw r9, #41991 add r10, r4, r9 add ip, r5, #932 ldmia ip!, {r0, r1} str r0, [r4, r9] @ unaligned str r1, [r10, #4] @ unaligned mov ip, #6 movw r1, #43526 strb ip, [r4, r1] movw r10, #43527 add r1, r4, r10 ldr r0, [r5, #944] str r0, [r4, r10] @ unaligned ldrh r10, [r5, #948] @ unaligned ldrb r0, [r5, #950] @ zero_extendqisi2 strh r10, [r1, #4] @ unaligned strb r0, [r1, #6] strb r3, [r1, #7] movw r1, #43782 strb r2, [r4, r1] movw r9, #43783 add r1, r4, r9 ldr r0, [r5, #952] str r0, [r4, r9] @ unaligned ldrh r0, [r5, #956] @ unaligned strh r0, [r1, #4] @ unaligned strh r3, [r1, #6] @ unaligned movw r1, #44038 strb r8, [r4, r1] movw r0, #44039 adds r1, r4, r0 ldrh r8, [r5, #960] @ unaligned strh r8, [r4, r0] @ unaligned str r3, [r1, #2] @ unaligned strh r3, [r1, #6] @ unaligned movw r1, #44294 strb r2, [r4, r1] movw r8, #44295 add r1, r4, r8 ldr r0, [r5, #968] str r0, [r4, r8] @ unaligned ldrh r0, [r5, #972] @ unaligned strh r0, [r1, #4] @ unaligned strh r3, [r1, #6] @ unaligned movw r1, #44550 strb r6, [r4, r1] movw r8, #44551 add r9, r4, r8 ldr r6, .L993+24 .LPIC945: add r6, pc ldmia r6!, {r0, r1} str r0, [r4, r8] @ unaligned str r1, [r9, #4] @ unaligned movs r6, #2 movw r1, #44806 strb r6, [r4, r1] movw r0, #44807 adds r1, r4, r0 ldrh r9, [r5, #976] @ unaligned ldrb r8, [r5, #978] @ zero_extendqisi2 strh r9, [r4, r0] @ unaligned strb r8, [r1, #2] str r3, [r1, #3] @ unaligned strb r3, [r1, #7] movw r1, #45062 strb r2, [r4, r1] movw r8, #45063 add r1, r4, r8 ldr r0, [r5, #984] str r0, [r4, r8] @ unaligned ldrh r0, [r5, #988] @ unaligned strh r0, [r1, #4] @ unaligned strh r3, [r1, #6] @ unaligned movw r1, #45318 strb r6, [r4, r1] movw r0, #45319 adds r1, r4, r0 ldrh r8, [r5, #992] @ unaligned ldrb r6, [r5, #994] @ zero_extendqisi2 strh r8, [r4, r0] @ unaligned strb r6, [r1, #2] str r3, [r1, #3] @ unaligned strb r3, [r1, #7] movs r6, #3 movw r1, #45574 strb r6, [r4, r1] movw r1, #45575 add r8, r4, r1 ldr r0, [r5, #1000] str r0, [r4, r1] @ unaligned str r3, [r8, #4] @ unaligned movw r1, #45830 strb ip, [r4, r1] movw r9, #45831 add r1, r4, r9 ldr r0, [r5, #1008] str r0, [r4, r9] @ unaligned ldrh r9, [r5, #1012] @ unaligned ldrb r0, [r5, #1014] @ zero_extendqisi2 strh r9, [r1, #4] @ unaligned strb r0, [r1, #6] strb r3, [r1, #7] movw r1, #46086 strb r2, [r4, r1] movw r8, #46087 add r1, r4, r8 ldr r0, [r5, #1016] str r0, [r4, r8] @ unaligned ldrh r0, [r5, #1020] @ unaligned strh r0, [r1, #4] @ unaligned strh r3, [r1, #6] @ unaligned movw r1, #46342 strb r2, [r4, r1] movw r8, #46343 add r1, r4, r8 ldr r0, [r5, #1024] str r0, [r4, r8] @ unaligned ldrh r0, [r5, #1028] @ unaligned strh r0, [r1, #4] @ unaligned strh r3, [r1, #6] @ unaligned movw r1, #46598 strb r7, [r4, r1] movw r8, #46599 add r1, r4, r8 ldr r0, [r5, #1032] str r0, [r4, r8] @ unaligned ldrb r0, [r5, #1036] @ zero_extendqisi2 strb r0, [r1, #4] adds r0, r1, r2 strh r3, [r1, #5] @ unaligned strb r3, [r0, #2] movw r1, #46854 strb r2, [r4, r1] movw r8, #46855 add r1, r4, r8 ldr r0, [r5, #1040] str r0, [r4, r8] @ unaligned ldrh r0, [r5, #1044] @ unaligned strh r0, [r1, #4] @ unaligned strh r3, [r1, #6] @ unaligned movw r1, #47110 strb r2, [r4, r1] movw r8, #47111 add r1, r4, r8 ldr r0, [r5, #1048] str r0, [r4, r8] @ unaligned ldrh r0, [r5, #1052] @ unaligned strh r0, [r1, #4] @ unaligned strh r3, [r1, #6] @ unaligned movw r1, #47366 strb ip, [r4, r1] movw r9, #47367 add r1, r4, r9 ldr r0, [r5, #1056] str r0, [r4, r9] @ unaligned ldrh r9, [r5, #1060] @ unaligned ldrb r0, [r5, #1062] @ zero_extendqisi2 strh r9, [r1, #4] @ unaligned strb r0, [r1, #6] strb r3, [r1, #7] movw r1, #47622 strb r6, [r4, r1] movw r1, #47623 add r8, r4, r1 ldr r0, [r5, #1064] str r0, [r4, r1] @ unaligned str r3, [r8, #4] @ unaligned movw r1, #47878 strb lr, [r4, r1] movw r8, #47879 add r9, r4, r8 add lr, r5, #1072 ldmia lr!, {r0, r1} str r0, [r4, r8] @ unaligned str r1, [r9, #4] @ unaligned movw r1, #48134 strb ip, [r4, r1] movw r8, #48135 add r1, r4, r8 ldr r0, [r5, #1084] str r0, [r4, r8] @ unaligned ldrh r8, [r5, #1088] @ unaligned ldrb r0, [r5, #1090] @ zero_extendqisi2 strh r8, [r1, #4] @ unaligned strb r0, [r1, #6] strb r3, [r1, #7] movw r1, #48390 strb ip, [r4, r1] movw r8, #48391 add r1, r4, r8 ldr r0, [r5, #1092] str r0, [r4, r8] @ unaligned ldrh r8, [r5, #1096] @ unaligned ldrb r0, [r5, #1098] @ zero_extendqisi2 strh r8, [r1, #4] @ unaligned strb r0, [r1, #6] strb r3, [r1, #7] movw r1, #48646 strb ip, [r4, r1] movw lr, #48647 add r1, r4, lr ldr r0, [r5, #1100] str r0, [r4, lr] @ unaligned ldrh lr, [r5, #1104] @ unaligned ldrb r0, [r5, #1106] @ zero_extendqisi2 strh lr, [r1, #4] @ unaligned strb r0, [r1, #6] strb r3, [r1, #7] movw r1, #48902 strb r7, [r4, r1] movw ip, #48903 add r1, r4, ip ldr r0, [r5, #1108] str r0, [r4, ip] @ unaligned ldrb r0, [r5, #1112] @ zero_extendqisi2 strb r0, [r1, #4] adds r0, r1, r2 strh r3, [r1, #5] @ unaligned strb r3, [r0, #2] movw r1, #49158 strb r2, [r4, r1] movw ip, #49159 add r1, r4, ip ldr r0, [r5, #1116] str r0, [r4, ip] @ unaligned ldrh r0, [r5, #1120] @ unaligned strh r0, [r1, #4] @ unaligned strh r3, [r1, #6] @ unaligned movw r1, #49414 strb r2, [r4, r1] movw r1, #49415 adds r2, r4, r1 ldr r0, [r5, #1124] str r0, [r4, r1] @ unaligned ldrh r1, [r5, #1128] @ unaligned strh r1, [r2, #4] @ unaligned strh r3, [r2, #6] @ unaligned movw r2, #49670 strb r6, [r4, r2] movw r2, #49671 adds r1, r4, r2 ldr r0, [r5, #1132] str r0, [r4, r2] @ unaligned str r3, [r1, #4] @ unaligned movw r2, #49926 strb r6, [r4, r2] movw r2, #49927 adds r1, r4, r2 ldr r0, [r5, #1140] str r0, [r4, r2] @ unaligned str r3, [r1, #4] @ unaligned movw r2, #50182 strb r6, [r4, r2] movw r2, #50183 adds r1, r4, r2 ldr r0, [r5, #1148] str r0, [r4, r2] @ unaligned str r3, [r1, #4] @ unaligned movw r2, #50438 strb r7, [r4, r2] movw r1, #50439 adds r2, r4, r1 ldr r0, [r5, #1156] str r0, [r4, r1] @ unaligned ldrb r1, [r5, #1160] @ zero_extendqisi2 strb r1, [r2, #4] strh r3, [r2, #5] @ unaligned strb r3, [r2, #7] movw r2, #50694 strb r6, [r4, r2] movw r2, #50695 adds r1, r4, r2 ldr r0, [r5, #1164] str r0, [r4, r2] @ unaligned str r3, [r1, #4] @ unaligned movw r3, #50950 strb r6, [r4, r3] movw r3, #50951 adds r2, r4, r3 ldr r0, [r5, #1172] str r0, [r4, r3] @ unaligned movs r4, #0 str r4, [r2, #4] @ unaligned add r3, sp, #2048 mov ip, r6 movw r2, #51206 strb r6, [r3, r2] movw r1, #51207 adds r5, r3, r1 ldr r2, .L993+28 .LPIC971: add r2, pc ldr r0, [r2, #1180] str r0, [r3, r1] @ unaligned str r4, [r5, #4] @ unaligned mov r6, r7 movw r1, #51462 strb r7, [r3, r1] movw r5, #51463 adds r1, r3, r5 ldr r0, [r2, #1188] str r0, [r3, r5] @ unaligned ldrb r0, [r2, #1192] @ zero_extendqisi2 strb r0, [r1, #4] strh r4, [r1, #5] @ unaligned strb r4, [r1, #7] movs r5, #5 movw r1, #51718 strb r5, [r3, r1] movw r7, #51719 adds r1, r3, r7 ldr r0, [r2, #1196] str r0, [r3, r7] @ unaligned ldrh r0, [r2, #1200] @ unaligned strh r0, [r1, #4] @ unaligned strh r4, [r1, #6] @ unaligned movs r1, #2 movw r0, #51974 strb r1, [r3, r0] movw r7, #51975 adds r0, r3, r7 ldrh r8, [r2, #1204] @ unaligned ldrb lr, [r2, #1206] @ zero_extendqisi2 strh r8, [r3, r7] @ unaligned strb lr, [r0, #2] add r7, r0, ip str r4, [r0, #3] @ unaligned strb r4, [r7, #4] movw r0, #52230 strb r6, [r3, r0] movw lr, #52231 add r7, r3, lr ldr r0, [r2, #1212] str r0, [r3, lr] @ unaligned ldrb r0, [r2, #1216] @ zero_extendqisi2 strb r0, [r7, #4] adds r0, r7, r5 strh r4, [r7, #5] @ unaligned strb r4, [r0, #2] movw r0, #52486 strb ip, [r3, r0] movw r7, #52487 add lr, r3, r7 ldr r0, [r2, #1220] str r0, [r3, r7] @ unaligned str r4, [lr, #4] @ unaligned movw r0, #52742 strb r6, [r3, r0] movw lr, #52743 add r7, r3, lr ldr r0, [r2, #1228] str r0, [r3, lr] @ unaligned ldrb r0, [r2, #1232] @ zero_extendqisi2 strb r0, [r7, #4] adds r0, r7, r5 strh r4, [r7, #5] @ unaligned strb r4, [r0, #2] movw r0, #52998 strb r5, [r3, r0] movw lr, #52999 add r7, r3, lr ldr r0, [r2, #1236] str r0, [r3, lr] @ unaligned ldrh r0, [r2, #1240] @ unaligned strh r0, [r7, #4] @ unaligned strh r4, [r7, #6] @ unaligned movw r0, #53254 strb ip, [r3, r0] movw r7, #53255 add lr, r3, r7 ldr r0, [r2, #1244] str r0, [r3, r7] @ unaligned str r4, [lr, #4] @ unaligned movw r0, #53510 strb r1, [r3, r0] movw r7, #53511 adds r0, r3, r7 ldrh r8, [r2, #1252] @ unaligned ldrb lr, [r2, #1254] @ zero_extendqisi2 strh r8, [r3, r7] @ unaligned strb lr, [r0, #2] add r7, r0, ip str r4, [r0, #3] @ unaligned strb r4, [r7, #4] movw r0, #53766 strb ip, [r3, r0] movw r7, #53767 add lr, r3, r7 ldr r0, [r2, #1260] str r0, [r3, r7] @ unaligned str r4, [lr, #4] @ unaligned movw r0, #54022 strb r5, [r3, r0] movw lr, #54023 add r7, r3, lr ldr r0, [r2, #1268] str r0, [r3, lr] @ unaligned ldrh r0, [r2, #1272] @ unaligned strh r0, [r7, #4] @ unaligned strh r4, [r7, #6] @ unaligned movw r0, #54278 strb r5, [r3, r0] movw lr, #54279 add r7, r3, lr ldr r0, [r2, #1276] str r0, [r3, lr] @ unaligned ldrh r0, [r2, #1280] @ unaligned strh r0, [r7, #4] @ unaligned strh r4, [r7, #6] @ unaligned movw r0, #54534 strb ip, [r3, r0] movw r7, #54535 add lr, r3, r7 ldr r0, [r2, #1284] str r0, [r3, r7] @ unaligned str r4, [lr, #4] @ unaligned movw r0, #54790 strb r5, [r3, r0] movw lr, #54791 add r7, r3, lr ldr r0, [r2, #1292] str r0, [r3, lr] @ unaligned ldrh r0, [r2, #1296] @ unaligned strh r0, [r7, #4] @ unaligned strh r4, [r7, #6] @ unaligned movw r0, #55046 strb r6, [r3, r0] movw lr, #55047 add r7, r3, lr ldr r0, [r2, #1300] str r0, [r3, lr] @ unaligned ldrb r0, [r2, #1304] @ zero_extendqisi2 strb r0, [r7, #4] adds r0, r7, r5 strh r4, [r7, #5] @ unaligned strb r4, [r0, #2] movw r0, #55302 strb r1, [r3, r0] movw r0, #55303 adds r1, r3, r0 ldrh lr, [r2, #1308] @ unaligned ldrb r7, [r2, #1310] @ zero_extendqisi2 strh lr, [r3, r0] @ unaligned strb r7, [r1, #2] add r0, r1, ip str r4, [r1, #3] @ unaligned strb r4, [r0, #4] movs r1, #6 movw r0, #55558 strb r1, [r3, r0] movw r8, #55559 add r7, r3, r8 ldr r0, [r2, #1316] str r0, [r3, r8] @ unaligned ldrh r8, [r2, #1320] @ unaligned ldrb r0, [r2, #1322] @ zero_extendqisi2 strh r8, [r7, #4] @ unaligned strb r0, [r7, #6] strb r4, [r7, #7] movw r0, #55814 strb r6, [r3, r0] movw lr, #55815 add r7, r3, lr ldr r0, [r2, #1324] str r0, [r3, lr] @ unaligned ldrb r0, [r2, #1328] @ zero_extendqisi2 strb r0, [r7, #4] adds r0, r7, r5 strh r4, [r7, #5] @ unaligned strb r4, [r0, #2] movw r0, #56070 strb r5, [r3, r0] movw lr, #56071 add r7, r3, lr ldr r0, [r2, #1332] str r0, [r3, lr] @ unaligned ldrh r0, [r2, #1336] @ unaligned strh r0, [r7, #4] @ unaligned strh r4, [r7, #6] @ unaligned movw r0, #56326 strb r6, [r3, r0] movw lr, #56327 add r7, r3, lr ldr r0, [r2, #1340] str r0, [r3, lr] @ unaligned ldrb r0, [r2, #1344] @ zero_extendqisi2 strb r0, [r7, #4] adds r0, r7, r5 strh r4, [r7, #5] @ unaligned strb r4, [r0, #2] movw r0, #56582 strb r1, [r3, r0] movw r8, #56583 add r7, r3, r8 ldr r0, [r2, #1348] str r0, [r3, r8] @ unaligned ldrh r8, [r2, #1352] @ unaligned ldrb r0, [r2, #1354] @ zero_extendqisi2 strh r8, [r7, #4] @ unaligned strb r0, [r7, #6] strb r4, [r7, #7] movw r0, #56838 strb r5, [r3, r0] movw lr, #56839 add r7, r3, lr ldr r0, [r2, #1356] str r0, [r3, lr] @ unaligned ldrh r0, [r2, #1360] @ unaligned strh r0, [r7, #4] @ unaligned strh r4, [r7, #6] @ unaligned movw r0, #57094 strb r5, [r3, r0] movw lr, #57095 add r7, r3, lr ldr r0, [r2, #1364] str r0, [r3, lr] @ unaligned ldrh r0, [r2, #1368] @ unaligned strh r0, [r7, #4] @ unaligned strh r4, [r7, #6] @ unaligned movw r0, #57350 strb r1, [r3, r0] movw lr, #57351 add r1, r3, lr ldr r0, [r2, #1372] str r0, [r3, lr] @ unaligned ldrh lr, [r2, #1376] @ unaligned ldrb r0, [r2, #1378] @ zero_extendqisi2 strh lr, [r1, #4] @ unaligned strb r0, [r1, #6] strb r4, [r1, #7] movs r7, #7 movw r1, #57606 strb r7, [r3, r1] movw r8, #57607 add r9, r3, r8 ldr lr, .L993+32 .LPIC996: add lr, pc ldmia lr!, {r0, r1} str r0, [r3, r8] @ unaligned str r1, [r9, #4] @ unaligned movw r1, #57862 strb r5, [r3, r1] movw lr, #57863 add r1, r3, lr ldr r0, [r2, #1380] str r0, [r3, lr] @ unaligned ldrh r0, [r2, #1384] @ unaligned strh r0, [r1, #4] @ unaligned strh r4, [r1, #6] @ unaligned movw r1, #58118 strb ip, [r3, r1] movw r1, #58119 add ip, r3, r1 ldr r0, [r2, #1388] str r0, [r3, r1] @ unaligned str r4, [ip, #4] @ unaligned movw r1, #58374 strb r7, [r3, r1] movw lr, #58375 add r8, r3, lr ldr ip, .L993+36 .LPIC999: add ip, pc ldmia ip!, {r0, r1} str r0, [r3, lr] @ unaligned str r1, [r8, #4] @ unaligned movw r1, #58630 strb r7, [r3, r1] movw lr, #58631 add r8, r3, lr ldr ip, .L993+40 .LPIC1000: add ip, pc ldmia ip!, {r0, r1} str r0, [r3, lr] @ unaligned str r1, [r8, #4] @ unaligned movw r1, #58886 strb r7, [r3, r1] movw lr, #58887 add r8, r3, lr ldr ip, .L993+44 .LPIC1001: add ip, pc ldmia ip!, {r0, r1} str r0, [r3, lr] @ unaligned str r1, [r8, #4] @ unaligned movw r1, #59142 strb r7, [r3, r1] movw lr, #59143 add r8, r3, lr ldr ip, .L993+48 .LPIC1002: add ip, pc ldmia ip!, {r0, r1} str r0, [r3, lr] @ unaligned str r1, [r8, #4] @ unaligned movw r1, #59398 strb r6, [r3, r1] movw ip, #59399 add r1, r3, ip ldr r0, [r2, #1396] str r0, [r3, ip] @ unaligned ldrb r0, [r2, #1400] @ zero_extendqisi2 strb r0, [r1, #4] adds r0, r1, r5 strh r4, [r1, #5] @ unaligned strb r4, [r0, #2] movw r1, #59654 strb r7, [r3, r1] movw lr, #59655 add r8, r3, lr ldr ip, .L993+52 .LPIC1004: add ip, pc ldmia ip!, {r0, r1} str r0, [r3, lr] @ unaligned str r1, [r8, #4] @ unaligned movw r1, #59910 strb r6, [r3, r1] movw ip, #59911 add r1, r3, ip ldr r0, [r2, #1404] str r0, [r3, ip] @ unaligned ldrb r0, [r2, #1408] @ zero_extendqisi2 strb r0, [r1, #4] adds r0, r1, r5 strh r4, [r1, #5] @ unaligned strb r4, [r0, #2] movw r1, #60166 strb r6, [r3, r1] movw ip, #60167 add r1, r3, ip ldr r0, [r2, #1412] str r0, [r3, ip] @ unaligned ldrb r0, [r2, #1416] @ zero_extendqisi2 strb r0, [r1, #4] adds r0, r1, r5 strh r4, [r1, #5] @ unaligned strb r4, [r0, #2] movw r1, #60422 strb r7, [r3, r1] movw lr, #60423 add r8, r3, lr ldr ip, .L993+56 .LPIC1007: add ip, pc ldmia ip!, {r0, r1} str r0, [r3, lr] @ unaligned str r1, [r8, #4] @ unaligned movw r1, #60678 strb r7, [r3, r1] movw lr, #60679 add r8, r3, lr ldr ip, .L993+60 .LPIC1008: add ip, pc ldmia ip!, {r0, r1} str r0, [r3, lr] @ unaligned str r1, [r8, #4] @ unaligned movw r1, #60934 strb r7, [r3, r1] movw ip, #60935 add lr, r3, ip ldr r7, .L993+64 .LPIC1009: add r7, pc ldmia r7!, {r0, r1} str r0, [r3, ip] @ unaligned str r1, [lr, #4] @ unaligned movw r1, #61190 strb r6, [r3, r1] movw r6, #61191 adds r1, r3, r6 ldr r0, [r2, #1420] str r0, [r3, r6] @ unaligned ldrb r0, [r2, #1424] @ zero_extendqisi2 strb r0, [r1, #4] adds r0, r1, r5 strh r4, [r1, #5] @ unaligned strb r4, [r0, #2] movw r1, #61446 strb r5, [r3, r1] movw r6, #61447 adds r1, r3, r6 ldr r0, [r2, #1428] str r0, [r3, r6] @ unaligned ldrh r0, [r2, #1432] @ unaligned strh r0, [r1, #4] @ unaligned strh r4, [r1, #6] @ unaligned movw r1, #61702 strb r5, [r3, r1] movw r6, #61703 adds r1, r3, r6 ldr r0, [r2, #1436] str r0, [r3, r6] @ unaligned ldrh r0, [r2, #1440] @ unaligned strh r0, [r1, #4] @ unaligned strh r4, [r1, #6] @ unaligned movw r1, #61958 strb r5, [r3, r1] movw r5, #61959 adds r1, r3, r5 ldr r0, [r2, #1444] str r0, [r3, r5] @ unaligned ldrh r0, [r2, #1448] @ unaligned strh r0, [r1, #4] @ unaligned strh r4, [r1, #6] @ unaligned movs r1, #1 movw r0, #62214 strb r1, [r3, r0] movw r5, #62215 adds r0, r3, r5 ldrh r6, [r2, #1452] @ unaligned strh r6, [r3, r5] @ unaligned str r4, [r0, #2] @ unaligned strh r4, [r0, #6] @ unaligned movw r0, #62470 strb r1, [r3, r0] movw r0, #62471 adds r1, r3, r0 ldrh r2, [r2, #1460] @ unaligned strh r2, [r3, r0] @ unaligned mov r3, r4 str r4, [r1, #2] @ unaligned strh r4, [r1, #6] @ unaligned add r4, sp, #2048 movs r6, #5 movw r2, #62726 strb r6, [r4, r2] movw r5, #62727 adds r1, r4, r5 ldr r2, .L993+68 .LPIC1016: add r2, pc ldr r0, [r2, #1468] str r0, [r4, r5] @ unaligned ldrh r0, [r2, #1472] @ unaligned strh r0, [r1, #4] @ unaligned strh r3, [r1, #6] @ unaligned movs r0, #2 movw r1, #62982 strb r0, [r4, r1] movw r5, #62983 adds r1, r4, r5 ldrh ip, [r2, #1476] @ unaligned ldrb r7, [r2, #1478] @ zero_extendqisi2 strh ip, [r4, r5] @ unaligned strb r7, [r1, #2] str r3, [r1, #3] @ unaligned strb r3, [r1, #7] movs r5, #1 movw r1, #63494 strb r5, [r4, r1] movw r7, #63495 adds r1, r4, r7 ldrh ip, [r2, #1484] @ unaligned strh ip, [r4, r7] @ unaligned adds r7, r1, r0 str r3, [r1, #2] @ unaligned strh r3, [r7, #4] @ unaligned movw r1, #63750 strb r5, [r4, r1] movw r7, #63751 adds r1, r4, r7 ldrh ip, [r2, #1492] @ unaligned strh ip, [r4, r7] @ unaligned adds r7, r1, r0 str r3, [r1, #2] @ unaligned strh r3, [r7, #4] @ unaligned movw r1, #64006 strb r5, [r4, r1] movw r7, #64007 adds r1, r4, r7 ldrh ip, [r2, #1500] @ unaligned strh ip, [r4, r7] @ unaligned adds r7, r1, r0 str r3, [r1, #2] @ unaligned strh r3, [r7, #4] @ unaligned movw r1, #64262 strb r5, [r4, r1] movw r7, #64263 adds r1, r4, r7 ldrh ip, [r2, #1508] @ unaligned strh ip, [r4, r7] @ unaligned adds r7, r1, r0 str r3, [r1, #2] @ unaligned strh r3, [r7, #4] @ unaligned movw r1, #64518 strb r0, [r4, r1] movw r7, #64519 adds r1, r4, r7 ldrh lr, [r2, #1516] @ unaligned ldrb ip, [r2, #1518] @ zero_extendqisi2 strh lr, [r4, r7] @ unaligned strb ip, [r1, #2] str r3, [r1, #3] @ unaligned strb r3, [r1, #7] movw r1, #64774 strb r0, [r4, r1] movw r7, #64775 adds r1, r4, r7 ldrh lr, [r2, #1524] @ unaligned ldrb ip, [r2, #1526] @ zero_extendqisi2 strh lr, [r4, r7] @ unaligned strb ip, [r1, #2] str r3, [r1, #3] @ unaligned strb r3, [r1, #7] movw r1, #65030 strb r0, [r4, r1] movw r7, #65031 adds r1, r4, r7 ldrh lr, [r2, #1532] @ unaligned ldrb ip, [r2, #1534] @ zero_extendqisi2 strh lr, [r4, r7] @ unaligned strb ip, [r1, #2] str r3, [r1, #3] @ unaligned strb r3, [r1, #7] movw r1, #65286 strb r0, [r4, r1] movw r7, #65287 adds r1, r4, r7 ldrh lr, [r2, #1540] @ unaligned ldrb ip, [r2, #1542] @ zero_extendqisi2 strh lr, [r4, r7] @ unaligned strb ip, [r1, #2] str r3, [r1, #3] @ unaligned strb r3, [r1, #7] add r1, r4, #65536 strb r5, [r1, #6] ldrh r7, [r2, #1548] @ unaligned strh r7, [r1, #7] @ unaligned str r3, [r1, #9] @ unaligned strh r3, [r1, #13] @ unaligned strb r5, [r1, #262] ldrh r7, [r2, #1556] @ unaligned strh r7, [r1, #263] @ unaligned str r3, [r1, #265] @ unaligned strh r3, [r1, #269] @ unaligned add r1, r4, #66048 strb r5, [r1, #6] ldrh r5, [r2, #1564] @ unaligned strh r5, [r1, #7] @ unaligned str r3, [r1, #9] @ unaligned strh r3, [r1, #13] @ unaligned strb r0, [r1, #262] ldrh r7, [r2, #1572] @ unaligned ldrb r5, [r2, #1574] @ zero_extendqisi2 strh r7, [r1, #263] @ unaligned strb r5, [r1, #265] str r3, [r1, #266] @ unaligned strb r3, [r1, #270] add r1, r4, #66560 strb r0, [r1, #6] ldrh r5, [r2, #1580] @ unaligned ldrb r0, [r2, #1582] @ zero_extendqisi2 strh r5, [r1, #7] @ unaligned strb r0, [r1, #9] str r3, [r1, #10] @ unaligned strb r3, [r1, #14] movs r7, #3 strb r7, [r1, #262] ldr r0, [r2, #1588] str r0, [r1, #263] @ unaligned str r3, [r1, #267] @ unaligned add r5, r4, #69632 movs r1, #7 strb r1, [r5, #6] ldr ip, .L993+72 .LPIC1032: add ip, pc ldmia ip!, {r0, r1} str r0, [r5, #7] @ unaligned str r1, [r5, #11] @ unaligned mov ip, #6 strb ip, [r5, #262] addw r1, r5, #263 ldr r0, [r2, #1596] str r0, [r5, #263] @ unaligned ldrh r5, [r2, #1600] @ unaligned ldrb r0, [r2, #1602] @ zero_extendqisi2 strh r5, [r1, #4] @ unaligned strb r0, [r1, #6] strb r3, [r1, #7] add r1, r4, #70144 strb r6, [r1, #6] ldr r0, [r2, #1604] str r0, [r1, #7] @ unaligned ldrh r0, [r2, #1608] @ unaligned strh r0, [r1, #11] @ unaligned strh r3, [r1, #13] @ unaligned add r5, r4, #70656 movs r1, #8 strb r1, [r5, #6] addw lr, r2, #1612 ldmia lr!, {r0, r1} str r0, [r5, #7] @ unaligned str r1, [r5, #11] @ unaligned movs r1, #4 strb r1, [r5, #262] ldr r0, [r2, #1624] str r0, [r5, #263] @ unaligned ldrb r0, [r2, #1628] @ zero_extendqisi2 strb r0, [r5, #267] strh r3, [r5, #268] @ unaligned strb r3, [r5, #270] add r5, r4, #71168 strb r1, [r5, #6] ldr r0, [r2, #1632] str r0, [r5, #7] @ unaligned ldrb r0, [r2, #1636] @ zero_extendqisi2 strb r0, [r5, #11] strh r3, [r5, #12] @ unaligned strb r3, [r5, #14] strb r6, [r5, #262] ldr r0, [r2, #1640] str r0, [r5, #263] @ unaligned ldrh r0, [r2, #1644] @ unaligned strh r0, [r5, #267] @ unaligned strh r3, [r5, #269] @ unaligned add r5, r4, #71680 strb r6, [r5, #6] ldr r0, [r2, #1648] str r0, [r5, #7] @ unaligned ldrh r0, [r2, #1652] @ unaligned strh r0, [r5, #11] @ unaligned strh r3, [r5, #13] @ unaligned add r5, r4, #72192 strb ip, [r5, #6] ldr r0, [r2, #1656] str r0, [r5, #7] @ unaligned ldrh r9, [r2, #1660] @ unaligned ldrb r0, [r2, #1662] @ zero_extendqisi2 strh r9, [r5, #11] @ unaligned strb r0, [r5, #13] strb r3, [r5, #14] strb ip, [r5, #262] addw lr, r5, #263 ldr r0, [r2, #1664] str r0, [r5, #263] @ unaligned ldrh r5, [r2, #1668] @ unaligned ldrb r0, [r2, #1670] @ zero_extendqisi2 strh r5, [lr, #4] @ unaligned strb r0, [lr, #6] strb r3, [lr, #7] add r5, r4, #72704 strb ip, [r5, #6] ldr r0, [r2, #1672] str r0, [r5, #7] @ unaligned ldrh r8, [r2, #1676] @ unaligned ldrb r0, [r2, #1678] @ zero_extendqisi2 strh r8, [r5, #11] @ unaligned strb r0, [r5, #13] strb r3, [r5, #14] strb r6, [r5, #262] ldr r0, [r2, #1680] str r0, [r5, #263] @ unaligned ldrh r0, [r2, #1684] @ unaligned strh r0, [r5, #267] @ unaligned strh r3, [r5, #269] @ unaligned add r5, r4, #73216 strb r1, [r5, #6] ldr r0, [r2, #1688] str r0, [r5, #7] @ unaligned ldrb r0, [r2, #1692] @ zero_extendqisi2 strb r0, [r5, #11] strh r3, [r5, #12] @ unaligned strb r3, [r5, #14] strb r1, [r5, #262] ldr r0, [r2, #1696] str r0, [r5, #263] @ unaligned ldrb r0, [r2, #1700] @ zero_extendqisi2 strb r0, [r5, #267] strh r3, [r5, #268] @ unaligned strb r3, [r5, #270] add r5, r4, #73728 strb r1, [r5, #6] ldr r0, [r2, #1704] str r0, [r5, #7] @ unaligned ldrb r0, [r2, #1708] @ zero_extendqisi2 strb r0, [r5, #11] strh r3, [r5, #12] @ unaligned strb r3, [r5, #14] strb r1, [r5, #262] ldr r0, [r2, #1712] str r0, [r5, #263] @ unaligned ldrb r0, [r2, #1716] @ zero_extendqisi2 strb r0, [r5, #267] strh r3, [r5, #268] @ unaligned strb r3, [r5, #270] add r5, r4, #74240 strb r1, [r5, #6] ldr r0, [r2, #1720] str r0, [r5, #7] @ unaligned ldrb r0, [r2, #1724] @ zero_extendqisi2 strb r0, [r5, #11] strh r3, [r5, #12] @ unaligned strb r3, [r5, #14] strb r1, [r5, #262] ldr r0, [r2, #1728] str r0, [r5, #263] @ unaligned ldrb r0, [r2, #1732] @ zero_extendqisi2 strb r0, [r5, #267] strh r3, [r5, #268] @ unaligned strb r3, [r5, #270] add r5, r4, #74752 strb r1, [r5, #6] ldr r0, [r2, #1736] str r0, [r5, #7] @ unaligned ldrb r0, [r2, #1740] @ zero_extendqisi2 strb r0, [r5, #11] strh r3, [r5, #12] @ unaligned strb r3, [r5, #14] strb r7, [r5, #262] ldr r0, [r2, #1744] str r0, [r5, #263] @ unaligned str r3, [r5, #267] @ unaligned add r5, r4, #75264 strb r6, [r5, #6] ldr r0, [r2, #1752] str r0, [r5, #7] @ unaligned ldrh r0, [r2, #1756] @ unaligned strh r0, [r5, #11] @ unaligned strh r3, [r5, #13] @ unaligned strb r7, [r5, #262] ldr r0, [r2, #1760] str r0, [r5, #263] @ unaligned str r3, [r5, #267] @ unaligned add r5, r4, #75776 strb r7, [r5, #6] ldr r0, [r2, #1768] str r0, [r5, #7] @ unaligned str r3, [r5, #11] @ unaligned strb r7, [r5, #262] ldr r0, [r2, #1776] str r0, [r5, #263] @ unaligned str r3, [r5, #267] @ unaligned add r5, r4, #76288 strb r1, [r5, #6] ldr r0, [r2, #1784] str r0, [r5, #7] @ unaligned ldrb r1, [r2, #1788] @ zero_extendqisi2 strb r1, [r5, #11] strh r3, [r5, #12] @ unaligned strb r3, [r5, #14] strb r6, [r5, #262] ldr r0, [r2, #1792] str r0, [r5, #263] @ unaligned ldrh r1, [r2, #1796] @ unaligned strh r1, [r5, #267] @ unaligned strh r3, [r5, #269] @ unaligned add r4, r4, #76800 strb r6, [r4, #6] ldr r0, [r2, #1800] str r0, [r4, #7] @ unaligned ldrh r2, [r2, #1804] @ unaligned strh r2, [r4, #11] @ unaligned movs r2, #0 strh r2, [r4, #13] @ unaligned add r4, sp, #2048 add r1, r4, #76800 strb r7, [r1, #262] ldr r3, .L993+76 .LPIC1059: add r3, pc ldr r0, [r3, #1808] str r0, [r1, #263] @ unaligned str r2, [r1, #267] @ unaligned add r1, r4, #77312 movs r5, #4 strb r5, [r1, #6] ldr r0, [r3, #1816] str r0, [r1, #7] @ unaligned b .L994 .L995: .align 2 .L993: .word _GLOBAL_OFFSET_TABLE_-(.LPIC925+4) .word __stack_chk_guard(GOT) .word .LANCHOR5-(.LPIC926+4) .word .LC93-(.LPIC930+4) .word .LC96-(.LPIC933+4) .word .LC100-(.LPIC937+4) .word .LC108-(.LPIC945+4) .word .LANCHOR5-(.LPIC971+4) .word .LC159-(.LPIC996+4) .word .LC162-(.LPIC999+4) .word .LC163-(.LPIC1000+4) .word .LC164-(.LPIC1001+4) .word .LC165-(.LPIC1002+4) .word .LC167-(.LPIC1004+4) .word .LC170-(.LPIC1007+4) .word .LC171-(.LPIC1008+4) .word .LC172-(.LPIC1009+4) .word .LANCHOR5-(.LPIC1016+4) .word .LC195-(.LPIC1032+4) .word .LANCHOR5-(.LPIC1059+4) .L994: ldrb r0, [r3, #1820] @ zero_extendqisi2 strb r0, [r1, #11] strh r2, [r1, #12] @ unaligned strb r2, [r1, #14] strb r5, [r1, #262] ldr r0, [r3, #1824] str r0, [r1, #263] @ unaligned ldrb r0, [r3, #1828] @ zero_extendqisi2 strb r0, [r1, #267] strh r2, [r1, #268] @ unaligned strb r2, [r1, #270] add r1, r4, #77824 strb r6, [r1, #6] ldr r0, [r3, #1832] str r0, [r1, #7] @ unaligned ldrh r0, [r3, #1836] @ unaligned strh r0, [r1, #11] @ unaligned strh r2, [r1, #13] @ unaligned strb r5, [r1, #262] ldr r0, [r3, #1840] str r0, [r1, #263] @ unaligned ldrb r0, [r3, #1844] @ zero_extendqisi2 strb r0, [r1, #267] strh r2, [r1, #268] @ unaligned strb r2, [r1, #270] add r1, r4, #78336 strb r6, [r1, #6] ldr r0, [r3, #1848] str r0, [r1, #7] @ unaligned ldrh r0, [r3, #1852] @ unaligned strh r0, [r1, #11] @ unaligned strh r2, [r1, #13] @ unaligned movs r7, #6 strb r7, [r1, #262] addw ip, r1, #263 ldr r0, [r3, #1856] str r0, [r1, #263] @ unaligned ldrh r0, [r3, #1860] @ unaligned ldrb r1, [r3, #1862] @ zero_extendqisi2 strh r0, [ip, #4] @ unaligned strb r1, [ip, #6] strb r2, [ip, #7] add r1, r4, #78848 strb r5, [r1, #6] ldr r0, [r3, #1864] str r0, [r1, #7] @ unaligned ldrb r0, [r3, #1868] @ zero_extendqisi2 strb r0, [r1, #11] strh r2, [r1, #12] @ unaligned strb r2, [r1, #14] strb r6, [r1, #262] ldr r0, [r3, #1872] str r0, [r1, #263] @ unaligned ldrh r0, [r3, #1876] @ unaligned strh r0, [r1, #267] @ unaligned strh r2, [r1, #269] @ unaligned add r1, r4, #79360 strb r5, [r1, #6] ldr r0, [r3, #1880] str r0, [r1, #7] @ unaligned ldrb r0, [r3, #1884] @ zero_extendqisi2 strb r0, [r1, #11] strh r2, [r1, #12] @ unaligned strb r2, [r1, #14] strb r5, [r1, #262] ldr r0, [r3, #1888] str r0, [r1, #263] @ unaligned ldrb r0, [r3, #1892] @ zero_extendqisi2 strb r0, [r1, #267] strh r2, [r1, #268] @ unaligned strb r2, [r1, #270] add r1, r4, #79872 strb r5, [r1, #6] ldr r0, [r3, #1896] str r0, [r1, #7] @ unaligned ldrb r0, [r3, #1900] @ zero_extendqisi2 strb r0, [r1, #11] strh r2, [r1, #12] @ unaligned strb r2, [r1, #14] strb r5, [r1, #262] ldr r0, [r3, #1904] str r0, [r1, #263] @ unaligned ldrb r0, [r3, #1908] @ zero_extendqisi2 strb r0, [r1, #267] strh r2, [r1, #268] @ unaligned strb r2, [r1, #270] add r1, r4, #80384 strb r6, [r1, #6] ldr r0, [r3, #1912] str r0, [r1, #7] @ unaligned ldrh r0, [r3, #1916] @ unaligned strh r0, [r1, #11] @ unaligned strh r2, [r1, #13] @ unaligned strb r6, [r1, #262] ldr r0, [r3, #1920] str r0, [r1, #263] @ unaligned ldrh r0, [r3, #1924] @ unaligned strh r0, [r1, #267] @ unaligned strh r2, [r1, #269] @ unaligned add r1, r4, #80896 strb r7, [r1, #6] ldr r0, [r3, #1928] str r0, [r1, #7] @ unaligned ldrh r8, [r3, #1932] @ unaligned ldrb r0, [r3, #1934] @ zero_extendqisi2 strh r8, [r1, #11] @ unaligned strb r0, [r1, #13] strb r2, [r1, #14] strb r5, [r1, #262] ldr r0, [r3, #1936] str r0, [r1, #263] @ unaligned ldrb r0, [r3, #1940] @ zero_extendqisi2 strb r0, [r1, #267] strh r2, [r1, #268] @ unaligned strb r2, [r1, #270] add r1, r4, #81408 strb r7, [r1, #6] ldr r0, [r3, #1944] str r0, [r1, #7] @ unaligned ldrh r8, [r3, #1948] @ unaligned ldrb r0, [r3, #1950] @ zero_extendqisi2 strh r8, [r1, #11] @ unaligned strb r0, [r1, #13] strb r2, [r1, #14] strb r7, [r1, #262] addw ip, r1, #263 ldr r0, [r3, #1952] str r0, [r1, #263] @ unaligned ldrh r0, [r3, #1956] @ unaligned ldrb r1, [r3, #1958] @ zero_extendqisi2 strh r0, [ip, #4] @ unaligned strb r1, [ip, #6] strb r2, [ip, #7] add r1, r4, #81920 strb r5, [r1, #6] ldr r0, [r3, #1960] str r0, [r1, #7] @ unaligned ldrb r0, [r3, #1964] @ zero_extendqisi2 strb r0, [r1, #11] strh r2, [r1, #12] @ unaligned strb r2, [r1, #14] strb r6, [r1, #262] ldr r0, [r3, #1968] str r0, [r1, #263] @ unaligned ldrh r0, [r3, #1972] @ unaligned strh r0, [r1, #267] @ unaligned strh r2, [r1, #269] @ unaligned add ip, r4, #82432 mov lr, #7 strb lr, [ip, #6] ldr r8, .L996 .LPIC1080: add r8, pc ldmia r8!, {r0, r1} str r0, [ip, #7] @ unaligned str r1, [ip, #11] @ unaligned strb r5, [ip, #262] ldr r0, [r3, #1976] str r0, [ip, #263] @ unaligned ldrb r1, [r3, #1980] @ zero_extendqisi2 strb r1, [ip, #267] strh r2, [ip, #268] @ unaligned strb r2, [ip, #270] add r1, r4, #82944 strb r5, [r1, #6] ldr r0, [r3, #1984] str r0, [r1, #7] @ unaligned ldrb r0, [r3, #1988] @ zero_extendqisi2 strb r0, [r1, #11] strh r2, [r1, #12] @ unaligned strb r2, [r1, #14] strb r5, [r1, #262] ldr r0, [r3, #1992] str r0, [r1, #263] @ unaligned ldrb r0, [r3, #1996] @ zero_extendqisi2 strb r0, [r1, #267] strh r2, [r1, #268] @ unaligned strb r2, [r1, #270] add ip, r4, #83456 strb lr, [ip, #6] ldr r8, .L996+4 .LPIC1084: add r8, pc ldmia r8!, {r0, r1} str r0, [ip, #7] @ unaligned str r1, [ip, #11] @ unaligned strb r5, [ip, #262] ldr r0, [r3, #2000] str r0, [ip, #263] @ unaligned ldrb r1, [r3, #2004] @ zero_extendqisi2 strb r1, [ip, #267] strh r2, [ip, #268] @ unaligned strb r2, [ip, #270] add r5, r4, #84992 strb r7, [r5, #262] addw r1, r5, #263 ldr r0, [r3, #2008] str r0, [r5, #263] @ unaligned ldrh r5, [r3, #2012] @ unaligned ldrb r0, [r3, #2014] @ zero_extendqisi2 strh r5, [r1, #4] @ unaligned strb r0, [r1, #6] strb r2, [r1, #7] add r1, r4, #85504 strb r6, [r1, #6] ldr r0, [r3, #2016] str r0, [r1, #7] @ unaligned ldrh r0, [r3, #2020] @ unaligned strh r0, [r1, #11] @ unaligned strh r2, [r1, #13] @ unaligned strb r6, [r1, #262] ldr r0, [r3, #2024] str r0, [r1, #263] @ unaligned ldrh r0, [r3, #2028] @ unaligned strh r0, [r1, #267] @ unaligned strh r2, [r1, #269] @ unaligned add r1, r4, #86016 strb r6, [r1, #6] ldr r0, [r3, #2032] str r0, [r1, #7] @ unaligned ldrh r0, [r3, #2036] @ unaligned strh r0, [r1, #11] @ unaligned strh r2, [r1, #13] @ unaligned strb r7, [r1, #262] addw r5, r1, #263 ldr r0, [r3, #2040] str r0, [r1, #263] @ unaligned ldrh r0, [r3, #2044] @ unaligned ldrb r1, [r3, #2046] @ zero_extendqisi2 strh r0, [r5, #4] @ unaligned strb r1, [r5, #6] strb r2, [r5, #7] add r5, r4, #86528 strb r6, [r5, #6] ldr r0, [r3, #2048] str r0, [r5, #7] @ unaligned ldrh r1, [r3, #2052] @ unaligned strh r1, [r5, #11] @ unaligned strh r2, [r5, #13] @ unaligned mov ip, #8 strb ip, [r5, #262] addw r8, r3, #2056 ldmia r8!, {r0, r1} str r0, [r5, #263] @ unaligned str r1, [r5, #267] @ unaligned add r1, r4, #87040 strb r7, [r1, #6] add r5, r1, lr ldr r0, [r3, #2068] str r0, [r1, #7] @ unaligned ldrh r9, [r3, #2072] @ unaligned ldrb r0, [r3, #2074] @ zero_extendqisi2 strh r9, [r5, #4] @ unaligned strb r0, [r5, #6] strb r2, [r5, #7] strb r6, [r1, #262] ldr r0, [r3, #2076] str r0, [r1, #263] @ unaligned ldrh r0, [r3, #2080] @ unaligned strh r0, [r1, #267] @ unaligned strh r2, [r1, #269] @ unaligned add r1, r4, #87552 strb r7, [r1, #6] add r5, r1, lr ldr r0, [r3, #2084] str r0, [r1, #7] @ unaligned ldrh r9, [r3, #2088] @ unaligned ldrb r0, [r3, #2090] @ zero_extendqisi2 strh r9, [r5, #4] @ unaligned strb r0, [r5, #6] strb r2, [r5, #7] strb r7, [r1, #262] addw r5, r1, #263 ldr r0, [r3, #2092] str r0, [r1, #263] @ unaligned ldrh r0, [r3, #2096] @ unaligned ldrb r1, [r3, #2098] @ zero_extendqisi2 strh r0, [r5, #4] @ unaligned strb r1, [r5, #6] strb r2, [r5, #7] add r5, r4, #88064 strb r7, [r5, #6] add r1, r5, lr ldr r0, [r3, #2100] str r0, [r5, #7] @ unaligned ldrh r8, [r3, #2104] @ unaligned ldrb r0, [r3, #2106] @ zero_extendqisi2 strh r8, [r1, #4] @ unaligned strb r0, [r1, #6] strb r2, [r1, #7] strb lr, [r5, #262] ldr r2, .L996+8 .LPIC1098: add r2, pc ldmia r2!, {r0, r1} str r0, [r5, #263] @ unaligned str r1, [r5, #267] @ unaligned add r4, r4, #88576 strb ip, [r4, #6] addw r2, r3, #2108 ldmia r2!, {r0, r1} str r0, [r4, #7] @ unaligned str r1, [r4, #11] @ unaligned strb r6, [r4, #262] ldr r0, [r3, #2120] str r0, [r4, #263] @ unaligned ldrh r3, [r3, #2124] @ unaligned strh r3, [r4, #267] @ unaligned movs r2, #0 strh r2, [r4, #269] @ unaligned add r4, sp, #2048 add r1, r4, #89088 movs r7, #6 strb r7, [r1, #6] add r5, r1, lr ldr r3, .L996+12 .LPIC1101: add r3, pc ldr r0, [r3, #2128] str r0, [r1, #7] @ unaligned ldrh ip, [r3, #2132] @ unaligned ldrb r0, [r3, #2134] @ zero_extendqisi2 strh ip, [r5, #4] @ unaligned strb r0, [r5, #6] strb r2, [r5, #7] strb r7, [r1, #262] addw r5, r1, #263 ldr r0, [r3, #2136] str r0, [r1, #263] @ unaligned ldrh r0, [r3, #2140] @ unaligned ldrb r1, [r3, #2142] @ zero_extendqisi2 strh r0, [r5, #4] @ unaligned strb r1, [r5, #6] strb r2, [r5, #7] add r5, r4, #89600 strb r7, [r5, #6] add r1, r5, lr ldr r0, [r3, #2144] str r0, [r5, #7] @ unaligned ldrh ip, [r3, #2148] @ unaligned ldrb r0, [r3, #2150] @ zero_extendqisi2 strh ip, [r1, #4] @ unaligned strb r0, [r1, #6] strb r2, [r1, #7] movs r1, #8 strb r1, [r5, #262] addw r6, r3, #2152 ldmia r6!, {r0, r1} str r0, [r5, #263] @ unaligned str r1, [r5, #267] @ unaligned add r5, r4, #90112 mov ip, #3 strb ip, [r5, #6] ldr r0, [r3, #2164] str r0, [r5, #7] @ unaligned str r2, [r5, #11] @ unaligned strb lr, [r5, #262] ldr r6, .L996+16 .LPIC1106: add r6, pc ldmia r6!, {r0, r1} str r0, [r5, #263] @ unaligned str r1, [r5, #267] @ unaligned add r1, r4, #90624 movs r5, #4 strb r5, [r1, #6] ldr r0, [r3, #2172] str r0, [r1, #7] @ unaligned ldrb r0, [r3, #2176] @ zero_extendqisi2 strb r0, [r1, #11] strh r2, [r1, #12] @ unaligned strb r2, [r1, #14] strb r5, [r1, #262] ldr r0, [r3, #2180] str r0, [r1, #263] @ unaligned ldrb r0, [r3, #2184] @ zero_extendqisi2 strb r0, [r1, #267] strh r2, [r1, #268] @ unaligned strb r2, [r1, #270] add r1, r4, #91136 strb r5, [r1, #6] ldr r0, [r3, #2188] str r0, [r1, #7] @ unaligned ldrb r0, [r3, #2192] @ zero_extendqisi2 strb r0, [r1, #11] strh r2, [r1, #12] @ unaligned strb r2, [r1, #14] strb r5, [r1, #262] ldr r0, [r3, #2196] str r0, [r1, #263] @ unaligned ldrb r0, [r3, #2200] @ zero_extendqisi2 strb r0, [r1, #267] strh r2, [r1, #268] @ unaligned strb r2, [r1, #270] add r1, r4, #91648 strb r5, [r1, #6] ldr r0, [r3, #2204] str r0, [r1, #7] @ unaligned ldrb r0, [r3, #2208] @ zero_extendqisi2 strb r0, [r1, #11] strh r2, [r1, #12] @ unaligned strb r2, [r1, #14] movs r6, #5 strb r6, [r1, #262] ldr r0, [r3, #2212] str r0, [r1, #263] @ unaligned ldrh r0, [r3, #2216] @ unaligned strh r0, [r1, #267] @ unaligned strh r2, [r1, #269] @ unaligned add r1, r4, #92160 strb r6, [r1, #6] ldr r0, [r3, #2220] str r0, [r1, #7] @ unaligned ldrh r0, [r3, #2224] @ unaligned strh r0, [r1, #11] @ unaligned strh r2, [r1, #13] @ unaligned strb r6, [r1, #262] ldr r0, [r3, #2228] str r0, [r1, #263] @ unaligned ldrh r0, [r3, #2232] @ unaligned strh r0, [r1, #267] @ unaligned strh r2, [r1, #269] @ unaligned add r1, r4, #92672 strb r6, [r1, #6] ldr r0, [r3, #2236] str r0, [r1, #7] @ unaligned ldrh r0, [r3, #2240] @ unaligned strh r0, [r1, #11] @ unaligned strh r2, [r1, #13] @ unaligned strb r6, [r1, #262] ldr r0, [r3, #2244] str r0, [r1, #263] @ unaligned ldrh r0, [r3, #2248] @ unaligned strh r0, [r1, #267] @ unaligned strh r2, [r1, #269] @ unaligned add r1, r4, #93184 strb r7, [r1, #6] add r8, r1, lr ldr r0, [r3, #2252] str r0, [r1, #7] @ unaligned ldrh r10, [r3, #2256] @ unaligned ldrb r0, [r3, #2258] @ zero_extendqisi2 strh r10, [r8, #4] @ unaligned strb r0, [r8, #6] strb r2, [r8, #7] strb r7, [r1, #262] addw r8, r1, #263 ldr r0, [r3, #2260] str r0, [r1, #263] @ unaligned ldrh r0, [r3, #2264] @ unaligned ldrb r1, [r3, #2266] @ zero_extendqisi2 strh r0, [r8, #4] @ unaligned strb r1, [r8, #6] strb r2, [r8, #7] add r1, r4, #93696 strb r7, [r1, #6] add r8, r1, lr ldr r0, [r3, #2268] str r0, [r1, #7] @ unaligned ldrh r10, [r3, #2272] @ unaligned ldrb r0, [r3, #2274] @ zero_extendqisi2 strh r10, [r8, #4] @ unaligned strb r0, [r8, #6] strb r2, [r8, #7] strb r5, [r1, #262] ldr r0, [r3, #2276] str r0, [r1, #263] @ unaligned ldrb r0, [r3, #2280] @ zero_extendqisi2 strb r0, [r1, #267] strh r2, [r1, #268] @ unaligned strb r2, [r1, #270] add r1, r4, #94208 strb ip, [r1, #6] ldr r0, [r3, #2284] str r0, [r1, #7] @ unaligned str r2, [r1, #11] @ unaligned strb r5, [r1, #262] ldr r0, [r3, #2292] str r0, [r1, #263] @ unaligned ldrb r0, [r3, #2296] @ zero_extendqisi2 strb r0, [r1, #267] strh r2, [r1, #268] @ unaligned strb r2, [r1, #270] add r1, r4, #94720 strb r6, [r1, #6] ldr r0, [r3, #2300] str r0, [r1, #7] @ unaligned ldrh r0, [r3, #2304] @ unaligned strh r0, [r1, #11] @ unaligned strh r2, [r1, #13] @ unaligned strb r5, [r1, #262] ldr r0, [r3, #2308] str r0, [r1, #263] @ unaligned ldrb r0, [r3, #2312] @ zero_extendqisi2 strb r0, [r1, #267] strh r2, [r1, #268] @ unaligned strb r2, [r1, #270] add r1, r4, #95232 strb r5, [r1, #6] ldr r0, [r3, #2316] str r0, [r1, #7] @ unaligned ldrb r0, [r3, #2320] @ zero_extendqisi2 strb r0, [r1, #11] strh r2, [r1, #12] @ unaligned strb r2, [r1, #14] strb r5, [r1, #262] ldr r0, [r3, #2324] str r0, [r1, #263] @ unaligned ldrb r0, [r3, #2328] @ zero_extendqisi2 strb r0, [r1, #267] strh r2, [r1, #268] @ unaligned strb r2, [r1, #270] add r1, r4, #95744 strb r5, [r1, #6] ldr r0, [r3, #2332] str r0, [r1, #7] @ unaligned ldrb r0, [r3, #2336] @ zero_extendqisi2 strb r0, [r1, #11] strh r2, [r1, #12] @ unaligned strb r2, [r1, #14] strb r6, [r1, #262] ldr r0, [r3, #2340] str r0, [r1, #263] @ unaligned ldrh r0, [r3, #2344] @ unaligned strh r0, [r1, #267] @ unaligned strh r2, [r1, #269] @ unaligned add r1, r4, #96256 strb r6, [r1, #6] ldr r0, [r3, #2348] str r0, [r1, #7] @ unaligned ldrh r0, [r3, #2352] @ unaligned strh r0, [r1, #11] @ unaligned strh r2, [r1, #13] @ unaligned strb r6, [r1, #262] ldr r0, [r3, #2356] str r0, [r1, #263] @ unaligned ldrh r0, [r3, #2360] @ unaligned strh r0, [r1, #267] @ unaligned strh r2, [r1, #269] @ unaligned add r1, r4, #96768 strb ip, [r1, #6] ldr r0, [r3, #2364] str r0, [r1, #7] @ unaligned str r2, [r1, #11] @ unaligned strb r5, [r1, #262] ldr r0, [r3, #2372] str r0, [r1, #263] @ unaligned ldrb r0, [r3, #2376] @ zero_extendqisi2 strb r0, [r1, #267] strh r2, [r1, #268] @ unaligned strb r2, [r1, #270] add r8, r4, #97280 strb ip, [r8, #6] ldr r0, [r3, #2380] str r0, [r8, #7] @ unaligned str r2, [r8, #11] @ unaligned strb lr, [r8, #262] ldr lr, .L996+20 .LPIC1134: add lr, pc ldmia lr!, {r0, r1} str r0, [r8, #263] @ unaligned str r1, [r8, #267] @ unaligned add r1, r4, #97792 strb r7, [r1, #6] ldr r0, [r3, #2388] str r0, [r1, #7] @ unaligned ldrh r9, [r3, #2392] @ unaligned ldrb r0, [r3, #2394] @ zero_extendqisi2 strh r9, [r1, #11] @ unaligned strb r0, [r1, #13] strb r2, [r1, #14] strb r7, [r1, #262] addw lr, r1, #263 ldr r0, [r3, #2396] str r0, [r1, #263] @ unaligned ldrh r0, [r3, #2400] @ unaligned ldrb r1, [r3, #2402] @ zero_extendqisi2 strh r0, [lr, #4] @ unaligned strb r1, [lr, #6] strb r2, [lr, #7] add r1, r4, #98304 strb ip, [r1, #6] ldr r0, [r3, #2404] str r0, [r1, #7] @ unaligned str r2, [r1, #11] @ unaligned strb r7, [r1, #262] addw r7, r1, #263 ldr r0, [r3, #2412] str r0, [r1, #263] @ unaligned ldrh r0, [r3, #2416] @ unaligned ldrb r1, [r3, #2418] @ zero_extendqisi2 strh r0, [r7, #4] @ unaligned strb r1, [r7, #6] strb r2, [r7, #7] add r1, r4, #98816 strb r6, [r1, #6] ldr r0, [r3, #2420] str r0, [r1, #7] @ unaligned ldrh r0, [r3, #2424] @ unaligned strh r0, [r1, #11] @ unaligned strh r2, [r1, #13] @ unaligned strb r6, [r1, #262] ldr r0, [r3, #2428] str r0, [r1, #263] @ unaligned ldrh r0, [r3, #2432] @ unaligned strh r0, [r1, #267] @ unaligned strh r2, [r1, #269] @ unaligned add r1, r4, #99328 strb r6, [r1, #6] ldr r0, [r3, #2436] str r0, [r1, #7] @ unaligned ldrh r0, [r3, #2440] @ unaligned strh r0, [r1, #11] @ unaligned strh r2, [r1, #13] @ unaligned strb ip, [r1, #262] ldr r0, [r3, #2444] str r0, [r1, #263] @ unaligned str r2, [r1, #267] @ unaligned add r4, r4, #99840 strb r5, [r4, #6] adds r2, r4, #7 ldr r0, [r3, #2452] str r0, [r4, #7] @ unaligned ldrb r3, [r3, #2456] @ zero_extendqisi2 strb r3, [r4, #11] adds r1, r2, r6 movs r3, #0 strh r3, [r4, #12] @ unaligned strb r3, [r1, #2] add r7, sp, #2048 mov r2, r4 mov ip, r5 strb r5, [r4, #262] ldr r4, .L996+24 .LPIC1144: add r4, pc ldr r0, [r4, #2460] str r0, [r2, #263] @ unaligned ldrb r1, [r4, #2464] @ zero_extendqisi2 strb r1, [r2, #267] strh r3, [r2, #268] @ unaligned strb r3, [r2, #270] add r2, sp, #102400 strb r5, [r2, #6] ldr r0, [r4, #2468] str r0, [r2, #7] @ unaligned ldrb r1, [r4, #2472] @ zero_extendqisi2 strb r1, [r2, #11] strh r3, [r2, #12] @ unaligned strb r3, [r2, #14] movs r6, #7 strb r6, [r2, #262] ldr r5, .L996+28 .LPIC1146: add r5, pc ldmia r5!, {r0, r1} str r0, [r2, #263] @ unaligned str r1, [r2, #267] @ unaligned add r2, sp, #102912 movs r5, #6 strb r5, [r2, #6] adds r1, r2, r6 ldr r0, [r4, #2476] str r0, [r2, #7] @ unaligned ldrh r8, [r4, #2480] @ unaligned ldrb r0, [r4, #2482] @ zero_extendqisi2 strh r8, [r1, #4] @ unaligned strb r0, [r1, #6] strb r3, [r1, #7] strb ip, [r2, #262] ldr r0, [r4, #2484] str r0, [r2, #263] @ unaligned ldrb r1, [r4, #2488] @ zero_extendqisi2 strb r1, [r2, #267] strh r3, [r2, #268] @ unaligned strb r3, [r2, #270] add r2, sp, #103424 strb r5, [r2, #6] adds r1, r2, r6 ldr r0, [r4, #2492] str r0, [r2, #7] @ unaligned ldrh r8, [r4, #2496] @ unaligned ldrb r0, [r4, #2498] @ zero_extendqisi2 strh r8, [r1, #4] @ unaligned strb r0, [r1, #6] strb r3, [r1, #7] movs r1, #5 strb r1, [r2, #262] ldr r0, [r4, #2500] str r0, [r2, #263] @ unaligned ldrh r1, [r4, #2504] @ unaligned strh r1, [r2, #267] @ unaligned strh r3, [r2, #269] @ unaligned add r2, sp, #103936 strb r6, [r2, #6] ldr lr, .L996+32 .LPIC1151: add lr, pc ldmia lr!, {r0, r1} str r0, [r2, #7] @ unaligned str r1, [r2, #11] @ unaligned strb ip, [r2, #262] ldr r0, [r4, #2508] str r0, [r2, #263] @ unaligned ldrb r1, [r4, #2512] @ zero_extendqisi2 strb r1, [r2, #267] strh r3, [r2, #268] @ unaligned strb r3, [r2, #270] add ip, sp, #104448 strb r6, [ip, #6] ldr r2, .L996+36 .LPIC1153: add r2, pc ldmia r2!, {r0, r1} str r0, [ip, #7] @ unaligned str r1, [ip, #11] @ unaligned add r2, sp, #105472 strb r5, [r2, #6] adds r1, r2, r6 ldr r0, [r4, #2516] str r0, [r2, #7] @ unaligned ldrh lr, [r4, #2520] @ unaligned ldrb r0, [r4, #2522] @ zero_extendqisi2 strh lr, [r1, #4] @ unaligned strb r0, [r1, #6] strb r3, [r1, #7] strb r6, [r2, #262] ldr r6, .L996+40 .LPIC1155: add r6, pc ldmia r6!, {r0, r1} str r0, [r2, #263] @ unaligned str r1, [r2, #267] @ unaligned add r2, sp, #105984 movs r1, #8 strb r1, [r2, #6] addw r6, r4, #2524 ldmia r6!, {r0, r1} str r0, [r2, #7] @ unaligned str r1, [r2, #11] @ unaligned strb r5, [r2, #262] addw r1, r2, #263 ldr r0, [r4, #2536] str r0, [r2, #263] @ unaligned ldrh r0, [r4, #2540] @ unaligned ldrb r2, [r4, #2542] @ zero_extendqisi2 strh r0, [r1, #4] @ unaligned strb r2, [r1, #6] strb r3, [r1, #7] add r5, sp, #40704 adds r5, r5, #196 add r6, r4, #2544 ldmia r6!, {r0, r1, r2, r3} stmia r5!, {r0, r1, r2, r3} ldmia r6!, {r0, r1, r2, r3} stmia r5!, {r0, r1, r2, r3} ldmia r6!, {r0, r1, r2, r3} stmia r5!, {r0, r1, r2, r3} ldr r3, [r6] strh r3, [r5] @ movhi movs r2, #240 addw r1, r4, #2596 add r0, sp, #23296 adds r0, r0, #100 bl memcpy(PLT) .LVL989: mov r2, #1152 addw r1, r4, #2836 add r0, r7, #25600 adds r0, r0, #84 bl memcpy(PLT) .LVL990: 576 577 %ROUTINE flush buffer @ Nested: function declared inside another function. @ args = 0, pretend = 0, frame = 776 @ frame_needed = 0, uses_anonymous_args = 0 push {r4, r5, r6, r7, r8, lr} sub sp, sp, #1288 mov r7, ip ldr r4, .L89 .LPIC48: add r4, pc ldr r3, .L89+4 ldr r3, [r4, r3] ldr r3, [r3] str r3, [sp, #1284] .LVL87: .LBB327: .LBB328: ldr r3, .L89+8 ldr r3, [r4, r3] movs r2, #1 str r2, [r3] ldr r3, .L89+12 ldr r3, [r4, r3] ldr r2, .L89+16 ldr r2, [r4, r2] ldr r2, [r2, #280] str r2, [r3] ldr r0, .L89+20 .LPIC49: add r0, pc add r0, r0, #256 bl check_outstream(PLT) .LVL88: .LBE328: .LBE327: .LBB329: 578 %INTEGER j 579 %IF faulty = 0 %START 580 select output(object) 581 %FOR j = 1, 1, bp %CYCLE 582 printsymbol(buff(j)) ldr r3, .L89+24 .LPIC50: add r3, pc ldr r6, [r3] .LVL89: 583 %REPEAT cmp r6, #1 bmi .L87 .L77: .LVL90: ldr r3, .L89+36 ldr r3, [r4, r3] ldr r1, [r3] cbz r1, .L78 add r0, sp, #772 bl _imp_c2istr(PLT) .LVL99: .L79: ldr r3, .L89+40 ldr r3, [r4, r3] ldr r5, [r3] movw r3, #583 cmp r5, #0 it eq moveq r5, r3 ldr r1, .L89+44 .LPIC52: add r1, pc addw r8, sp, #1028 mov r0, r8 bl _imp_c2istr(PLT) .LVL100: movs r3, #0 str r3, [sp, #508] movs r3, #1 str r3, [sp, #504] movs r3, #5 str r3, [sp, #500] mov r2, #256 mov r1, r8 add r0, sp, #244 bl memcpy(PLT) .LVL101: str r5, [sp, #240] movs r2, #240 add r1, sp, #788 mov r0, sp bl memcpy(PLT) .LVL102: add r3, sp, #772 ldm r3, {r0, r1, r2, r3} bl _signal_event(PLT) .LVL103: b .L77 .L78: .LBB332: mov r8, #256 mov r2, r8 ldr r1, .L89+48 .LPIC51: add r1, pc addw r5, sp, #1028 mov r0, r5 bl memcpy(PLT) .LVL104: mov r2, r8 mov r1, r5 add r5, sp, #516 mov r0, r5 bl memcpy(PLT) .LVL105: .LBE332: mov r2, r8 mov r1, r5 add r0, sp, #772 bl memcpy(PLT) .LVL106: b .L79 .LVL107: .L88: .LBE335: 584 select output(listing) 585 %FINISH 586 bp = 0 cbz r6, .L81 add r5, r7, #104448 addw r5, r5, #261 add r6, r6, #104448 .LVL91: addw r6, r6, #261 .LVL92: add r6, r6, r7 .LVL93: .L82: .LBB330: .LBB331: ldrb r0, [r5, #1]! @ zero_extendqisi2 .LVL94: bl _imp_printsymbol(PLT) .LVL95: .LBE331: .LBE330: cmp r5, r6 bne .L82 .LVL96: .L81: .LBE329: .LBB333: .LBB334: ldr r3, .L89+8 ldr r3, [r4, r3] movs r2, #2 str r2, [r3] ldr r3, .L89+12 ldr r3, [r4, r3] ldr r2, .L89+16 ldr r2, [r4, r2] ldr r2, [r2, #556] str r2, [r3] ldr r0, .L89+28 .LPIC53: add r0, pc add r0, r0, #256 bl check_outstream(PLT) .LVL97: .LDL4: .LBE334: .LBE333: ldr r3, .L89+32 .LPIC54: add r3, pc movs r2, #0 str r2, [r3] 587 %END 588 %ROUTINE print ident(%INTEGER p, mode) @ Nested: function declared inside another function. @ args = 0, pretend = 0, frame = 1288 @ frame_needed = 0, uses_anonymous_args = 0 .LVL47: push {r4, r5, r6, r7, r8, r9, r10, lr} sub sp, sp, #1800 mov r4, ip ldr r6, .L74 .LPIC41: add r6, pc ldr r3, .L74+4 ldr r3, [r6, r3] ldr r3, [r3] str r3, [sp, #1796] ldr r3, .L89+4 ldr r3, [r4, r3] ldr r2, [sp, #1284] ldr r3, [r3] cmp r2, r3 bne .L88 add sp, sp, #1288 @ sp needed pop {r4, r5, r6, r7, r8, pc} .LVL98: .L87: .LBB335: bl __stack_chk_fail(PLT) .LVL108: .L90: .align 2 .L89: .word _GLOBAL_OFFSET_TABLE_-(.LPIC48+4) .word __stack_chk_guard(GOT) .word _imp_OutStream(GOT) .word _imp_OutFile(GOT) .word _imp_outfile(GOT) .word .LANCHOR3-(.LPIC49+4) .word .LANCHOR0-(.LPIC50+4) .word .LANCHOR3-(.LPIC53+4) .word .LANCHOR0-(.LPIC54+4) .word _imp_current_file(GOT) .word _imp_current_line(GOT) .word .LC81-(.LPIC52+4) .word .LANCHOR3-(.LPIC51+4) .LFE186: .align 1 .thumb .thumb_func DEF.11264: .LFB215: 589 %INTEGER j, ad 590 p = tag(p)_text add r0, ip, r0, lsl #4 .LVL48: ldrsh r3, [r0, #224] .LVL49: 591 %IF p = 0 %START cbnz r3, .L57 592 bp = bp+1 %AND buff(bp) = '?' %if Mode # 0 cbz r1, .L56 593 %RETURN ldr r2, .L74+8 .LPIC42: add r2, pc ldr r3, [r2] .LVL50: adds r1, r3, #1 .LVL51: str r1, [r2] 594 %FINISH add r4, r4, r3 add r4, r4, #104448 movs r3, #63 strb r3, [r4, #262] .LVL52: b .L56 .LVL53: .L57: 595 ad = addr(dict(p+1)) add r3, r3, #13376 .LVL54: adds r3, r3, #42 .LVL55: add r8, ip, r3, lsl #1 mov r5, r8 .LVL56: .LBB321: 596 %IF mode = 0 %THEN printstring(string(ad)) %ELSE %START cbz r1, .L71 .L59: 597 %FOR j = ad+1, 1, ad+byteinteger(ad) %CYCLE 598 bp = bp+1 ldrb r7, [ip, r3, lsl #1] @ zero_extendqisi2 add r7, r7, r8 .LVL57: .LBB322: 599 buff(bp) = byteinteger(j) mvn r3, r8 .LVL58: .LBE322: cmn r3, r7 bmi .L72 .LVL59: .L60: ldrb r3, [r5, #1]! @ zero_extendqisi2 .LVL61: strb r3, [ip], #1 .LVL62: ldr r3, .L74+20 ldr r3, [r6, r3] ldr r1, [r3] .LVL73: cbz r1, .L61 addw r0, sp, #1028 .LVL74: bl _imp_c2istr(PLT) .LVL75: .L62: ldr r3, .L74+24 ldr r3, [r6, r3] ldr r9, [r3] movw r3, #599 cmp r9, #0 it eq moveq r9, r3 ldr r1, .L74+28 .LPIC45: add r1, pc addw r10, sp, #1284 mov r0, r10 bl _imp_c2istr(PLT) .LVL76: movs r3, #0 str r3, [sp, #508] movs r3, #1 str r3, [sp, #504] movs r3, #5 str r3, [sp, #500] mov r2, #256 mov r1, r10 add r0, sp, #244 bl memcpy(PLT) .LVL77: str r9, [sp, #240] movs r2, #240 addw r1, sp, #1044 mov r0, sp bl memcpy(PLT) .LVL78: addw r3, sp, #1028 ldm r3, {r0, r1, r2, r3} bl _signal_event(PLT) .LVL79: b .L60 .LVL80: .L61: .LBB323: mov r10, #256 mov r2, r10 ldr r1, .L74+32 .LPIC44: add r1, pc addw r9, sp, #1540 mov r0, r9 .LVL81: bl memcpy(PLT) .LVL82: mov r2, r10 mov r1, r9 add r9, sp, #772 mov r0, r9 bl memcpy(PLT) .LVL83: .LBE323: mov r2, r10 mov r1, r9 addw r0, sp, #1028 bl memcpy(PLT) .LVL84: b .L62 .LVL85: .L73: .LBE326: 600 %REPEAT 601 %FINISH 602 %END cmp r8, r7 beq .L56 ldr r3, .L74+12 .LPIC46: add r3, pc ldr r2, [r3] add ip, r2, #104448 add ip, ip, #262 add ip, ip, r4 .LVL60: .L64: cmp r7, r5 bne .L64 sub r8, r2, r8 .LVL63: add r5, r5, r8 .LVL64: ldr r3, .L74+16 .LPIC47: add r3, pc str r5, [r3] .L58: .L65: .L66: .LVL65: .L56: .LBE321: 603 %ROUTINE abandon(%INTEGER n) @ Nested: function declared inside another function. @ args = 0, pretend = 0, frame = 1032 @ frame_needed = 0, uses_anonymous_args = 0 .LVL16: push {r4, r5, r6, r7, r8, lr} sub sp, sp, #1304 mov r5, r0 ldr r4, .L45 .LPIC22: add r4, pc ldr r3, .L45+4 ldr r3, [r4, r3] ldr r3, [r3] str r3, [sp, #1300] .LVL17: .LDL2: ldr r3, .L74+4 ldr r3, [r6, r3] ldr r2, [sp, #1796] ldr r3, [r3] cmp r2, r3 bne .L73 add sp, sp, #1800 @ sp needed pop {r4, r5, r6, r7, r8, r9, r10, pc} .LVL66: .L71: mov r2, #256 add r1, sp, #516 .LVL67: addw r4, sp, #1540 .LVL68: mov r0, r4 bl memcpy(PLT) .LVL69: .LBB324: .LBB325: movs r2, #240 addw r1, sp, #1556 mov r0, sp bl memcpy(PLT) .LVL70: ldm r4, {r0, r1, r2, r3} bl _imp_printstring(PLT) .LVL71: b .L56 .LVL72: .L72: .LBE325: .LBE324: .LBB326: bl __stack_chk_fail(PLT) .LVL86: .L75: .align 2 .L74: .word _GLOBAL_OFFSET_TABLE_-(.LPIC41+4) .word __stack_chk_guard(GOT) .word .LANCHOR0-(.LPIC42+4) .word .LANCHOR0-(.LPIC46+4) .word .LANCHOR0-(.LPIC47+4) .word _imp_current_file(GOT) .word _imp_current_line(GOT) .word .LC80-(.LPIC45+4) .word .LANCHOR3-(.LPIC44+4) .LFE187: .align 1 .thumb .thumb_func FLUSHBUFFER.10176: .LFB186: 604 %SWITCH reason(0:9) 605 %INTEGER stream 606 stream = listing 607 %CYCLE 608 newline %IF sym # nl ldr r3, .L45+8 .LPIC23: add r3, pc ldr r3, [r3, #2548] cmp r3, #10 bne .L43 .LVL18: .L30: .LBB308: .LBB309: movs r0, #42 bl _imp_printsymbol(PLT) .LVL19: .LBE309: .LBE308: 609 printsymbol('*'); write(lines,4); space 610 ->reason(n) movs r1, #4 ldr r3, .L45+12 .LPIC24: add r3, pc ldr r0, [r3, #184] bl _imp_writeint(PLT) .LVL20: .LBB310: .LBB311: bl _imp_space(PLT) .LVL21: .LDL3: .LBE311: .LBE310: 611 reason(0):printstring("compiler error!"); ->more 612 reason(1):printstring("switch vector too large"); ->more 613 reason(2):printstring("too many names"); ->more 614 reason(3):printstring("program too complex"); ->more 615 reason(4):printstring("feature not implemented"); ->more 616 reason(5):printstring("input ended: ") 617 %IF quote # 0 %START 618 %IF quote < 0 %THEN printsymbol(cquote) %C 619 %ELSE printsymbol(squote) 620 %ELSE 621 printstring("%endof") 622 %IF progmode >= 0 %THEN printstring("program") %C 623 %ELSE printstring("file") 624 %FINISH 625 printstring(" missing?"); ->more 626 reason(6):printstring("too many faults!"); ->more 627 reason(7):printstring("string constant too long"); ->more 628 reason(8):printstring("dictionary full"); -> more 629 reason(9):printstring("Included file ".include file." does not exist") 630 more: newline 631 printstring("*** compilation abandoned ***"); newline 632 %EXIT %IF stream = report 633 close output 634 stream = report 635 select output(report) 636 %REPEAT 637 !IMP80 BUG??? %SIGNAL 15,15 %IF diag&4096 # 0 638 %STOP 639 %END 640 %ROUTINE op(%INTEGER code, param) @ Nested: function declared inside another function. @ args = 0, pretend = 0, frame = 0 @ frame_needed = 0, uses_anonymous_args = 0 @ link register save eliminated. .LVL0: 641 buff(bp+1) <- code ldr r2, .L2 .LPIC0: add r2, pc ldr r3, [r2] add ip, ip, r3 add ip, ip, #104448 strb r0, [ip, #262] cmp r5, #9 bls .L31 ldr r3, .L45+16 ldr r3, [r4, r3] ldr r1, [r3] cmp r1, #0 beq .L32 add r0, sp, #788 bl _imp_c2istr(PLT) .LVL22: .L33: ldr r3, .L45+20 ldr r3, [r4, r3] ldr r3, [r3] movw r2, #641 cmp r3, #0 it eq moveq r3, r2 movw r2, #610 str r2, [sp, #268] ldr r2, .L45+24 .LPIC26: add r2, pc str r2, [sp, #264] str r5, [sp, #260] ldr r2, .L45+28 .LPIC27: add r2, pc str r2, [sp, #256] str r5, [sp, #252] movs r2, #3 str r2, [sp, #248] movs r2, #6 str r2, [sp, #244] str r3, [sp, #240] movs r2, #240 add r1, sp, #804 mov r0, sp bl memcpy(PLT) .LVL23: add r3, sp, #788 ldm r3, {r0, r1, r2, r3} bl _signal_eventf(PLT) .LVL24: .L31: .L35: mov r7, #256 mov r2, r7 ldr r1, .L45+40 .LPIC25: add r1, pc addw r6, sp, #1044 mov r0, r6 bl memcpy(PLT) .LVL31: mov r2, r7 mov r1, r6 add r6, sp, #276 mov r0, r6 bl memcpy(PLT) .LVL32: .LBE314: mov r2, r7 mov r1, r6 add r0, sp, #788 bl memcpy(PLT) .LVL33: b .L33 .L36: .LBB315: 642 buff(bp+2) <- param>>8 lsrs r0, r1, #8 .LVL1: strb r0, [ip, #263] 643 buff(bp+3) <- param strb r1, [ip, #264] 644 bp = bp+3 adds r3, r3, #3 str r3, [r2] ldr r3, .L45+16 ldr r3, [r4, r3] ldr r1, [r3] cmp r1, #0 beq .L36 addw r0, sp, #1044 bl _imp_c2istr(PLT) .LVL25: .L37: ldr r3, .L45+20 ldr r3, [r4, r3] ldr r3, [r3] cmp r3, #0 it eq moveq r3, #644 movw r2, #610 str r2, [sp, #268] ldr r2, .L45+32 .LPIC30: add r2, pc str r2, [sp, #264] str r5, [sp, #260] ldr r2, .L45+36 .LPIC31: add r2, pc str r2, [sp, #256] str r5, [sp, #252] movs r2, #2 str r2, [sp, #248] movs r2, #8 str r2, [sp, #244] str r3, [sp, #240] movs r2, #240 addw r1, sp, #1060 mov r0, sp bl memcpy(PLT) .LVL26: addw r3, sp, #1044 ldm r3, {r0, r1, r2, r3} bl _signal_eventf(PLT) .LVL27: mov r8, #256 mov r2, r8 ldr r1, .L45+44 .LPIC29: add r1, pc addw r6, sp, #1044 mov r0, r6 bl memcpy(PLT) .LVL34: mov r2, r8 mov r1, r6 add r7, sp, #532 mov r0, r7 bl memcpy(PLT) .LVL35: .LBE315: mov r2, r8 mov r1, r7 mov r0, r6 bl memcpy(PLT) .LVL36: b .L37 .L44: 645 %END ldr r3, .L45+4 ldr r3, [r4, r3] ldr r2, [sp, #1300] ldr r3, [r3] cmp r2, r3 bne .L44 add sp, sp, #1304 @ sp needed pop {r4, r5, r6, r7, r8, pc} .LVL28: .L43: .LBB312: .LBB313: bl _imp_newline(PLT) .LVL29: b .L30 .LVL30: .L32: .LBE313: .LBE312: .LBB314: bl __stack_chk_fail(PLT) .LVL37: .L46: .align 2 .L45: .word _GLOBAL_OFFSET_TABLE_-(.LPIC22+4) .word __stack_chk_guard(GOT) .word .LANCHOR2-(.LPIC23+4) .word .LANCHOR0-(.LPIC24+4) .word _imp_current_file(GOT) .word _imp_current_line(GOT) .word .LC77-(.LPIC26+4) .word .LC78-(.LPIC27+4) .word .LC77-(.LPIC30+4) .word .LC79-(.LPIC31+4) .word .LANCHOR3-(.LPIC25+4) .word .LANCHOR3-(.LPIC29+4) .LFE188: .align 1 .thumb .thumb_func SHOW.10574: .LFB200: 646 %ROUTINE set const(%INTEGER m) bx lr .L3: .align 2 .L2: .word .LANCHOR0-(.LPIC0+4) .LFE189: .align 1 .thumb .thumb_func SETCONST.10285: .LFB190: @ Nested: function declared inside another function. @ args = 0, pretend = 0, frame = 0 @ frame_needed = 0, uses_anonymous_args = 0 @ link register save eliminated. .LVL2: 647 buff(bp+1) <- 'N' ldr r2, .L5 .LPIC2: add r2, pc ldr r3, [r2] add ip, ip, r3 add ip, ip, #104448 movs r1, #78 strb r1, [ip, #262] 648 buff(bp+5) <- m; m = m>>8 strb r0, [ip, #266] .LVL3: 649 buff(bp+4) <- m; m = m>>8 lsrs r1, r0, #8 .LVL4: strb r1, [ip, #265] .LVL5: 650 buff(bp+3) <- m; m = m>>8 lsrs r1, r0, #16 .LVL6: strb r1, [ip, #264] .LVL7: 651 buff(bp+2) <- m lsrs r0, r0, #24 .LVL8: strb r0, [ip, #263] 652 bp = bp+5 adds r3, r3, #5 str r3, [r2] 653 %END 654 bx lr .L6: .align 2 .L5: .word .LANCHOR0-(.LPIC2+4) .LFE190: .align 1 .thumb .thumb_func SETCELL.10498: .LFB195: 655 656 657 %ROUTINE compile block(%INTEGER level, block tag, dmin, tmax, id) @ Nested: function declared inside another function. @ args = 4, pretend = 0, frame = 1648 @ frame_needed = 0, uses_anonymous_args = 0 push {r4, r5, r6, r7, r8, r9, r10, fp, lr} subw sp, sp, #1892 mov r6, ip ldr r10, .L983 .LPIC900: add r10, pc ldr r4, .L983+4 ldr r4, [r10, r4] ldr r4, [r4] str r4, [sp, #1884] add r4, sp, #276 add r5, sp, #1928 str r5, [r4, #68] str r0, [r4, #48] str r1, [r4, #12] str r3, [r4, #52] ldr r0, [sp, #1928] str r0, [r4, #44] str ip, [r4, #64] 658 659 %INTEGERFNSPEC gapp 660 %ROUTINESPEC delete names(%INTEGER quiet) 661 %ROUTINESPEC analyse 662 %ROUTINESPEC compile 663 664 %INTEGER open; open = closed; !zero if can return from proc 665 %INTEGER dbase; dbase = dmax; !dictionary base mov r0, #16384 str r0, [r4, #20] 666 %INTEGER tbase; tbase = tmax; !tag base ldr r0, .L983+8 .LPIC901: add r0, pc ldr r0, [r0, #2556] .LVL927: 667 %INTEGER tstart; tstart = tmax str r3, [r4, #56] 668 %INTEGER label; label = 4; !first internal label str r3, [r4, #60] 669 %INTEGER access; access = 1; !non-zero if accessible movs r3, #4 str r3, [r4, #8] 670 %INTEGER inhibit; inhibit = 0; !non-zero inhibits declaratons movs r3, #1 str r3, [r4, #24] 671 movs r3, #0 str r3, [r4, #4] lsls r1, r1, #4 672 %SHORTINTEGERNAME bflags; bflags == tag(block tag)_flags 673 %INTEGER block type; block type = bflags>>4&7 add r3, r1, #220 add r3, r3, ip str r3, [r4, #16] 674 %INTEGER block form; block form = bflags&15 add r8, ip, r1 ldrsh r3, [r8, #220] ubfx r1, r3, #4, #3 str r1, [r4, #32] 675 %INTEGER block fm; block fm = tag(block tag)_format and r3, r3, #15 str r3, [r4, #36] 676 %INTEGER block otype; block otype = otype ldr r3, [r8, #216] str r3, [r4, #28] 677 %INTEGERNAME block app; block app == tag(block tag)_app ldr r3, .L983+12 .LPIC902: add r3, pc ldr r5, [r3, #188] .LVL928: 678 679 %INTEGER l, new app 680 681 %ROUTINE fault(%INTEGER n) @ Nested: function declared inside another function. @ args = 0, pretend = 0, frame = 2080 @ frame_needed = 0, uses_anonymous_args = 0 .LVL364: push {r4, r5, r6, r7, r8, r9, r10, fp, lr} subw sp, sp, #2356 mov r9, r0 str ip, [sp, #292] ldr fp, .L443 .LPIC356: add fp, pc ldr r3, .L443+4 ldr r3, [fp, r3] ldr r3, [r3] str r3, [sp, #2348] 682 683 ! -5 : -1 - warnings 684 ! 1 : 22 - errors 685 686 %SWITCH fm(-5:22) 687 %INTEGER st 688 689 %ROUTINE print ss 690 %INTEGER s, p 691 %RETURN %IF pos = 0 ldr r3, .L443+60 .LPIC372: add r3, pc ldr r3, [r3, #260] cmp r3, #0 bne .L436 .L406: .LDL20: .LBE458: .LBE457: .LBB466: .LBB467: bl _imp_newline(PLT) .LVL379: .LBE467: .LBE466: 692 space 693 p = 1 movs r4, #1 694 %CYCLE 695 printsymbol(marker) %IF p = pos1 ldr r8, .L443+96 .LPIC374: add r8, pc ldr r3, [r8, #296] cmp r3, r4 beq .L441 .L409: 696 %EXIT %IF p = pos ldr r7, .L443+100 .LPIC375: add r7, pc b .L408 .LVL402: .L441: .LBB461: .LBB462: movs r0, #94 bl _imp_printsymbol(PLT) .LVL403: b .L409 .L413: .L414: .LVL404: .L415: .LBE462: .LBE461: .LBB463: .LBB464: bl _imp_printsymbol(PLT) .LVL405: .L408: .LBE464: .LBE463: ldr r3, [r7, #260] cmp r4, r3 beq .L416 .L411: 697 s = char(p); p = p+1 ldrb r0, [r5, #1]! @ zero_extendqisi2 .LVL406: 698 %EXIT %IF s = nl %OR (s='%' %AND p = pos) adds r4, r4, #1 .LVL407: cmp r0, #10 beq .L416 699 %IF s < ' ' %START; !beware of tabs cmp r0, #31 bgt .L415 700 %IF s = ff %THEN s = nl %ELSE s = ' ' cmp r0, #37 it eq cmpeq r3, r4 beq .L416 .L412: 701 %FINISH 702 printsymbol(s) 703 %REPEAT 704 pos = 0 %IF list <= 0 cmp r0, #12 ite eq moveq r0, #10 .LVL408: movne r0, #32 b .L415 .L410: .LVL409: .L416: ldr r3, .L443+104 .LPIC376: add r3, pc ldr r3, [r3, #2832] cmp r3, #0 bgt .L406 705 %END ldr r3, .L443+108 .LPIC377: add r3, pc movs r2, #0 str r2, [r3, #260] b .L406 .LVL410: .L437: ldr fp, [sp, #284] .L418: .LBE465: .LBE478: 706 707 pos1 = pos2 %IF pos2 > pos1 ldr r3, .L443+8 .LPIC357: add r3, pc ldr r2, [r3, #256] ldr r3, [r3, #296] cmp r2, r3 ble .L396 708 newline %IF sym # nl ldr r3, .L443+12 .LPIC359: add r3, pc str r2, [r3, #296] .L396: ldr r3, .L443+16 .LPIC360: add r3, pc ldr r3, [r3, #2548] cmp r3, #10 bne .L433 .LVL365: .L397: 709 st = report 710 st = listing %IF n = -3; !dont report unused on the console 711 %cycle cmn r9, #3 ite ne movne r6, #0 moveq r6, #2 .LBB441: .LBB442: ldr r3, .L443+20 ldr r3, [fp, r3] str r3, [sp, #276] ldr r3, .L443+24 ldr r2, [fp, r3] ldr r3, .L443+28 ldr r10, [fp, r3] ldr r3, .L443+32 .LPIC361: add r3, pc add r3, r3, #256 str r3, [sp, #280] .LBE442: .LBE441: .LBB444: 712 SELECT OUTPUT(st) 713 %if n < 0 %then printsymbol('?') %and pos1 = 0 %else printsymbol('*') cmp r9, #0 blt .L438 .L399: .LVL382: .LBB469: .LBB470: movs r0, #42 bl _imp_printsymbol(PLT) .LVL383: .L400: .LBE470: .LBE469: 714 %if st # report %start cmp r6, #0 beq .L401 715 %if list <= 0 %and pos1 # 0 %start ldr r3, .L443+40 .LPIC362: add r3, pc movs r2, #0 str r2, [r3, #296] ldr r3, .L443+64 .LPIC363: add r3, pc ldr r3, [r3, #2832] cmp r3, #0 bgt .L404 716 spaces(pos1+margin); PRINTSTRING(" ! ") b .L400 .L401: ldr r3, .L443+68 .LPIC364: add r3, pc ldr r3, [r3, #296] cmp r3, #0 beq .L404 .LVL384: ldr r2, .L443+72 .LPIC365: add r2, pc ldr r0, [r2, #300] .LBB471: .LBB472: add r0, r0, r3 .LVL385: bl _imp_spaces(PLT) .LVL386: .LBE472: .LBE471: .LBB473: 717 %finish ldr r3, .L443+36 .LPIC366: add r3, pc add r3, r3, #916 str r3, [sp, #288] str fp, [sp, #284] mov fp, r2 b .L417 .LVL366: .L433: .LBE444: .LBB445: .LBB446: bl _imp_newline(PLT) .LVL367: b .L397 .LVL368: .L438: .LBE446: .LBE445: .LBB447: .LBB448: movs r0, #63 bl _imp_printsymbol(PLT) .LVL369: .LBE448: .LBE447: mov r5, #256 mov r2, r5 ldr r1, [sp, #288] addw r4, sp, #1324 mov r0, r4 bl memcpy(PLT) .LVL387: mov r2, r5 mov r1, r4 add r4, sp, #300 mov r0, r4 bl memcpy(PLT) .LVL388: mov r2, r5 mov r1, r4 addw r4, sp, #1580 mov r0, r4 bl memcpy(PLT) .LVL389: .LBE473: .LBB474: .LBB475: movs r2, #240 addw r1, sp, #1596 mov r0, sp bl memcpy(PLT) .LVL390: ldm r4, {r0, r1, r2, r3} bl _imp_printstring(PLT) .LVL391: b .L404 .L434: mov r2, #256 add r1, sp, #556 addw r4, sp, #1836 mov r0, r4 bl memcpy(PLT) .LVL392: .LBE475: .LBE474: .LBB476: .LBB477: movs r2, #240 addw r1, sp, #1852 mov r0, sp bl memcpy(PLT) .LVL393: ldm r4, {r0, r1, r2, r3} bl _imp_printstring(PLT) .LVL394: b .L403 .LVL395: .L435: ldr fp, [sp, #284] .LVL396: .LDL21: .L422: .LBE477: .LBE476: 718 %finish %else %start 719 PRINTSTRING(include file) %if include # 0 ldr r3, .L443+44 .LPIC367: add r3, pc ldr r3, [r3, #308] cmp r3, #0 bne .L434 .L403: 720 write(lines, 4); printsymbol(csym); space movs r1, #4 ldr r3, .L443+48 .LPIC368: add r3, pc ldr r0, [r3, #184] bl _imp_writeint(PLT) .LVL370: .LBB449: .LBB450: ldr r3, .L443+52 .LPIC369: add r3, pc ldrb r0, [r3, #2840] @ zero_extendqisi2 bl _imp_printsymbol(PLT) .LVL371: .LBE450: .LBE449: .LBB451: .LBB452: bl _imp_space(PLT) .LVL372: .L402: .L404: .LBE452: .LBE451: .LBB453: 721 %finish 722 ->fm(n) %if -5 <= n <= 22 723 PRINTSTRING("fault"); write(n, 2); ->ps mov r5, #256 mov r2, r5 ldr r1, .L443+56 .LPIC371: add r1, pc addw r1, r1, #1172 addw r4, sp, #1324 mov r0, r4 bl memcpy(PLT) .LVL373: mov r2, r5 mov r1, r4 add r4, sp, #812 mov r0, r4 bl memcpy(PLT) .LVL374: mov r2, r5 mov r1, r4 addw r4, sp, #2092 mov r0, r4 bl memcpy(PLT) .LVL375: .LBE454: .LBB455: .LBB456: movs r2, #240 addw r1, sp, #2108 mov r0, sp bl memcpy(PLT) .LVL376: ldm r4, {r0, r1, r2, r3} bl _imp_printstring(PLT) .LVL377: .LBE456: .LBE455: 724 movs r1, #2 mov r0, r9 bl _imp_writeint(PLT) .LVL378: .LDL19: .LBB457: .LBB458: 725 fm(-5):PRINTSTRING("Dubious statement"); dubious = 0; ->psd 726 fm(-4):PRINTSTRING("Non-local") 727 pos1 = for warn; for warn = 0; ->ps add r3, r9, #5 cmp r3, #27 bls .L435 .L405: .LBE453: .LBB454: 728 fm(-3):print ident(x, 0); PRINTSTRING(" unused"); ->nps 729 fm(-2):PRINTSTRING("""}"""); ->miss 730 fm(-1):PRINTSTRING("access"); ->psd 731 732 fm(0): PRINTSTRING("form"); ->ps 733 fm(1): PRINTSTRING("atom"); ->ps 734 fm(2): PRINTSTRING("not declared"); ->ps 735 fm(3): PRINTSTRING("too complex"); ->ps 736 fm(4): PRINTSTRING("duplicate "); Print Ident(x, 0); ->ps 737 fm(5): PRINTSTRING("type"); ->ps 738 fm(6): PRINTSTRING("match"); ->psd 739 fm(7): PRINTSTRING("context"); ->psd 740 fm(21):PRINTSTRING("context "); print ident(this, 0); ->ps 741 fm(8): PRINTSTRING("%cycle"); ->miss 742 fm(9): PRINTSTRING("%start"); ->miss 743 fm(10):PRINTSTRING("size"); WRITE(lit, 1) %if pos1 = 0;->ps 744 fm(11):PRINTSTRING("bounds") 745 WRITE(ocount, 1) %unless ocount < 0; ->ps 746 fm(12):PRINTSTRING("index"); ->ps 747 fm(13):PRINTSTRING("order"); ->psd 748 fm(14):PRINTSTRING("not a location"); ->ps 749 fm(15):PRINTSTRING("%begin"); ->miss 750 fm(16):PRINTSTRING("%end"); ->miss 751 fm(17):PRINTSTRING("%repeat"); ->miss 752 fm(18):PRINTSTRING("%finish"); ->miss 753 fm(19):PRINTSTRING("result"); ->miss 754 fm(22):PRINTSTRING("format"); ->ps 755 fm(20):printsymbol('"'); print ident(x, 0); printsymbol('"') 756 miss: PRINTSTRING(" missing"); ->nps 757 psd: pos1 = 0 758 ps: print ss 759 nps: NEWLINE 760 %exit %if st = listing cmp r6, #0 bne .L437 761 st = listing movs r6, #2 .LVL380: .L417: .LBB468: .LBB443: ldr r3, [sp, #276] str r6, [r3] mov r3, #276 mla r3, r3, r6, r10 ldr r3, [r3, #4] str r3, [fp] ldr r0, [sp, #280] bl check_outstream(PLT) .LVL381: .LBE443: .LBE468: 762 %repeat 763 %if n >= 0 %start cmp r9, #0 bge .L442 .L419: .L420: 764 !IMP80 BUG??? %signal 15,15 %if diag&4096 # 0 765 %stop %if diag&4096 # 0 766 %if n # 13 %start; !order is fairly safe 767 ocount = -1 768 gg = 0 769 copy = 0; quote = 0 770 search base = 0; escape class = 0 771 gg = 0 772 %finish 773 faulty = faulty+1 774 775 !check that there havent been too many faults 776 777 fault rate = fault rate+3; abandon(6) %IF fault rate > 30 778 fault rate = 3 %IF fault rate <= 0 779 %FINISH 780 tbase = tstart ldr r2, [sp, #292] ldr r3, [r2, #60] str r3, [r2, #56] 781 %IF list <= 0 %AND sym # nl %START ldr r3, .L443+112 .LPIC378: add r3, pc ldr r3, [r3, #2832] cmp r3, #0 bgt .L395 782 error margin = column ldr r3, .L443+116 .LPIC379: add r3, pc ldr r2, [r3, #2548] cmp r2, #10 beq .L395 ldr r3, .L443+120 .LPIC380: add r3, pc ldr r1, [r3, #288] str r1, [r3, #312] 783 error sym = sym; sym = nl str r2, [r3, #316] 784 %FINISH ldr r3, .L443+124 .LPIC383: add r3, pc movs r2, #10 str r2, [r3, #2548] b .L395 .L442: .LVL411: .LBB479: .LBB480: movs r0, #0 bl exit(PLT) .LVL412: .L439: .LBE480: .LBE479: .LBB481: 785 %END 786 787 dmin = dmin-1; dict(dmin) = -1; !end marker for starts & cycles subs r1, r2, #1 str r1, [r4, #40] 788 abandon(2) %IF dmax = dmin add r3, r2, #13376 adds r3, r3, #38 add r3, ip, r3, lsl #1 movw r2, #65535 strh r2, [r3, #4] @ movhi cmp r0, r1 beq .L973 .LVL929: .L935: 789 movs r0, #2 .LVL932: bl ABANDON.10208(PLT) .LVL933: b .L935 .L974: 790 %IF list > 0 %AND level > 0 %START ldr r3, .L983+16 .LPIC903: add r3, pc ldr r3, [r3, #2832] cmp r3, #0 ble .L936 791 write(lines, 5); spaces(level*3-1) ldr r3, .L443+76 ldr r3, [fp, r3] ldr r1, [r3] cmp r1, #0 beq .L439 addw r0, sp, #1324 bl _imp_c2istr(PLT) .LVL397: .L424: ldr r3, .L443+80 ldr r3, [fp, r3] ldr r3, [r3] movw r2, #791 cmp r3, #0 it eq moveq r3, r2 movw r2, #729 str r2, [sp, #268] ldr r2, .L443+84 .LPIC385: add r2, pc str r2, [sp, #264] str r9, [sp, #260] ldr r2, .L443+88 .LPIC386: add r2, pc str r2, [sp, #256] str r9, [sp, #252] movs r2, #2 str r2, [sp, #248] movs r2, #8 str r2, [sp, #244] str r3, [sp, #240] movs r2, #240 addw r1, sp, #1340 mov r0, sp bl memcpy(PLT) .LVL398: addw r3, sp, #1324 ldm r3, {r0, r1, r2, r3} bl _signal_eventf(PLT) .LVL399: .L421: .L395: mov r6, #256 .LVL413: mov r2, r6 ldr r1, .L443+128 .LPIC384: add r1, pc addw r4, sp, #1324 mov r0, r4 bl memcpy(PLT) .LVL414: mov r2, r6 mov r1, r4 addw r5, sp, #1068 mov r0, r5 bl memcpy(PLT) .LVL415: .LBE481: mov r2, r6 mov r1, r5 mov r0, r4 bl memcpy(PLT) .LVL416: b .L424 .LVL417: .L440: ldr r3, [sp, #324] cmp r3, #0 bgt .L974 .L936: movs r1, #5 ldr r3, .L983+32 .LPIC904: add r3, pc ldr r0, [r3, #184] bl _imp_writeint(PLT) .LVL934: 792 %IF block tag = 0 %START ldr r3, .L443+4 ldr r3, [fp, r3] ldr r2, [sp, #2348] ldr r3, [r3] cmp r2, r3 bne .L440 addw sp, sp, #2356 @ sp needed pop {r4, r5, r6, r7, r8, r9, r10, fp, pc} .LVL400: .L436: .L407: .LBB478: .LBB465: .LBB459: .LBB460: bl _imp_space(PLT) .LVL401: ldr r5, .L443+92 .LPIC373: add r5, pc addw r5, r5, #2696 .LBE460: .LBE459: bl __stack_chk_fail(PLT) .LVL418: .L444: .align 2 .L443: .word _GLOBAL_OFFSET_TABLE_-(.LPIC356+4) .word __stack_chk_guard(GOT) .word .LANCHOR0-(.LPIC357+4) .word .LANCHOR0-(.LPIC359+4) .word .LANCHOR2-(.LPIC360+4) .word _imp_OutStream(GOT) .word _imp_OutFile(GOT) .word _imp_outfile(GOT) .word .LANCHOR3-(.LPIC361+4) .word .LANCHOR3-(.LPIC366+4) .word .LANCHOR0-(.LPIC362+4) .word .LANCHOR0-(.LPIC367+4) .word .LANCHOR0-(.LPIC368+4) .word .LANCHOR2-(.LPIC369+4) .word .LANCHOR3-(.LPIC371+4) .word .LANCHOR0-(.LPIC372+4) .word .LANCHOR2-(.LPIC363+4) .word .LANCHOR0-(.LPIC364+4) .word .LANCHOR0-(.LPIC365+4) .word _imp_current_file(GOT) .word _imp_current_line(GOT) .word .LC77-(.LPIC385+4) .word .LC82-(.LPIC386+4) .word .LANCHOR2-(.LPIC373+4) .word .LANCHOR0-(.LPIC374+4) .word .LANCHOR0-(.LPIC375+4) .word .LANCHOR2-(.LPIC376+4) .word .LANCHOR0-(.LPIC377+4) .word .LANCHOR2-(.LPIC378+4) .word .LANCHOR2-(.LPIC379+4) .word .LANCHOR0-(.LPIC380+4) .word .LANCHOR2-(.LPIC383+4) .word .LANCHOR3-(.LPIC384+4) .LFE192: .align 1 .thumb .thumb_func POPLABEL.11372: .LFB221: add r4, sp, #276 ldr r0, [sp, #324] add r0, r0, r0, lsl #1 .LBB708: .LBB709: subs r0, r0, #1 bl _imp_spaces(PLT) .LVL935: .LBE709: .LBE708: ldr r3, [r4, #12] cbnz r3, .L937 .LBB710: 793 printstring("Begin") mov r7, #256 mov r2, r7 ldr r1, .L983+36 .LPIC905: add r1, pc subs r1, r1, #16 addw r4, sp, #1628 mov r0, r4 bl memcpy(PLT) .LVL936: mov r2, r7 mov r1, r4 add r4, sp, #348 mov r0, r4 bl memcpy(PLT) .LVL937: mov r2, r7 mov r1, r4 addw r4, sp, #1116 mov r0, r4 bl memcpy(PLT) .LVL938: .LBE710: .LBB711: .LBB712: movs r2, #240 addw r1, sp, #1132 mov r0, sp bl memcpy(PLT) .LVL939: ldm r4, {r0, r1, r2, r3} bl _imp_printstring(PLT) .LVL940: .L938: .LBE712: .LBE711: .LBB713: .LBB714: bl _imp_newline(PLT) .LVL941: b .L936 .L937: .LBE714: .LBE713: .LBB715: 794 %FINISH %ELSE %START 795 printstring("Procedure "); print ident(block tag, 0) mov r7, #256 mov r2, r7 ldr r1, .L983+40 .LPIC906: add r1, pc adds r1, r1, #240 addw r4, sp, #1628 mov r0, r4 bl memcpy(PLT) .LVL942: mov r2, r7 mov r1, r4 add r4, sp, #604 mov r0, r4 bl memcpy(PLT) .LVL943: mov r2, r7 mov r1, r4 addw r4, sp, #1372 mov r0, r4 bl memcpy(PLT) .LVL944: .LBE715: .LBB716: .LBB717: movs r2, #240 addw r1, sp, #1388 mov r0, sp bl memcpy(PLT) .LVL945: ldm r4, {r0, r1, r2, r3} bl _imp_printstring(PLT) .LVL946: .LBE717: .LBE716: 796 %FINISH mov ip, r6 movs r1, #0 ldr r0, [sp, #288] bl PRINTIDENT.10189(PLT) .LVL947: b .L938 .L975: 797 newline 798 %FINISH 799 800 !deal with procedure definition (parameters) 801 802 %IF block tag # 0 %START; !proc ldr r3, [sp, #288] cmp r3, #0 bne .L975 .L939: 803 analyse; compile %IF ss # 0 add ip, sp, #276 bl ANALYSE.10299(PLT) .LVL948: 804 ldr r3, .L983+44 .LPIC907: add r3, pc ldr r3, [r3, #624] cbnz r3, .L976 .L940: 805 %IF block otype # 0 %START; !external-ish cbz r5, .L944 add ip, sp, #276 bl COMPILE.10301(PLT) .LVL952: b .L940 .L977: 806 %IF bflags&spec = 0 %START; !definition ldr r3, [sp, #292] ldrh r3, [r3] tst r3, #1 bne .L944 807 %IF progmode <= 0 %AND level = 1 %THEN progmode = -1 %C ldr r3, .L983+48 .LPIC908: add r3, pc ldr r3, [r3, #644] cmp r3, #0 bgt .L942 808 %ELSE fault(7) ldr r3, [sp, #324] cmp r3, #1 beq .L977 .L942: 809 %FINISH ldr r3, .L983+60 .LPIC909: add r3, pc mov r2, #-1 str r2, [r3, #644] 810 %FINISH b .L944 .LVL953: .L950: .LBB726: .LBB724: 811 812 new app = gapp; !generate app grammar add ip, sp, #276 movs r0, #7 bl FAULT.10318(PLT) .LVL949: .L941: .L943: .L944: .LBB718: .LBB719: 813 %IF spec given # 0 %START; !definition after spec ldr r3, .L983+72 .LPIC914: add r3, pc ldr r3, [r3, #268] cbz r3, .L955 814 fault(6) %IF new app # block app; !different from spec ldr r3, [r8, #212] cmp r3, r4 beq .L955 815 %FINISH add ip, sp, #276 movs r0, #6 bl FAULT.10318(PLT) .LVL968: .L954: .L955: 816 block app = new app; !use the latest str r4, [r8, #212] 817 818 %IF level < 0 %START; !not procedure definition ldr r3, [sp, #324] cmp r3, #0 bge .L956 819 delete names(0) add ip, sp, #276 movs r0, #0 bl DELETENAMES.10297(PLT) .LVL969: 820 %RETURN b .L934 .L978: .LBB727: .LBB725: 821 %FINISH 822 %FINISH %ELSE %START 823 open = 0; !can return from a block? movs r2, #0 str r2, [sp, #296] .LVL930: .L956: 824 %FINISH 825 826 %CYCLE 827 analyse mov ip, r4 bl ANALYSE.10299(PLT) .LVL972: add r4, sp, #276 b .L958 .L963: 828 %CONTINUE %IF ss = 0 ldr r5, .L983+20 .LPIC915: add r5, pc ldr r3, [r5, #624] cmp r3, #0 beq .L958 .L959: 829 compile mov ip, r4 bl COMPILE.10301(PLT) .LVL973: 830 fault(-5) %IF dubious # 0 ldr r8, .L983+24 .LPIC916: add r8, pc ldr r3, [r8, #636] cmp r3, #0 bne .L980 .L960: 831 flush buffer %IF bp >= 128 ldr r7, .L983+28 .LPIC917: add r7, pc b .L965 .LVL931: .L973: mov ip, r4 mvn r0, #4 bl FAULT.10318(PLT) .LVL971: b .L960 .L961: ldr r3, [r7] cmp r3, #127 ble .L961 832 %IF sstype > 0 %START; !block in or out ldr r3, .L983+76 .LPIC918: add r3, pc ldr r3, [r3, #620] cmp r3, #0 bgt .L979 .L958: mov ip, r6 bl FLUSHBUFFER.10176(PLT) .LVL974: b .L961 .L979: 833 %EXIT %IF sstype = 2; !out cmp r3, #2 beq .L963 .L964: 834 compile block(spec mode, block x, dmin, tmax, id) ldr lr, [sp, #328] ldr r2, [sp, #316] ldr r4, .L983+80 .LPIC919: add r4, pc ldr r1, [r4, #648] ldr r0, [r4, #632] ldr r3, [sp, #320] str r3, [sp] mov ip, r6 mov r3, lr bl COMPILEBLOCK.10292(PLT) .LVL975: 835 %EXIT %IF ss < 0; !endofprogram ldr r3, [r4, #624] cmp r3, #0 blt .L963 .L965: 836 %FINISH 837 %REPEAT 838 %IF list > 0 %AND level > 0 %START ldr r3, .L983+84 .LPIC922: add r3, pc ldr r3, [r3, #2832] cmp r3, #0 ble .L966 839 write(lines, 5); spaces(level*3-1) ldr r3, [sp, #324] cmp r3, #0 bgt .L981 .L966: movs r1, #5 ldr r3, .L983+88 .LPIC923: add r3, pc ldr r0, [r3, #184] bl _imp_writeint(PLT) .LVL977: 840 printstring("End") ldr r0, [sp, #324] add r0, r0, r0, lsl #1 .LBB728: .LBB729: subs r0, r0, #1 bl _imp_spaces(PLT) .LVL978: .LBE729: .LBE728: .LBB730: mov r6, #256 mov r2, r6 ldr r1, .L983+92 .LPIC924: add r1, pc add r1, r1, #560 addw r4, sp, #1628 mov r0, r4 bl memcpy(PLT) .LVL979: mov r2, r6 mov r1, r4 add r5, sp, #860 mov r0, r5 bl memcpy(PLT) .LVL980: mov r2, r6 mov r1, r5 mov r0, r4 bl memcpy(PLT) .LVL981: .LBE730: .LBB731: .LBB732: movs r2, #240 addw r1, sp, #1644 mov r0, sp bl memcpy(PLT) .LVL982: ldm r4, {r0, r1, r2, r3} bl _imp_printstring(PLT) .LVL983: .LBE732: .LBE731: .LBB733: .LBB734: bl _imp_newline(PLT) .LVL984: b .L966 .L982: .LBE734: .LBE733: 841 newline 842 %FINISH 843 delete names(0) add ip, sp, #276 movs r0, #0 bl DELETENAMES.10297(PLT) .LVL976: .L934: 844 %RETURN 845 846 %INTEGERFN gapp; !generate app grammar (backwards) add r2, sp, #1928 str r2, [sp, #272] 847 %CONSTINTEGER comma = 140; !psep 848 %ROUTINESPEC set cell(%INTEGER g, tt) 849 %ROUTINESPEC class(%RECORD(tagfm)%NAME v) 850 %RECORD(tagfm)%NAME v 851 %INTEGER p, link, tp, c, ap, t 852 853 %RESULT = 0 %IF tmax = local; !no app needed ldr r3, .L983+52 .LPIC910: add r3, pc ldr fp, [r3, #344] ldr ip, [sp, #328] cmp fp, ip beq .L945 .L946: 854 it eq moveq r4, #0 855 p = gmax1; link = 0; t = tmax movw r2, #719 str r2, [sp, #268] 856 movs r2, #0 str r2, [sp, #264] .LVL950: .LBB720: .LBB721: 857 %CYCLE 858 v == tag(t); t = t-1 ldr lr, [sp, #340] .LVL957: 859 class(v); !deduce class from tag mov ip, r6 .LVL956: .L947: add r6, ip, #-1 .LVL958: .LBB723: .LBB722: 860 %IF c < 0 %START; !insert %PARAM ldr r3, [r7] cmp r3, #0 bge .L950 861 c = -c negs r3, r3 str r3, [r7] 862 set cell(196, tp) mov ip, r7 .LVL965: ldr r1, [r7, #4] movs r0, #196 bl SETCELL.10498(PLT) .LVL966: 863 tp = -1 mov r3, #-1 str r3, [r7, #4] b .L950 .L951: ldr r6, [sp, #240] .LVL967: ldr r10, [sp, #244] 864 %FINISH 865 set cell(c, tp) mov ip, r7 ldr r1, [r7, #4] ldr r0, [r7] bl SETCELL.10498(PLT) .LVL954: 866 %EXIT %IF t = local; !end of parameters cmp fp, r6 beq .L951 .L952: 867 set cell(comma, -1); !add the separating comma mov ip, r7 mov r1, #-1 movs r0, #140 bl SETCELL.10498(PLT) .LVL955: 868 %REPEAT 869 abandon(3) %IF gmax > gmin ldr r3, .L983+64 .LPIC912: add r3, pc ldr r2, [r3] ldr r3, .L983+68 .LPIC913: add r3, pc ldr r3, [r3, #2692] cmp r2, r3 bgt .L978 .L953: 870 ldr ip, [sp, #340] movs r0, #3 bl ABANDON.10208(PLT) .LVL970: b .L953 .L980: .LBE725: .LBE727: 871 %RESULT = link ldr r4, [sp, #264] .L945: .LBE724: .LBE726: 872 873 %ROUTINE set cell(%INTEGER g, tt) @ Nested: function declared inside another function. @ args = 0, pretend = 0, frame = 0 @ frame_needed = 0, uses_anonymous_args = 0 .LVL9: push {r4, r5, r6, r7, r8, r9, lr} 874 875 !add the cell to the grammar, combining common tails 876 877 %WHILE p # gmax %CYCLE 878 p = p+1 ldr r3, .L15 .LPIC4: add r3, pc ldr r5, [r3] ldr r3, [ip, #16] cmp r5, r3 beq .L8 adds r2, r3, #1 str r2, [ip, #16] 879 %IF glink(p) = link %AND gram(p) = g %START ldr r6, .L15+4 .LPIC5: add r6, pc add r4, r6, r2, lsl #1 ldrsh r9, [r4, #4] ldr r4, [ip, #12] cmp r9, r4 bne .L13 880 %IF tt < 0 %OR (gram(p+1) = tt %AND glink(p+1)=ap) %START ldr r7, .L15+8 .LPIC6: add r7, pc add r4, r7, r2, lsl #1 ldrsh r4, [r4, #3448] cmp r4, r0 bne .L13 cmp r1, #0 blt .L10 881 link = p; !already there ldr lr, .L15+12 .LPIC7: add lr, pc adds r3, r3, #2 add r4, lr, r3, lsl #1 ldrsh r4, [r4, #3448] cmp r4, r1 bne .L13 add r3, r8, r3, lsl #1 ldrsh r4, [r3, #4] ldr r3, [ip, #8] cmp r4, r3 bne .L13 .L10: str r2, [ip, #12] b .L7 .L8: 882 %RETURN ldr r8, .L15+16 .LPIC8: add r8, pc .L13: 883 %FINISH 884 %FINISH 885 %REPEAT 886 887 !add a new cell 888 889 gmax = gmax+1 adds r3, r5, #1 ldr r2, .L15+20 .LPIC9: add r2, pc str r3, [r2] 890 gram(gmax) = g add r2, r2, r3, lsl #1 strh r0, [r2, #3448] @ movhi 891 glink(gmax) = link ldr r0, [ip, #12] .LVL10: strh r0, [r2, #4] @ movhi 892 link = gmax str r3, [ip, #12] 893 894 %IF tt >= 0 %START; ! set type cell cmp r1, #0 blt .L12 895 gmax = gmax+1 adds r5, r5, #2 ldr r3, .L15+24 .LPIC12: add r3, pc str r5, [r3] 896 gram(gmax) = tt add r5, r3, r5, lsl #1 strh r1, [r5, #3448] @ movhi 897 glink(gmax) = ap ldr r3, [ip, #8] strh r3, [r5, #4] @ movhi .L12: 898 %FINISH 899 900 p = gmax ldr r3, .L15+28 .LPIC15: add r3, pc ldr r3, [r3] str r3, [ip, #16] .L7: 901 %END 902 pop {r4, r5, r6, r7, r8, r9, pc} .L16: .align 2 .L15: .word .LANCHOR1-(.LPIC4+4) .word .LANCHOR1-(.LPIC5+4) .word .LANCHOR1-(.LPIC6+4) .word .LANCHOR1-(.LPIC7+4) .word .LANCHOR1-(.LPIC8+4) .word .LANCHOR1-(.LPIC9+4) .word .LANCHOR1-(.LPIC12+4) .word .LANCHOR1-(.LPIC15+4) .LFE195: .align 1 .thumb .thumb_func DEFLAB.11211: .LFB210: 903 %ROUTINE class(%RECORD(tagfm)%NAME v) 904 %CONSTINTEGER err = 89 905 %CONSTINTEGER rtp = 100 906 %CONSTINTEGER fnp = 101 907 %CONSTINTEGER mapp = 102 908 %CONSTINTEGER predp = 103 909 %CONSTINTEGERARRAY class map(0:15) = %C ldr r3, .L983+56 .LPIC911: add r3, pc addw r4, sp, #1628 add r5, r9, #496 ldmia r5!, {r0, r1, r2, r3} stmia r4!, {r0, r1, r2, r3} ldmia r5!, {r0, r1, r2, r3} stmia r4!, {r0, r1, r2, r3} ldmia r5!, {r0, r1, r2, r3} stmia r4!, {r0, r1, r2, r3} ldm r5, {r0, r1, r2, r3} stm r4, {r0, r1, r2, r3} 910 err,1764, 247, err(4), -rtp, -fnp, -mapp, -predp, err, 214, 911 err, 229, err 912 %INTEGER tags, type, form 913 ap = 0 add r7, sp, #252 str r6, [sp, #240] str r10, [sp, #244] mov r9, r3 mov r10, r2 b .L947 .LVL951: .L976: .LBE721: .LBE720: .LBE719: .LBE718: str r10, [r7, #8] 914 tags = v_flags add ip, lr, ip, lsl #4 .LVL959: ldrsh r3, [ip, #220] .LVL960: 915 type = tags>>4&7; form = tags&15 ubfx r1, r3, #4, #3 .LVL961: 916 tp = v_format<<3!type and r3, r3, #15 .LVL962: ldr r2, [ip, #216] orr r2, r1, r2, lsl #3 str r2, [r7, #4] 917 c = class map(form) ittte ne addwne r2, sp, #1628 ldrne r3, [r2, r3, lsl #2] .LVL963: strne r3, [r7] 918 c = 208 %AND tp = 0 %IF type = 0 %AND form = 2; !%NAME 919 ap = v_app %IF tags¶meters # 0 cmp r3, #2 it eq cmpeq r1, #0 920 %END moveq r3, #208 ittt eq streq r3, [r7] ldr r3, [ip, #212] str r3, [r7, #8] .LDL48: .LVL964: .LBE722: .LBE723: 921 %END moveq r3, #0 streq r3, [r7, #4] .L949: 922 923 %ROUTINE delete names(%INTEGER quiet) @ Nested: function declared inside another function. @ args = 0, pretend = 0, frame = 0 @ frame_needed = 0, uses_anonymous_args = 0 .LVL741: push {r4, r5, r6, r7, r8, r9, r10, lr} 924 %INTEGER flags 925 %RECORD(tagfm)%NAME tx 926 %WHILE tmax > tbase %CYCLE 927 x = tmax; tmax = tmax-1 ldr r5, [ip, #52] ldr r3, [ip, #56] cmp r5, r3 ble .L827 mov r4, ip mov r7, r0 ldr r6, .L834 .LPIC721: add r6, pc ldr r5, [r4, #52] ldr r3, [r4, #56] cmp r5, r3 ble .L827 .L831: str r5, [r6, #208] 928 tx == tag(x) subs r3, r5, #1 str r3, [r4, #52] ldr r10, [r4, #64] .LVL744: 929 flags = tx_flags add r3, r10, r5, lsl #4 930 fault(20) %IF flags&spec # 0 %and flags&own bit = 0 931 {spec with no definition & not external} ldrh r3, [r3, #220] tst r3, #1 bne .L830 932 %IF flags&used bit = 0 %AND level >= 0 %AND list <= 0 %START mov r8, #20 mov ip, r4 mov r0, r8 bl FAULT.10318(PLT) .LVL745: 933 fault(-3) %IF quiet = 0; !unused ldr r3, [r4, #48] cmp r3, #0 blt .L830 cmp r3, #0 it le cmple r7, #0 bne .L830 934 %FINISH ldr r9, .L834+4 .LPIC722: add r9, pc b .L831 .L829: .LVL742: .L830: ldr r3, [r9, #2832] mov ip, r4 mvn r0, #2 bl FAULT.10318(PLT) .LVL746: b .L830 .L828: .LVL747: .L827: 935 dict(tx_text) = tx_link add r5, r10, r5, lsl #4 .LVL743: ldrsh r1, [r5, #226] ldr r2, [r4, #64] ldrsh r3, [r5, #224] add r3, r3, #13376 adds r3, r3, #39 add r3, r2, r3, lsl #1 strh r1, [r3, #4] @ movhi .LDL35: 936 %REPEAT 937 %END 938 pop {r4, r5, r6, r7, r8, r9, r10, pc} .L835: .align 2 .L834: .word .LANCHOR0-(.LPIC721+4) .word .LANCHOR2-(.LPIC722+4) .LFE197: .align 1 .thumb .thumb_func ANALYSE.10299: .LFB198: 939 %ROUTINE analyse @ Nested: function declared inside another function. @ args = 0, pretend = 0, frame = 5672 @ frame_needed = 0, uses_anonymous_args = 0 push {r4, r5, r6, r7, r8, r9, r10, fp, lr} sub sp, sp, #5920 sub sp, sp, #28 mov r6, ip ldr r9, .L932 .LPIC723: add r9, pc ldr r3, .L932+4 ldr r3, [r9, r3] ldr r3, [r3] add r2, sp, #5920 adds r2, r2, #20 str r3, [r2] add r2, sp, #5984 str r2, [sp, #304] str ip, [sp, #300] 940 941 %CONSTINTEGER order bits = x'3000', order bit = x'1000' 942 %CONSTINTEGER escape = x'1000' 943 %INTEGER strp, mark, flags, prot err, k, s, c 944 %OWNINTEGER key = 0 945 %SHORTINTEGER node 946 %SHORTINTEGERNAME z 947 %RECORD(arfm)%NAME arp 948 !emas: %INTEGER node 949 !emas: %INTEGERNAME z 950 %SWITCH act(actions:phrasal), paction(0:15) 951 952 %ROUTINE trace analysis add r1, sp, #5984 str r1, [sp, #292] add r1, sp, #296 str r1, [sp, #288] 953 !diagnostic trace routine (diagnose&1 # 0) 954 %INTEGER a 955 %ROUTINE show(%INTEGER a) @ Nested: function declared inside another function. @ args = 0, pretend = 0, frame = 520 @ frame_needed = 0, uses_anonymous_args = 0 .LVL38: push {r4, r5, lr} sub sp, sp, #764 ldr r4, .L54 .LPIC32: add r4, pc ldr r3, .L54+4 ldr r3, [r4, r3] ldr r3, [r3] str r3, [sp, #756] .LVL39: .LBB316: 956 %IF 0 < a < 130 %START 957 space 958 printstring(text(a)) 959 %FINISH %ELSE write(a, 3) 960 %END 961 %OWNINTEGER la1=0, la2=0, lsa=0, lt=0 subs r3, r0, #1 cmp r3, #128 bls .L52 .L48: .LBE316: movs r1, #3 bl _imp_writeint(PLT) .LVL40: .L49: .L47: ldr r3, .L54+4 ldr r3, [r4, r3] ldr r2, [sp, #756] ldr r3, [r3] cmp r2, r3 bne .L53 add sp, sp, #764 @ sp needed pop {r4, r5, pc} .LVL41: .L52: .LBB317: .LBB318: bl _imp_space(PLT) .LVL42: mov r2, #256 add r1, sp, #244 add r5, sp, #500 mov r0, r5 bl memcpy(PLT) .LVL43: .LBE318: .LBE317: .LBB319: .LBB320: movs r2, #240 add r1, sp, #516 mov r0, sp bl memcpy(PLT) .LVL44: ldm r5, {r0, r1, r2, r3} bl _imp_printstring(PLT) .LVL45: b .L47 .L53: .LBE320: .LBE319: bl __stack_chk_fail(PLT) .LVL46: .L55: .align 2 .L54: .word _GLOBAL_OFFSET_TABLE_-(.LPIC32+4) .word __stack_chk_guard(GOT) .LFE200: .align 1 .thumb .thumb_func PRINTIDENT.10189: .LFB187: 962 newline %IF mon pos # pos %AND sym # nl ldr r2, [r3, #688] ldr r3, [r3, #260] cmp r2, r3 beq .L862 963 mon pos = pos ldr r3, .L932+192 .LPIC795: add r3, pc ldr r3, [r3, #2548] cmp r3, #10 bne .L925 .L862: ldr fp, .L932+196 .LPIC796: add fp, pc ldr r3, [fp, #260] str r3, [fp, #688] 964 write(g, 3) movs r1, #3 ldr r0, [fp, #680] bl _imp_writeint(PLT) .LVL846: .LBB629: .LBB630: bl _imp_space(PLT) .LVL847: mov r2, #256 add r1, sp, #5152 adds r1, r1, #20 add r4, sp, #4896 adds r4, r4, #20 mov r0, r4 bl memcpy(PLT) .LVL848: .LBE630: .LBE629: .LBB631: .LBB632: movs r2, #240 add r1, sp, #4928 adds r1, r1, #4 mov r0, sp bl memcpy(PLT) .LVL849: ldm r4, {r0, r1, r2, r3} bl _imp_printstring(PLT) .LVL850: .LBE632: .LBE631: .LBB633: .LBB634: movs r0, #34 bl _imp_printsymbol(PLT) .LVL851: .LDL40: .LBE634: .LBE633: 965 space 966 printstring(text(class)) 967 printsymbol('"') %IF gg&trans bit # 0 968 a = gg>>8&15 ldr r4, [fp, #656] ubfx r4, r4, #8, #4 .LVL852: 969 %IF a # 0 %START cmp r4, #0 bne .L926 .L863: 970 printsymbol('{') 971 write(a, 0) movs r1, #0 mov r0, r4 bl _imp_writeint(PLT) .LVL842: .LBB627: .LBB628: movs r0, #125 bl _imp_printsymbol(PLT) .LVL843: b .L863 .LVL844: .L927: .LBE628: .LBE627: 972 printsymbol('}') 973 %FINISH 974 %IF atom1 # la1 %OR atom2 # la2 %OR lsa # subatom %C ldr r3, .L932+200 .LPIC800: add r3, pc ldr r2, [r3, #240] ldr r3, [r3, #692] cmp r2, r3 bne .L864 975 %OR lt # type %START ldr r3, .L932+204 .LPIC802: add r3, pc ldr r2, [r3, #248] ldr r3, [r3, #696] cmp r2, r3 beq .L927 .L864: .LBB635: 976 printstring(" [") ldr r7, .L932+84 .LPIC808: add r7, pc add r7, r7, #1768 .LVL760: .L850: .LBE622: .LBE621: .LBE620: ldr r3, .L932+152 .LPIC804: add r3, pc ldr r2, [r3, #700] ldr r3, [r3, #220] cmp r2, r3 bne .L864 mov fp, #256 mov r2, fp mov r1, r7 add r4, sp, #5408 .LVL853: adds r4, r4, #20 mov r0, r4 bl memcpy(PLT) .LVL854: mov r2, fp mov r1, r4 add r4, sp, #5664 adds r4, r4, #20 mov r0, r4 bl memcpy(PLT) .LVL855: mov r2, fp mov r1, r4 add r4, sp, #4640 adds r4, r4, #20 mov r0, r4 bl memcpy(PLT) .LVL856: .LBE635: .LBB636: .LBB637: movs r2, #240 add r1, sp, #4672 adds r1, r1, #4 mov r0, sp bl memcpy(PLT) .LVL857: ldm r4, {r0, r1, r2, r3} bl _imp_printstring(PLT) .LVL858: .LBE637: .LBE636: 977 la1 = atom1 ldr r3, .L932+156 .LPIC806: add r3, pc ldr r2, [r3, #704] ldr r3, [r3, #236] cmp r2, r3 bne .L864 b .L865 .LVL845: .L869: .LBE642: .LBE681: ldr r4, .L932+208 .LPIC809: add r4, pc ldr r0, [r4, #240] str r0, [r4, #692] 978 show(la1) add fp, sp, #288 mov ip, fp bl SHOW.10574(PLT) .LVL859: 979 la2 = atom2 ldr r0, [r4, #248] str r0, [r4, #696] 980 show(la2) mov ip, fp bl SHOW.10574(PLT) .LVL860: 981 lsa = subatom ldr r0, [r4, #220] str r0, [r4, #700] 982 write(lsa, 3) movs r1, #3 bl _imp_writeint(PLT) .LVL861: 983 lt = type ldr r0, [r4, #236] str r0, [r4, #704] 984 write(lt, 5) movs r1, #5 bl _imp_writeint(PLT) .LVL862: .LBB638: .LBB639: movs r0, #93 bl _imp_printsymbol(PLT) .LVL863: .L865: .LBE639: .LBE638: .LBB640: .LBB641: bl _imp_newline(PLT) .LVL864: .LDL41: .LBE641: .LBE640: .LBE643: .LBE682: 985 printsymbol(']') 986 %FINISH 987 newline 988 %END 989 990 %ROUTINE get sym @ args = 0, pretend = 0, frame = 0 @ frame_needed = 0, uses_anonymous_args = 0 push {r3, lr} .LVL216: .LBB358: .LBB359: ldr r0, .L189 .LPIC162: add r0, pc addw r0, r0, #2548 bl _imp_readsymbol(PLT) .LVL217: .LBE359: .LBE358: 991 readsymbol(sym) 992 pos = pos+1 %IF pos # 133 ldr r3, .L189+4 .LPIC163: add r3, pc ldr r3, [r3, #260] cmp r3, #133 beq .L185 993 char(pos) = sym adds r3, r3, #1 ldr r2, .L189+8 .LPIC164: add r2, pc str r3, [r2, #260] .L185: ldr r3, .L189+12 .LPIC165: add r3, pc ldrb r0, [r3, #2548] @ zero_extendqisi2 ldr r2, .L189+16 .LPIC167: add r2, pc ldr r2, [r2, #260] add r2, r2, r3 strb r0, [r2, #2696] 994 printsymbol(sym) %IF list <= 0 ldr r3, [r3, #2832] cmp r3, #0 ble .L188 .L186: 995 column = column+1 ldr r2, .L189+20 .LPIC169: add r2, pc ldr r3, [r2, #288] adds r3, r3, #1 str r3, [r2, #288] 996 %END 997 %ROUTINE read sym pop {r3, pc} .L188: .LVL218: .LBB360: .LBB361: bl _imp_printsymbol(PLT) .LVL219: b .L186 .L190: .align 2 .L189: .word .LANCHOR2-(.LPIC162+4) .word .LANCHOR0-(.LPIC163+4) .word .LANCHOR0-(.LPIC164+4) .word .LANCHOR2-(.LPIC165+4) .word .LANCHOR0-(.LPIC167+4) .word .LANCHOR0-(.LPIC169+4) .LBE361: .LBE360: .LFE201: .align 1 .thumb .thumb_func READSYM.10600: .LFB202: @ Nested: function declared inside another function. @ args = 0, pretend = 0, frame = 904 @ frame_needed = 0, uses_anonymous_args = 0 push {r4, r5, r6, r7, lr} subw sp, sp, #1148 mov r5, ip ldr r4, .L231 .LPIC171: add r4, pc ldr r3, .L231+4 ldr r3, [r4, r3] ldr r3, [r3] str r3, [sp, #1140] 998 %owninteger Last = 0 999 %CONSTBYTEINTEGERARRAY mapped(0:127) = %C movs r2, #128 ldr r1, .L231+8 .LPIC172: add r1, pc add r1, r1, #532 add r0, sp, #1012 bl memcpy(PLT) .LVL220: 1000 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, nl, 0, 3 , 0, 0, 0, 1001 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1002 0 ,'!','"','#', '$', 1 ,'&', 39, '(',')','*','+', ',','-','.','/', 1003 '0','1','2','3', '4','5','6','7', '8','9',':',';', '<','=','>','?', 1004 '@','A','B','C', 'D','E','F','G', 'H','I','J','K', 'L','M','N','O', 1005 'P','Q','R','S', 'T','U','V','W', 'X','Y','Z','[', '\',']','^','_', 1006 '`','A','B','C', 'D','E','F','G', 'H','I','J','K', 'L','M','N','O', 1007 'P','Q','R','S', 'T','U','V','W', 'X','Y','Z', 2 , '|','}','~', 0 1008 1009 !! 0 = space 1010 !! 1 = % 1011 !! 2 = { 1012 !! 3 = ff 1013 !! other values represent themselves 1014 1015 %IF sym = nl %START ldr r3, .L231+12 .LPIC173: add r3, pc ldr r3, [r3, #2548] cmp r3, #10 bne .L203 .L193: 1016 s1: lines = lines+1 1017 printsymbol(end mark) %if end mark # 0 ldr r3, .L231+16 .LPIC174: add r3, pc ldr r2, [r3, #184] adds r2, r2, #1 str r2, [r3, #184] ldr r0, [r3, #292] cmp r0, #0 bne .L225 .L194: .L195: 1018 s11: pos = 0; pos1 = 0; pos2 = 0; margin = 0; column = 0 1019 Last = 0 ldr r3, .L231+20 .LPIC177: add r3, pc movs r2, #0 str r2, [r3, #260] str r2, [r3, #304] 1020 end mark = 0 str r2, [r3, #296] str r2, [r3, #292] 1021 %IF list <= 0 %START str r2, [r3, #256] ldr r3, .L231+24 .LPIC184: add r3, pc ldr r3, [r3, #2832] cmp r3, r2 ble .L226 .L196: .L200: .L201: .L202: 1022 %IF include # 0 %START str r2, [r3, #300] ldr r3, .L231+80 .LPIC185: add r3, pc ldr r3, [r3, #308] cmp r3, #0 beq .L197 .LBB366: 1023 printstring(" &"); write(lines, -4) str r2, [r3, #288] mov r7, #256 mov r2, r7 ldr r1, .L231+84 .LPIC186: add r1, pc add r1, r1, #660 add r6, sp, #244 mov r0, r6 bl memcpy(PLT) .LVL226: mov r2, r7 mov r1, r6 add r6, sp, #500 mov r0, r6 bl memcpy(PLT) .LVL227: mov r2, r7 mov r1, r6 add r6, sp, #756 mov r0, r6 bl memcpy(PLT) .LVL228: .LBE366: .LBB367: .LBB368: movs r2, #240 add r1, sp, #772 mov r0, sp bl memcpy(PLT) .LVL229: ldm r6, {r0, r1, r2, r3} bl _imp_printstring(PLT) .LVL230: .LBE368: .LBE367: 1024 %FINISH %ELSE write(lines, 5) mvn r1, #3 ldr r3, .L231+88 .LPIC187: add r3, pc ldr r0, [r3, #184] bl _imp_writeint(PLT) .LVL231: .L198: 1025 csym = cont; printsymbol(csym) ldr r3, .L231+92 .LPIC189: add r3, pc ldr r0, [r3, #2836] str r0, [r3, #2840] .LVL232: .LBB369: .LBB370: uxtb r0, r0 bl _imp_printsymbol(PLT) .LVL233: .LBE370: .LBE369: .LBB371: .LBB372: bl _imp_space(PLT) .LVL234: .LBE372: .LBE371: 1026 space movs r1, #5 ldr r3, .L231+112 .LPIC188: add r3, pc ldr r0, [r3, #184] bl _imp_writeint(PLT) .LVL239: b .L198 .L227: .LVL240: .LBB379: .LBB380: bl _imp_printsymbol(PLT) .LVL241: b .L205 .L228: .LBE380: .LBE379: 1027 %IF error margin # 0 %START ldr r3, .L231+96 .LPIC191: add r3, pc ldr r0, [r3, #312] cmp r0, #0 beq .L202 1028 lines = lines-1 ldr r6, .L231+100 .LPIC192: add r6, pc ldr r3, [r6, #184] subs r3, r3, #1 str r3, [r6, #184] .LVL235: .LBB373: .LBB374: bl _imp_spaces(PLT) .LVL236: .LBE374: .LBE373: 1029 spaces(error margin) 1030 error margin = 0 movs r3, #0 str r3, [r6, #312] 1031 %IF error sym # 0 %START ldr r0, [r6, #316] cmp r0, #0 beq .L202 .LVL237: .LBB375: .LBB376: uxtb r0, r0 bl _imp_printsymbol(PLT) .LVL238: .LBE376: .LBE375: 1032 printsymbol(error sym) 1033 pos = 1 ldr r3, .L231+104 .LPIC196: add r3, pc movs r2, #1 str r2, [r3, #260] 1034 !IMP80 BUG??? 1035 !! char(1) = error sym 1036 byteinteger(addr(char(0))+1) = error sym ldr r1, [r3, #316] .LBB377: .LBB378: ldr r2, .L231+108 .LPIC198: add r2, pc .LBE378: .LBE377: strb r1, [r2, #2697] 1037 sym = error sym; error sym = 0 str r1, [r2, #2548] 1038 ->s5 movs r2, #0 str r2, [r3, #316] b .L199 .L197: 1039 %FINISH 1040 %FINISH 1041 %FINISH 1042 s2: symtype = 1 1043 %FINISH ldr r3, .L231+28 .LPIC201: add r3, pc movs r2, #1 str r2, [r3, #320] .L192: .L203: .LVL221: .LBB362: .LBB363: ldr r0, .L231+32 .LPIC202: add r0, pc addw r0, r0, #2548 bl _imp_readsymbol(PLT) .LVL222: .LBE363: .LBE362: 1044 s3:readsymbol(sym) 1045 pos = pos+1 %IF pos # 133 ldr r3, .L231+36 .LPIC203: add r3, pc ldr r3, [r3, #260] cmp r3, #133 beq .L204 1046 char(pos) = sym adds r3, r3, #1 ldr r2, .L231+40 .LPIC204: add r2, pc str r3, [r2, #260] .L204: ldr r3, .L231+44 .LPIC205: add r3, pc ldrb r0, [r3, #2548] @ zero_extendqisi2 ldr r2, .L231+48 .LPIC207: add r2, pc ldr r2, [r2, #260] add r2, r2, r3 strb r0, [r2, #2696] 1047 printsymbol(sym) %IF list <= 0 ldr r3, [r3, #2832] cmp r3, #0 ble .L227 .L205: 1048 column = column+1 ldr r2, .L231+52 .LPIC209: add r2, pc ldr r3, [r2, #288] adds r3, r3, #1 str r3, [r2, #288] .L199: 1049 s5:%IF sym # nl %START 1050 Last = Sym ldr r3, .L231+56 .LPIC211: add r3, pc ldr r3, [r3, #2548] cmp r3, #10 beq .L217 ldr r2, .L231+60 .LPIC212: add r2, pc str r3, [r2, #304] 1051 %RETURN %IF quote # 0; !dont alter strings ldr r2, [r2, #324] cbnz r2, .L191 .L208: 1052 sym = mapped(sym&127) and r3, r3, #127 add r2, sp, #1144 add r3, r3, r2 ldrb r3, [r3, #-132] @ zero_extendqisi2 ldr r2, .L231+64 .LPIC214: add r2, pc str r3, [r2, #2548] 1053 %IF sym <= 3 %START; !special symbol cmp r3, #3 bgt .L209 1054 ->s2 %IF sym = 0; !space (or dubious control) cmp r3, #0 beq .L202 .L210: 1055 symtype = 2 %AND ->s3 %IF sym = 1; !% cmp r3, #1 beq .L228 .L211: 1056 cont = '+' %AND ->s11 %IF sym = 3; !ff cmp r3, #3 beq .L223 ldr r3, .L231+116 .LPIC215: add r3, pc movs r2, #2 str r2, [r3, #320] 1057 !must be { b .L203 .L223: ldr r3, .L231+120 .LPIC216: add r3, pc movs r2, #43 str r2, [r3, #2836] 1058 %CYCLE b .L195 .L209: 1059 get sym bl GETSYM.10595(PLT) .LVL223: 1060 ->s3 %IF sym = '}' ldr r6, .L231+68 .LPIC217: add r6, pc .L212: .L213: .L214: ldr r3, [r6, #2548] cmp r3, #125 beq .L203 .L215: 1061 ->s4 %IF sym = nl cmp r3, #10 bne .L212 .L206: .L217: 1062 %REPEAT 1063 %FINISH 1064 key = kdict(sym) ldr r2, [r5, #4] ldr r2, [r2, #64] add r1, r3, #12800 adds r1, r1, #8 add r2, r2, r1, lsl #1 ldrsh r2, [r2, #4] ldr r1, .L231+124 .LPIC218: add r1, pc str r2, [r1, #328] 1065 %IF key&3 = 0 %AND symtype = 2 %START; !keyword tst r2, #1 bne .L216 1066 %IF sym = 'C' %AND nextsymbol = nl %START; !%C... ldr r1, .L231+128 .LPIC219: add r1, pc ldr r1, [r1, #320] cmp r1, #2 beq .L230 .L216: cmp r3, #67 bne .L191 .LBB381: .LBB382: bl _imp_nextsymbol(PLT) .LVL242: .LBE382: .LBE381: 1067 getsym; cont = '+'; ->s1 cmp r0, #10 bne .L191 bl GETSYM.10595(PLT) .LVL243: 1068 %FINISH ldr r3, .L231+136 .LPIC220: add r3, pc movs r2, #43 str r2, [r3, #2836] 1069 %ELSE b .L193 .L229: 1070 symtype = key&3-2 and r2, r2, #3 subs r2, r2, #2 ldr r3, .L231+132 .LPIC221: add r3, pc str r2, [r3, #320] b .L191 .L230: 1071 %FINISH 1072 %RETURN 1073 %FINISH 1074 s4:symtype = quote 1075 ->S1 %if last = 0 %and Quote = 0 ldr r3, .L231+72 .LPIC222: add r3, pc ldr r2, [r3, #324] str r2, [r3, #320] 1076 Cont = '+' ldr r3, [r3, #304] orrs r3, r2, r3 beq .L193 .L218: ldr r3, .L231+76 .LPIC225: add r3, pc movs r2, #43 str r2, [r3, #2836] .L207: .L219: .L191: 1077 %END 1078 ldr r3, .L231+4 ldr r3, [r4, r3] ldr r2, [sp, #1140] ldr r3, [r3] cmp r2, r3 bne .L229 addw sp, sp, #1148 @ sp needed pop {r4, r5, r6, r7, pc} .L225: .LVL224: .LBB364: .LBB365: uxtb r0, r0 bl _imp_printsymbol(PLT) .LVL225: b .L195 .L226: .LBE365: .LBE364: bl __stack_chk_fail(PLT) .LVL244: .L232: .align 2 .L231: .word _GLOBAL_OFFSET_TABLE_-(.LPIC171+4) .word __stack_chk_guard(GOT) .word .LANCHOR3-(.LPIC172+4) .word .LANCHOR2-(.LPIC173+4) .word .LANCHOR0-(.LPIC174+4) .word .LANCHOR0-(.LPIC177+4) .word .LANCHOR2-(.LPIC184+4) .word .LANCHOR0-(.LPIC201+4) .word .LANCHOR2-(.LPIC202+4) .word .LANCHOR0-(.LPIC203+4) .word .LANCHOR0-(.LPIC204+4) .word .LANCHOR2-(.LPIC205+4) .word .LANCHOR0-(.LPIC207+4) .word .LANCHOR0-(.LPIC209+4) .word .LANCHOR2-(.LPIC211+4) .word .LANCHOR0-(.LPIC212+4) .word .LANCHOR2-(.LPIC214+4) .word .LANCHOR2-(.LPIC217+4) .word .LANCHOR0-(.LPIC222+4) .word .LANCHOR2-(.LPIC225+4) .word .LANCHOR0-(.LPIC185+4) .word .LANCHOR3-(.LPIC186+4) .word .LANCHOR0-(.LPIC187+4) .word .LANCHOR2-(.LPIC189+4) .word .LANCHOR0-(.LPIC191+4) .word .LANCHOR0-(.LPIC192+4) .word .LANCHOR0-(.LPIC196+4) .word .LANCHOR2-(.LPIC198+4) .word .LANCHOR0-(.LPIC188+4) .word .LANCHOR0-(.LPIC215+4) .word .LANCHOR2-(.LPIC216+4) .word .LANCHOR0-(.LPIC218+4) .word .LANCHOR0-(.LPIC219+4) .word .LANCHOR0-(.LPIC221+4) .word .LANCHOR2-(.LPIC220+4) .LFE202: .align 1 .thumb .thumb_func GET.10767: .LFB206: 1079 %INTEGERFN format selected 1080 format list = tag(format)_app; !number of names ldr r2, [r8, #12] ldr r2, [r2, #4] ldr r2, [r2, #64] add r3, r2, r3, lsl #4 ldr r2, [r3, #212] ldr r1, .L182+72 .LPIC101: add r1, pc str r2, [r1, #212] 1081 %IF format list < 0 %START; !forward ref cmp r2, #0 blt .L172 .L130: 1082 atom1 = error+22 ldr r3, .L182+84 .LPIC102: add r3, pc movw r2, #32790 str r2, [r3, #240] b .L112 .LVL175: .L171: .LBE355: .LBE354: 1083 %RESULT = 0 1084 %FINISH 1085 %IF sym = '_' %START ldr r2, .L182+76 .LPIC103: add r2, pc ldr r2, [r2, #2548] cmp r2, #95 bne .L133 1086 escape class = esc rec ldr r2, .L182+80 .LPIC104: add r2, pc movs r1, #255 str r1, [r2, #244] 1087 search base = tag(format)_format ldr r3, [r3, #216] str r3, [r2, #200] b .L133 .L172: 1088 %FINISH 1089 %RESULT = 1 1090 %END 1091 1092 %ROUTINE code atom(%INTEGER target) @ Nested: function declared inside another function. @ args = 0, pretend = 0, frame = 40 @ frame_needed = 0, uses_anonymous_args = 0 .LVL255: push {r4, r5, r6, r7, r8, r9, r10, fp, lr} sub sp, sp, #44 str r0, [sp, #4] mov r4, ip ldr r10, .L352 .LPIC231: add r10, pc ldr r3, .L352+4 ldr r3, [r10, r3] ldr r3, [r3] str r3, [sp, #36] add r3, sp, #80 str r3, [sp, #32] str ip, [sp, #28] 1093 %INTEGER dbase, da 1094 %INTEGER base, n, mul, pend quote 1095 %INTEGER j,k,l, pt 1096 1097 %ROUTINE lookup(%INTEGER d) @ Nested: function declared inside another function. @ args = 0, pretend = 0, frame = 528 @ frame_needed = 0, uses_anonymous_args = 0 .LVL135: push {r4, r5, r6, r7, r8, r9, r10, fp, lr} sub sp, sp, #772 str r0, [sp, #244] mov r8, ip ldr fp, .L182 .LPIC70: add fp, pc ldr r3, .L182+4 ldr r3, [fp, r3] ldr r3, [r3] str r3, [sp, #764] 1098 %CONSTINTEGER magic = 6700421 1099 %INTEGER new name, vid, k1, k2, form 1100 %RECORD(tagfm)%NAME t 1101 !emas: %LONGINTEGER k0 1102 %INTEGER new 1103 1104 !first locate the text of the name 1105 1106 new = addr(dict(dmax+1)) ldr r3, [ip, #12] ldr r3, [r3, #4] ldr r2, [r3, #64] ldr r3, .L182+8 .LPIC71: add r3, pc ldr r3, [r3, #2556] add r3, r3, #13376 adds r3, r3, #42 add r3, r2, r3, lsl #1 str r3, [sp, #240] .LVL136: 1107 1108 !******** Machine code to inhibit overflow test ******** 1109 1110 ! *LI_1,magic 1111 ! * M_0,hash value 1112 ! *ST_1,K2 1113 1114 {K2 = hash value*magic} 1115 K2 = hash value*magic ;! requires NOCHECK option ldr r3, [r2, #208] .LVL137: movw r7, #15749 movt r7, 102 mul r7, r7, r3 1116 ! we could fix this properly by a shift+add loop 1117 !******************************************************* 1118 1119 k2 = k2>>(32-2*name bits)!1 lsrs r7, r7, #10 orr r7, r7, #1 .LVL138: 1120 !emas: k0 = magic 1121 !emas: k1 = (k0*hash value)&X'7FFFFFFF' 1122 !emas: k2 = k1>>(32-2*name bits)!1 1123 k1 = k2>>name bits; !giving name bits lsrs r4, r7, #11 .LVL139: 1124 %CYCLE 1125 newname = hash(k1) add r3, r4, #10752 adds r3, r3, #40 add r3, r2, r3, lsl #1 ldrsh r5, [r3, #4] .LVL140: movw r10, #10792 .LVL141: .L114: ldr r3, [r8, #12] ldr r3, [r3, #4] ldr r2, [r3, #64] add r3, r4, r10 add r3, r2, r3, lsl #1 ldrsh r5, [r3, #4] .LVL145: mov r6, r5 .LVL146: 1126 %EXIT %IF newname = 0; !not in cbz r5, .L113 mov r6, r5 cmp r5, #0 bne .L114 .L113: 1127 ->in %IF string(addr(dict(newname+1))) = string(new) 1128 k1 = (k1+k2)&max names add r4, r4, r7 .LVL143: ubfx r4, r4, #0, #11 .LDL7: .LVL144: 1129 %REPEAT movw r9, #13418 add r0, r6, r9 ldr r1, [sp, #240] add r0, r2, r0, lsl #1 bl _imp_strcmp(PLT) .LVL142: cmp r0, #0 beq .L115 .L116: 1130 1131 ! not found 1132 1133 spare names = spare names-1 ldr r1, .L182+12 .LPIC72: add r1, pc ldr r3, [r1, #2560] subs r3, r3, #1 str r3, [r1, #2560] 1134 abandon(2) %IF spare names <= 0 cmp r3, #0 ble .L166 .L117: 1135 hash(k1) = dmax; !put it in ldr r3, .L182+16 .LPIC74: add r3, pc ldr r6, [r3, #2556] ldr r2, [r8, #12] ldr r2, [r2, #4] ldr r2, [r2, #64] add r4, r4, #10752 .LVL147: adds r4, r4, #40 .LVL148: add r4, r2, r4, lsl #1 .LVL149: strh r6, [r4, #4] @ movhi mov ip, r2 movs r0, #2 bl ABANDON.10208(PLT) .LVL155: b .L117 .L115: 1136 dict(dmax) = -1 ldr r2, [r8, #12] ldr r2, [r2, #4] ldr r2, [r2, #64] add r1, r6, #13376 adds r1, r1, #39 add r2, r2, r1, lsl #1 movw r1, #65535 strh r1, [r2, #4] @ movhi .LVL150: 1137 newname = dmax; dmax = dp; ->not in 1138 ldr r2, [r3, #2564] str r2, [r3, #2556] .L118: .LVL151: .L150: 1139 in: search base = rbase %IF this >= 0 %AND d # 0; !record elem defn 1140 %IF search base # 0 %START; !record subname ldr r3, .L182+24 .LPIC77: add r3, pc ldr r2, [r3, #2568] ldr r3, .L182+28 .LPIC80: add r3, pc ldr r3, [r3, #200] cbz r3, .L120 .LVL156: 1141 new = -1 ldr r3, [sp, #244] clz r3, r3 lsrs r3, r3, #5 orrs r3, r3, r2, lsr #31 beq .L168 .L119: 1142 x = search base ldr r2, .L182+32 .LPIC81: add r2, pc str r3, [r2, #208] ldr r3, .L182+40 .LPIC78: add r3, pc ldr r2, [r3, #204] str r2, [r3, #200] b .L119 .L120: 1143 %CYCLE 1144 ->not in %IF x < format list ldr r0, [r2, #212] cmp r3, r0 blt .L150 cmp r3, r0 blt .L169 .L123: subs r2, r2, #16 1145 %EXIT %IF tag(x)_text = new name ldr r2, [r8, #12] ldr r2, [r2, #4] ldr r2, [r2, #64] add r1, r2, r3, lsl #4 ldrsh r1, [r1, #224] cmp r1, r5 it ne addne r2, r2, r3, lsl #4 beq .L127 .L124: ldrsh r1, [r2, #224] cmp r1, r5 bne .L124 ldr r2, .L182+36 .LPIC83: add r2, pc str r3, [r2, #208] b .L127 .LVL157: .L168: 1146 x = x-1 subs r3, r3, #1 .LDL8: 1147 %REPEAT 1148 %FINISH %ELSE %START; !hash in for normal names 1149 x = dict(newname) ldr r3, [r8, #12] ldr r3, [r3, #4] ldr r3, [r3, #64] add r2, r6, #13376 adds r2, r2, #39 add r3, r3, r2, lsl #1 ldrsh r3, [r3, #4] ldr r2, .L182+44 .LPIC84: add r2, pc str r3, [r2, #208] 1150 ->not in %IF x <= limit; !wrong level ldr r2, [r2, #216] cmp r3, r2 ble .L150 .L122: .L126: .LVL158: .L127: 1151 %FINISH 1152 1153 subatom = x; !name found, extract info ldr r4, .L182+48 .LVL159: .LPIC86: add r4, pc ldr r9, [r4, #208] str r9, [r4, #220] 1154 t == tag(x) ldr r3, [r8, #12] ldr r3, [r3, #4] ldr r5, [r3, #64] .LVL160: 1155 atom flags = t_flags add r7, r5, r9, lsl #4 .LVL161: ldrsh r3, [r7, #220] str r3, [r4, #224] 1156 format = t_format; app = t_app ldr r2, [r7, #216] str r2, [r4, #228] 1157 protection = atom flags&prot ldr r2, [r7, #212] str r2, [r4, #232] 1158 type = atom flags>>4&7; atom1 = amap(atom flags&15) ubfx r2, r3, #4, #3 str r2, [r4, #236] 1159 and r3, r3, #15 add r3, r3, r5 movw r2, #38902 ldrb r3, [r3, r2] @ zero_extendqisi2 str r3, [r4, #240] .LBB348: 1160 %IF diag&8 # 0 %START 1161 printstring("lookup:") mov r2, #256 ldr r1, .L182+52 .LPIC93: add r1, pc add r1, r1, #276 add r10, sp, #508 mov r0, r10 bl memcpy(PLT) .LVL162: mov r2, #256 mov r1, r10 add r3, sp, #252 str r3, [sp, #240] mov r0, r3 bl memcpy(PLT) .LVL163: mov r2, #256 ldr r1, [sp, #240] mov r0, r10 bl memcpy(PLT) .LVL164: .LBE348: .LBB349: .LBB350: movs r2, #240 add r1, sp, #524 mov r0, sp bl memcpy(PLT) .LVL165: ldm r10, {r0, r1, r2, r3} bl _imp_printstring(PLT) .LVL166: .LBE350: .LBE349: 1162 write(atom1, 3) movs r1, #3 ldr r0, [r4, #240] bl _imp_writeint(PLT) .LVL167: 1163 write(type, 1) movs r1, #1 ldr r0, [r4, #236] bl _imp_writeint(PLT) .LVL168: 1164 write(app, 3) movs r1, #3 ldr r0, [r4, #232] bl _imp_writeint(PLT) .LVL169: 1165 write(format, 5) movs r1, #5 ldr r0, [r4, #228] bl _imp_writeint(PLT) .LVL170: 1166 write(atom flags, 3) movs r1, #3 ldr r0, [r4, #224] bl _imp_writeint(PLT) .LVL171: .LBB351: .LBB352: bl _imp_newline(PLT) .LVL172: .LDL9: .LBE352: .LBE351: 1167 newline 1168 %FINISH 1169 1170 %IF d = 0 %START; !old name wanted ldr r3, [sp, #244] cmp r3, #0 bne .L128 1171 t_flags <- t_flags!used bit ldrh r3, [r7, #220] mvn r3, r3, lsl #17 mvn r3, r3, lsr #17 strh r3, [r7, #220] @ movhi 1172 search base = 0 ldr r3, .L182+56 .LPIC99: add r3, pc movs r2, #0 str r2, [r3, #200] 1173 1174 %IF atom flags&subname # 0 %AND format # 0 %START; !a record 1175 %RETURN %IF format selected = 0 ldr r3, [r3, #228] cbnz r3, .L170 .L129: .L133: 1176 %FINISH 1177 1178 %IF atom flags¶meters # 0 %START; !proc or array 1179 1180 %IF app = 0 %START; !no parameters needed ldr r3, .L182+60 .LPIC106: add r3, pc ldr r3, [r3, #232] cmp r3, #0 bne .L134 1181 atom2 = atom1 ldr r2, .L182+64 .LPIC107: add r2, pc ldr r3, [r2, #240] str r3, [r2, #248] 1182 atom1 = atom1-4 subs r1, r3, #4 str r1, [r2, #240] .LVL173: .LBB353: 1183 %IF 97 <= atom1 <= 98 %START 1184 map gg = atom1; atom1 = var ldr r3, .L182+88 .LPIC110: add r3, pc str r1, [r3, #252] 1185 %FINISH movs r2, #91 str r2, [r3, #240] b .L139 .LVL176: .L134: 1186 %FINISH %ELSE %START 1187 %IF sym = '(' %START ldr r2, .L182+92 .LPIC112: add r2, pc ldr r2, [r2, #2548] cmp r2, #40 bne .L139 1188 search base = 0; !ignore format for now subs r3, r3, #101 cmp r3, #1 bls .L171 .L135: .L138: .LVL174: .L139: .LBE353: ldr r2, .L182+96 .LPIC113: add r2, pc movs r1, #0 str r1, [r2, #200] 1189 %IF atom1 >= 106 %START; !arrays ldr r2, [r2, #240] cmp r2, #105 ble .L136 1190 app = phrase(app+200) ldr r1, .L182+100 .LPIC115: add r1, pc ldr r0, .L182+104 .LPIC116: add r0, pc add r3, r0, r3, lsl #1 ldrsh r3, [r3, #2572] str r3, [r1, #232] 1191 escape class = esc array movs r3, #254 str r3, [r1, #244] 1192 atom1 = (atom1-106)>>1+91; !a,an->v na,nan->n sub r3, r2, #106 lsrs r3, r3, #1 adds r3, r3, #91 str r3, [r1, #240] .L137: 1193 %FINISH %ELSE %START; !procedures 1194 escape class = esc proc ldr r3, .L182+116 .LPIC119: add r3, pc movs r1, #253 str r1, [r3, #244] 1195 atom1 = atom1-4 subs r2, r2, #4 str r2, [r3, #240] b .L137 .L128: 1196 %FINISH 1197 phrase(200) = app ldr r3, .L182+108 .LPIC122: add r3, pc ldr r2, [r3, #232] ldr r3, .L182+112 .LPIC121: add r3, pc strh r2, [r3, #2572] @ movhi b .L139 .L136: 1198 %FINISH 1199 %FINISH 1200 pos2 = pos; %return ldr r3, .L182+68 .LPIC123: add r3, pc ldr r2, [r3, #260] str r2, [r3, #256] 1201 %FINISH b .L112 .L170: .LBB354: .LBB355: 1202 1203 !deal with constintegers etc 1204 1205 %IF atom flags&const bit # 0 %AND atom1 = var %START 1206 map gg = const; atom2 = const 1207 subatom = -subatom %IF type = integer 1208 %FINISH 1209 %RETURN 1210 1211 %FINISH 1212 !new name wanted 1213 ->not in %IF tbase # tstart; !dont fault proc parm-parm ldr r3, [r8, #12] ldr r3, [r3, #4] ldr r2, [r3, #56] ldr r3, [r3, #60] cmp r2, r3 beq .L173 .L140: 1214 %IF d = lab+spec+used bit %START movw r3, #32899 ldr r2, [sp, #244] cmp r2, r3 beq .L178 .L142: 1215 t_flags = t_flags!used bit add r5, r5, r9, lsl #4 .LVL198: ldrh r3, [r5, #220] mvn r3, r3, lsl #17 mvn r3, r3, lsr #17 strh r3, [r5, #220] @ movhi 1216 %RETURN b .L112 .LVL199: .L179: 1217 %FINISH 1218 %IF atom flags&spec # 0 %START; !a spec has been given 1219 %IF d = lab %START; !define label ldr r3, [sp, #244] cmp r3, #3 beq .L179 .L143: .LBB357: 1220 t_flags <- t_Flags-Spec add r5, r5, r9, lsl #4 .LVL200: ldrh r3, [r5, #220] subs r3, r3, #128 strh r3, [r5, #220] @ movhi 1221 %RETURN b .L112 .LVL201: .L180: 1222 %FINISH 1223 %IF 7 <= decl&15 <= 10 %AND decl&spec = 0 %START 1224 1225 !procedure definition after spec 1226 ldr r3, .L182+164 .LPIC125: add r3, pc ldr r3, [r3, #264] .LVL192: and r2, r3, #15 .LVL193: 1227 %IF (decl!!atom flags)&b'1111111' = 0 %START; !correct type? ldr r2, .L182+172 .LVL202: .LPIC126: add r2, pc ldr r2, [r2, #224] eors r3, r3, r2 .LVL203: tst r3, #1 bne .L146 1228 t_flags = t_flags-spec subs r2, r2, #7 .LVL194: cmp r2, #3 bls .L180 .L144: .L147: .LBE357: add r5, r5, r9, lsl #4 .LVL204: ldrh r3, [r5, #220] subs r3, r3, #128 strh r3, [r5, #220] @ movhi 1229 spec given = 1 ldr r3, .L182+176 .LPIC127: add r3, pc movs r2, #1 str r2, [r3, #268] 1230 %RETURN tst r3, #1 bne .L148 b .L112 .L145: .LVL205: .L148: 1231 %FINISH 1232 1233 !note that an external procedure must be speced as a 1234 !non-external procedure. 1235 1236 %FINISH 1237 %IF decl&15 = recfm %START; !recordformat tst r3, #1 bne .L148 .LVL195: .L146: 1238 t_flags = record<<4+recfm add r5, r5, r9, lsl #4 .LVL196: movs r3, #68 strh r3, [r5, #220] @ movhi 1239 t_format = fdef ldr r3, .L182+168 .LPIC128: add r3, pc ldr r3, [r3, #272] str r3, [r7, #216] 1240 %RETURN b .L112 .LVL197: .L178: 1241 %FINISH 1242 %FINISH 1243 %RETURN %IF last1 = jump %AND atom1 = swit ldr r3, .L182+180 .LPIC129: add r3, pc ldr r3, [r3, #276] cmp r3, #54 beq .L181 .L149: 1244 copy = x %IF copy = 0 ldr r3, .L182+184 .LPIC131: add r3, pc ldr r3, [r3, #280] cmp r3, #0 bne .L140 ldr r3, .L182+192 .LPIC130: add r3, pc ldr r3, [r3, #240] cmp r3, #105 bne .L149 b .L112 .LVL207: .L169: ldr r2, .L182+196 .LPIC134: add r2, pc str r3, [r2, #208] b .L150 .LVL208: .L174: 1245 ldr r3, .L182+188 .LPIC132: add r3, pc ldr r2, [r3, #208] .LVL206: str r2, [r3, #280] b .L140 .L181: 1246 notin:app = 0; vid = 0 1247 atom1 = error+2 ldr r3, .L182+20 .LPIC135: add r3, pc movs r2, #0 str r2, [r3, #232] .LVL152: movw r2, #32770 str r2, [r3, #240] ldr r3, .L182+120 .LPIC161: add r3, pc movs r2, #0 str r2, [r3, #232] .LVL177: .L151: 1248 movs r5, #0 1249 %return %if d = 0; !old name wanted ldr r3, [sp, #244] cmp r3, #0 bne .L151 .LVL153: .L112: 1250 type = d>>4&7; form = d&15; atom1 = amap(form) ldr r1, .L182+124 .LPIC137: add r1, pc ldr r2, [sp, #244] ubfx r3, r2, #4, #3 str r3, [r1, #236] 1251 and r2, r2, #15 .LVL178: 1252 %IF this < 0 %START; !normal scope ldr r3, [r8, #12] ldr r0, [r3, #4] ldr r3, [r0, #64] adds r5, r3, r2 movw r4, #38902 ldrb r4, [r5, r4] @ zero_extendqisi2 str r4, [r1, #240] ldr r1, .L182+128 .LPIC139: add r1, pc ldr r1, [r1, #2568] cmp r1, #0 blt .L174 .L152: .LVL179: 1253 new = newname 1254 tmax = tmax+1; x = tmax ldr r3, [r0, #52] adds r3, r3, #1 str r3, [r0, #52] 1255 %FINISH %ELSE %START; !recordformat scope ldr r3, [r8, #12] ldr r3, [r3, #4] ldr r1, [r3, #52] ldr r3, .L182+200 .LPIC140: add r3, pc str r1, [r3, #208] mov r3, r6 b .L153 .LVL209: .L175: 1256 new = -1 mov r3, #-1 .LVL181: .L153: .LBB356: 1257 recid = recid-1; vid = recid ldr r1, [r3, #204] subs r1, r1, #1 str r1, [r3, #204] 1258 tmin = tmin-1; x = tmin ldr r3, [r8, #12] ldr r3, [r3, #4] ldr r3, [r3, #64] ldr r5, [r3, #204] .LVL180: ldr r1, .L182+132 .LPIC141: add r1, pc ldr r3, [r1, #2684] subs r3, r3, #1 str r3, [r1, #2684] 1259 format list = tmin ldr r1, .L182+136 .LPIC143: add r1, pc str r3, [r1, #208] str r3, [r1, #212] 1260 %FINISH 1261 1262 %IF 11 <= form <= 14 %START; !arrays 1263 dim = 1 %IF dim = 0; !set dim for owns ldr r1, .L182+204 .LPIC145: add r1, pc ldr r1, [r1, #192] cbnz r1, .L155 1264 app = dim ldr r1, .L182+208 .LPIC146: add r1, pc movs r0, #1 str r0, [r1, #192] .L155: ldr r0, .L182+212 .LPIC147: add r0, pc ldr r1, [r0, #192] str r1, [r0, #232] b .L154 .LVL210: .L176: 1265 %FINISH 1266 1267 d = d!used bit %IF (otype > 2 %AND d&spec = 0) %OR perm # 0 %OR %C sub r1, r2, #11 cmp r1, #3 bls .L175 .L154: .LDL10: .LBE356: 1268 Level = Include Level 1269 1270 !external definitions need not be used in the file in which ldr r1, .L182+140 .LPIC149: add r1, pc ldr r1, [r1, #2688] cbnz r1, .L156 1271 !they are defined, so inhibit a useless unused warning. ldr r1, [r8, #12] ldr r1, [r1, #4] ldr r0, .L182+144 .LPIC150: add r0, pc ldr r0, [r0, #284] ldr r1, [r1, #48] cmp r0, r1 bne .L157 .L156: 1272 1273 t == tag(x) ldr r1, [sp, #244] orr r1, r1, #32768 str r1, [sp, #244] .LVL182: .L157: ldr r1, .L182+148 .LPIC151: add r1, pc ldr r0, [r1, #208] ldr r1, [r8, #12] ldr r1, [r1, #4] ldr r4, [r1, #64] .LVL183: 1274 %IF form = lab %START cmp r2, #3 beq .L176 .LVL184: .L158: 1275 id = id+1; vid = id ldr r2, [r1, #44] .LVL211: adds r2, r2, #1 str r2, [r1, #44] 1276 %FINISH ldr r2, [r8, #12] ldr r2, [r2, #4] ldr r5, [r2, #44] .LVL212: b .L158 .LVL213: .L177: 1277 t_index = vid add r2, r4, r0, lsl #4 strh r5, [r2, #222] @ movhi 1278 t_text = new name strh r6, [r2, #224] @ movhi 1279 t_flags <- d ldr r1, [sp, #244] strh r1, [r2, #220] @ movhi 1280 t_app = app ldr r1, .L182+152 .LPIC152: add r1, pc ldr r5, [r1, #232] .LVL185: str r5, [r2, #212] 1281 t_format = fdef; format = fdef ldr r5, [r1, #272] str r5, [r2, #216] 1282 subatom = x str r5, [r1, #228] str r0, [r1, #220] 1283 1284 %IF new >= 0 %START; !insert into hash table cmp r3, #0 blt .L160 1285 t_link = dict(new); dict(new) = x ldr r2, [r8, #12] ldr r2, [r2, #4] ldr r2, [r2, #64] add r3, r3, #13376 .LVL186: adds r3, r3, #39 .LVL187: lsls r3, r3, #1 .LVL188: add r2, r2, r3 ldrsh r1, [r2, #4] add r2, r4, r0, lsl #4 strh r1, [r2, #226] @ movhi 1286 %IF gmin = max grammar %START; !proc param params ldr r2, [r8, #12] ldr r2, [r2, #4] ldr r2, [r2, #64] add r3, r3, r2 strh r0, [r3, #4] @ movhi ldr r3, .L182+156 .LPIC156: add r3, pc ldr r3, [r3, #2692] cmp r3, #1720 beq .L177 .L159: .LVL189: .L160: 1287 tmin = tmin-1; subatom = tmin ldr r1, .L182+216 .LPIC157: add r1, pc ldr r3, [r1, #2684] subs r2, r3, #1 str r2, [r1, #2684] 1288 tag(tmin) = t ldr r1, .L182+220 .LPIC159: add r1, pc str r2, [r1, #220] ldr r2, [r8, #12] ldr r2, [r2, #4] ldr r2, [r2, #64] add r2, r2, r3, lsl #4 add r3, r4, r0, lsl #4 add r4, r2, #196 .LVL214: adds r3, r3, #212 ldm r3, {r0, r1, r2, r3} stm r4, {r0, r1, r2, r3} b .L160 .L167: 1289 %FINISH 1290 %FINISH 1291 abandon(3) %IF tmax >= tmin ldr r3, [r8, #12] ldr r3, [r3, #4] ldr r2, .L182+160 .LPIC160: add r2, pc ldr r1, [r2, #2684] ldr r2, [r3, #52] cmp r1, r2 bgt .L112 1292 %END ldr ip, [r3, #64] movs r0, #3 bl ABANDON.10208(PLT) .LVL190: .L131: b .L112 .LVL191: .L173: .L141: 1293 ldr r3, .L182+4 ldr r3, [fp, r3] ldr r2, [sp, #764] ldr r3, [r3] cmp r2, r3 bne .L167 add sp, sp, #772 @ sp needed pop {r4, r5, r6, r7, r8, r9, r10, fp, pc} .LVL154: .L166: bl __stack_chk_fail(PLT) .LVL215: .L183: .align 2 .L182: .word _GLOBAL_OFFSET_TABLE_-(.LPIC70+4) .word __stack_chk_guard(GOT) .word .LANCHOR2-(.LPIC71+4) .word .LANCHOR2-(.LPIC72+4) .word .LANCHOR2-(.LPIC74+4) .word .LANCHOR0-(.LPIC135+4) .word .LANCHOR2-(.LPIC77+4) .word .LANCHOR0-(.LPIC80+4) .word .LANCHOR0-(.LPIC81+4) .word .LANCHOR0-(.LPIC83+4) .word .LANCHOR0-(.LPIC78+4) .word .LANCHOR0-(.LPIC84+4) .word .LANCHOR0-(.LPIC86+4) .word .LANCHOR3-(.LPIC93+4) .word .LANCHOR0-(.LPIC99+4) .word .LANCHOR0-(.LPIC106+4) .word .LANCHOR0-(.LPIC107+4) .word .LANCHOR0-(.LPIC123+4) .word .LANCHOR0-(.LPIC101+4) .word .LANCHOR2-(.LPIC103+4) .word .LANCHOR0-(.LPIC104+4) .word .LANCHOR0-(.LPIC102+4) .word .LANCHOR0-(.LPIC110+4) .word .LANCHOR2-(.LPIC112+4) .word .LANCHOR0-(.LPIC113+4) .word .LANCHOR0-(.LPIC115+4) .word .LANCHOR2-(.LPIC116+4) .word .LANCHOR0-(.LPIC122+4) .word .LANCHOR2-(.LPIC121+4) .word .LANCHOR0-(.LPIC119+4) .word .LANCHOR0-(.LPIC161+4) .word .LANCHOR0-(.LPIC137+4) .word .LANCHOR2-(.LPIC139+4) .word .LANCHOR2-(.LPIC141+4) .word .LANCHOR0-(.LPIC143+4) .word .LANCHOR2-(.LPIC149+4) .word .LANCHOR0-(.LPIC150+4) .word .LANCHOR0-(.LPIC151+4) .word .LANCHOR0-(.LPIC152+4) .word .LANCHOR2-(.LPIC156+4) .word .LANCHOR2-(.LPIC160+4) .word .LANCHOR0-(.LPIC125+4) .word .LANCHOR0-(.LPIC128+4) .word .LANCHOR0-(.LPIC126+4) .word .LANCHOR0-(.LPIC127+4) .word .LANCHOR0-(.LPIC129+4) .word .LANCHOR0-(.LPIC131+4) .word .LANCHOR0-(.LPIC132+4) .word .LANCHOR0-(.LPIC130+4) .word .LANCHOR0-(.LPIC134+4) .word .LANCHOR0-(.LPIC140+4) .word .LANCHOR0-(.LPIC145+4) .word .LANCHOR0-(.LPIC146+4) .word .LANCHOR0-(.LPIC147+4) .word .LANCHOR2-(.LPIC157+4) .word .LANCHOR0-(.LPIC159+4) .LFE205: .align 1 .thumb .thumb_func GETSYM.10595: .LFB201: 1294 1295 1296 top: pos1 = pos 1297 subatom = 0; pend quote = 0; atom flags = 0 ldr r3, .L352+8 .LPIC232: add r3, pc ldr r2, [r3, #260] str r2, [r3, #296] movs r2, #0 str r2, [r3, #220] .LVL256: ldr r2, [r3, #260] str r2, [r3, #296] movs r2, #0 str r2, [r3, #220] 1298 movs r6, #0 .LVL265: .L292: movs r5, #0 .LVL273: .L274: 1299 !app and format must be left for assigning to papp & pformat str r2, [r3, #224] str r2, [r3, #224] 1300 1301 ->name %IF symtype = -2; !letter ldr r3, [r3, #320] cmn r3, #2 beq .L260 ldr r3, [r3, #320] cmn r3, #2 beq .L260 .L267: 1302 ->number %IF symtype < 0; !digit cmp r3, r2 blt .L261 cmp r3, #0 blt .L261 .L268: 1303 %IF symtype = 0 %START cbz r3, .L262 cmp r3, #0 beq .L262 .L269: 1304 atom1 = termin; atom2 = 0 ldr r3, .L352+24 .LPIC238: add r3, pc movs r2, #20 str r2, [r3, #240] 1305 %RETURN movs r2, #0 str r2, [r3, #248] b .L259 .L264: 1306 %FINISH 1307 %IF symtype # 2 %START; !catch keywords here cmp r3, #2 beq .L276 cmp r3, #2 beq .L276 1308 ->text %IF quote # 0; !completion of text ldr r3, .L352+12 .LPIC237: add r3, pc ldr r3, [r3, #324] cbz r3, .L264 ldr r3, .L352+76 .LPIC240: add r3, pc ldr r3, [r3, #324] cmp r3, #0 beq .L264 .L271: 1309 ->strings %IF sym = squote; !start of string ldr r3, .L352+28 .LPIC241: add r3, pc ldr r3, [r3, #2548] cmp r3, #34 beq .L272 .L273: 1310 ->symbols %IF sym = cquote; !start of symbol cmp r3, #39 beq .L326 .L275: 1311 ->number %IF sym = '.' %AND '0' <= nextsymbol <= '9' cmp r3, #46 beq .L337 .L263: .L276: 1312 %FINISH 1313 1314 !locate atom in fixed dict 1315 k = key>>2; read sym ldr r6, .L352+32 .LPIC242: add r6, pc ldr r3, [r6, #328] lsrs r5, r3, #2 .LVL258: 1316 %CYCLE mov ip, r4 bl READSYM.10600(PLT) .LVL259: .LDL11: 1317 j = kdict(k) ldr r3, [r4, #4] ldr r3, [r3, #64] add r3, r3, r5, lsl #1 movw r2, #25620 ldrsh r2, [r3, r2] .LVL260: .LDL12: subs r0, r0, #48 cmp r0, #9 bhi .L276 .L261: .LBE383: 1318 %EXIT %IF j&x'4000' # 0 1319 %IF j&127 # sym %OR symtype < 0 %START 1320 ->err %UNLESS j < 0 1321 k = k+1 1322 %FINISH %ELSE %START 1323 l = j>>7&127; read sym 1324 %IF j > 0 %START 1325 %IF l # 0 %START 1326 ->err %IF l # sym %OR symtype < 0 1327 read sym 1328 %FINISH 1329 l = 1 1330 %FINISH 1331 k = k+l 1332 %FINISH 1333 %REPEAT 1334 atom1 = j&127 and r1, r2, #127 str r1, [r6, #240] 1335 %IF atom1 = 0 %START; !comma cmp r1, #0 bne .L277 1336 atom1 = 19; subatom = 19; atom2 = 0 ldr r3, .L352+36 .LPIC244: add r3, pc movs r2, #19 .LVL261: str r2, [r3, #240] 1337 %IF sym = nl %START str r2, [r3, #220] ldr r3, .L352+40 .LPIC247: add r3, pc ldr r3, [r3, #2548] cmp r3, #10 bne .L259 1338 %RETURN %IF ocount >= 0 movs r2, #0 str r2, [r3, #248] ldr r3, .L352+44 .LPIC248: add r3, pc ldr r3, [r3, #2552] cmp r3, r2 bge .L259 .L278: 1339 1340 !special action needs to be taken with as 1341 !const array lists can be enormous 1342 1343 read sym mov ip, r4 bl READSYM.10600(PLT) .LVL262: b .L259 .LVL263: .L337: .LBB383: .LBB384: .LBB385: bl _imp_nextsymbol(PLT) .LVL264: .LBE385: .LBE384: 1344 %FINISH 1345 %RETURN 1346 %FINISH 1347 atom2 = j>>7&127 ldr r1, .L352+56 .LPIC249: add r1, pc ubfx r2, r2, #7, #7 .LVL270: str r2, [r1, #248] 1348 subatom = kdict(k+1)&x'3fff' movw r2, #25622 ldrh r3, [r3, r2] .LVL271: ubfx r3, r3, #0, #14 str r3, [r1, #220] 1349 !!!!!cont = ' ' 1350 %RETURN b .L259 .LVL272: .L326: 1351 1352 !report an error. adjust the error marker (pos1) to point 1353 !to the faulty character in an atom, but care needs to be taken 1354 !to prevent misleading reports in cases like ...????? 1355 1356 err: atom1 = error+1; atom2 = 0 1357 pos1 = pos %IF pos-pos1 > 2 ldr r3, .L352+224 .LPIC251: add r3, pc movw r2, #32769 str r2, [r3, #240] ldr r2, [r3, #260] ldr r3, [r3, #296] subs r3, r2, r3 cmp r3, #2 ble .L259 1358 %RETURN movs r2, #0 str r2, [r3, #248] ldr r3, .L352+228 .LPIC255: add r3, pc str r2, [r3, #296] b .L259 .LVL329: .L335: ldr r10, [sp, #12] b .L259 .LVL330: .L340: 1359 1360 !take care with strings and symbol constants. 1361 !make sure the constant is valid here before sucking it in 1362 !(and potentially loosing many lines) 1363 1364 symbols:atom1 = var; atom2 = const; type = integer 1365 map gg = const; protection = prot ldr r3, .L352+60 .LPIC256: add r3, pc movs r2, #91 str r2, [r3, #240] str r2, [r3, #252] 1366 subatom = lp; abandon(3) %IF lp >= lit max movs r2, #93 str r2, [r3, #248] ldr r2, [r3, #332] str r2, [r3, #220] 1367 quote = \pend quote movs r1, #1 str r1, [r3, #236] cmp r2, #49 bgt .L339 .L281: mvns r5, r5 .LVL274: ldr r2, .L352+64 .LPIC262: add r2, pc str r5, [r2, #324] 1368 %RETURN b .L259 .LVL275: .L339: ldr r3, [r4, #4] ldr ip, [r3, #64] movs r0, #3 bl ABANDON.10208(PLT) .LVL276: b .L281 .LVL277: .L341: .L284: 1369 1370 !an integer constant is acceptable so get it in and 1371 !get the next atom 1372 1373 chars:n = 0; cont = cquote 1374 %CYCLE movs r3, #0 str r3, [sp, #20] 1375 read sym ldr r5, .L352+16 .LPIC263: add r5, pc movs r6, #39 str r6, [r5, #2836] .LDL14: mov ip, r4 bl READSYM.10600(PLT) .LVL281: 1376 %IF sym = cquote %START ldr r3, [r5, #2548] cmp r3, #39 bne .L282 .LBB386: .LBB387: bl _imp_nextsymbol(PLT) .LVL282: .LBE387: .LBE386: 1377 %EXIT %IF nextsymbol # cquote cmp r0, #39 beq .L341 .L283: 1378 read sym mov ip, r4 bl READSYM.10600(PLT) .LVL278: .L282: 1379 %FINISH 1380 %IF n&(\((-1)>>byte size)) # 0 %START; ! overflow 1381 pos1 = pos; atom1 = error+10; %RETURN ldr r3, .L352+68 .LPIC265: add r3, pc ldr r2, [r3, #260] str r2, [r3, #296] 1382 %FINISH movw r2, #32778 str r2, [r3, #240] .LVL279: .L259: 1383 ->err %IF quote = 0 1384 n = n<top adds r2, r2, #1 str r2, [r3, #332] .LDL13: 1391 1392 !sniff the grammar before getting the string 1393 1394 strings:atom1 = var; atom2 = const; type = stringv 1395 subatom = (strp-stbase)!x'4000' ldr r3, .L352+84 .LPIC278: add r3, pc movs r2, #91 str r2, [r3, #240] ldr r2, [r4] ldr r0, [r3, #336] subs r2, r2, r0 orr r2, r2, #16384 str r2, [r3, #220] 1396 map gg = const; protection = prot movs r1, #93 str r1, [r3, #248] str r1, [r3, #252] 1397 quote = subatom movs r2, #3 str r2, [r3, #236] str r2, [r3, #324] 1398 text line = lines; !in case of errors ldr r2, [r3, #184] str r2, [r3, #340] 1399 %RETURN b .L259 .L265: 1400 1401 !a string constant is ok here, so pull it in and get 1402 !the next atom 1403 1404 text: ->chars %IF quote < 0; !character consts 1405 l = strp; n = strp cmp r3, r2 bge .L265 cmp r3, #0 bge .L265 .L266: ldr r5, [r4] .LVL284: 1406 j = addr(glink(gmin-1)); !absolute limit str r5, [sp, #20] .LVL285: ldr r3, .L352+88 .LPIC288: add r3, pc ldr r6, [r3, #2692] ldr r3, .L352+92 .LPIC287: add r3, pc add r3, r3, r6, lsl #1 adds r6, r3, #2 cmp r6, r2 it ge movge r6, r2 .LDL15: .LDL16: .LDL17: 1407 k = l+256; !string length limit add r2, r5, #256 .LVL286: 1408 k = j %IF j < k; !choose lower 1409 1410 %CYCLE 1411 cont = squote; quote = 1 ldr r3, .L352+96 .LPIC289: add r3, pc movs r3, #34 str r3, [r10, #2836] 1412 %CYCLE ldr r2, .L352+100 .LVL287: .LPIC290: add r2, pc str r2, [sp, #8] ldr r3, [sp, #8] mov r2, r3 movs r3, #1 str r3, [r2, #324] .LVL293: .L286: 1413 read sym mov ip, r4 bl READSYM.10600(PLT) .LVL294: 1414 %IF sym = squote %START; !terminator? ldr r7, .L352+104 .LPIC291: add r7, pc ldr r3, [r7, #2548] cmp r3, #34 beq .L343 .L287: 1415 %EXIT %IF nextsymbol # squote; !yes -> cmp r0, #34 bne .L288 .L289: 1416 read sym; ! skip quote mov ip, r4 bl READSYM.10600(PLT) .LVL290: b .L287 .L288: 1417 %FINISH 1418 l = l+1; byteinteger(l) = sym 1419 lines = text line %AND abandon(7) %IF l >= k; !too many chars ldr r8, .L352+108 .LPIC292: add r8, pc ldr r3, [r8, #2548] strb r3, [r5, #1]! .LVL295: cmp r5, r6 blt .L286 1420 %REPEAT ldr r9, .L352+112 .LPIC293: add r9, pc str r10, [sp, #12] mov r10, r3 b .L291 .LVL288: .L343: .LBB388: .LBB389: bl _imp_nextsymbol(PLT) .LVL289: .LBE389: .LBE388: ldr r3, [r9, #340] str r3, [r9, #184] 1421 byteinteger(n) = l-n; !plug in length ldr r3, [sp, #20] subs r2, r5, r3 strb r2, [r3] ldr r3, [r4, #4] ldr ip, [r3, #64] movs r0, #7 bl ABANDON.10208(PLT) .LVL296: b .L286 .LVL297: .L342: ldr r10, [sp, #12] 1422 1423 strp = l+1; !ready for next string adds r3, r5, #1 str r3, [r4] 1424 quote = 0; cont = ' '; read sym ldr fp, .L352+116 .LPIC295: add fp, pc movs r3, #0 str r3, [fp, #324] 1425 code atom(target) ldr r3, .L352+120 .LPIC296: add r3, pc movs r2, #32 str r2, [r3, #2836] mov ip, r4 ldr r0, [sp, #4] bl CODEATOM.10640(PLT) .LVL292: 1426 %RETURN %UNLESS atom1 = 48 %AND sym = squote; !fold "???"."+++" mov ip, r4 bl READSYM.10600(PLT) .LVL291: ldr r3, [fp, #240] cmp r3, #48 bne .L335 1427 %REPEAT ldr r3, .L352+124 .LPIC298: add r3, pc ldr r3, [r3, #2548] cmp r3, #34 bne .L342 .L291: 1428 b .L259 .LVL298: .L338: 1429 %ROUTINE get(%INTEGER limit) @ Nested: function declared inside another function. @ args = 0, pretend = 0, frame = 0 @ frame_needed = 0, uses_anonymous_args = 0 .LVL245: push {r3, r4, r5, r6, r7, r8, r9, lr} mov r7, r0 mov r4, ip .LVL246: 1430 %INTEGER s, shift 1431 shift = 0 it eq moveq r5, #0 1432 %IF base # 10 %START ldr r5, [ip, #8] cmp r5, #10 beq .L239 1433 %IF base = 16 %START cmp r5, #16 beq .L239 .L235: 1434 shift = 4 it eq moveq r5, #4 1435 %FINISH %ELSE %START 1436 %IF base = 8 %START cmp r5, #8 beq .L239 .L236: 1437 shift = 3 it eq moveq r5, #3 1438 %FINISH %ELSE %START 1439 %IF base = 2 %START cmp r5, #2 ite ne movne r5, #0 moveq r5, #1 .L234: .L237: .L238: .L239: .LVL247: 1440 shift = 1 1441 %FINISH 1442 %FINISH 1443 %FINISH 1444 %FINISH 1445 n = 0 movs r3, #0 str r3, [r4, #4] 1446 %CYCLE 1447 %IF symtype = -1 %START; !digit ldr r6, .L257 .LPIC226: add r6, pc ldr r3, [r6, #320] cmp r3, #-1 beq .L255 .L241: 1448 s = sym-'0' ldr r3, .L257+8 .LPIC227: add r3, pc ldr r3, [r3, #2548] subs r3, r3, #48 .LVL249: 1449 %FINISH %ELSE %START b .L244 .L256: 1450 %IF symtype < 0 %START; !letter cmp r3, #0 bge .L233 1451 s = sym-'A'+10 ldr r8, .L257+4 .LPIC228: add r8, pc ldr r3, [r8, #2548] subs r3, r3, #55 .LVL252: .L242: .L244: 1452 %FINISH %ELSE %START 1453 %RETURN 1454 %FINISH 1455 %FINISH 1456 %RETURN %IF s >= limit cmp r3, r7 bge .L233 .L245: 1457 pt = pt+1; byteinteger(pt) = sym ldr r2, [r4] adds r1, r2, #1 str r1, [r4] 1458 %IF base = 10 %START; !check overflow ldr r1, .L257+16 .LPIC229: add r1, pc ldr r1, [r1, #2548] strb r1, [r2, #1] ldr r2, [r4, #8] cmp r2, #10 beq .L256 .L246: .L248: 1459 %IF n >= max int %AND (s > max dig %OR n > max int) %START movw r9, #52427 movt r9, 3276 b .L240 .LVL248: .L255: ldr r2, [r4, #4] cmp r2, r9 ble .L248 1460 1461 !too big for an integer, movw r1, #52428 movt r1, 3276 cmp r2, r1 it le cmple r3, #7 ble .L248 .L247: 1462 !so call it a real 1463 1464 base = 0; type = real; n = 0 movs r1, #0 str r1, [r4, #8] 1465 %FINISH ldr r2, .L257+12 .LPIC230: add r2, pc movs r0, #2 str r0, [r2, #236] 1466 %FINISH str r1, [r4, #4] b .L248 .L249: 1467 %IF shift = 0 %START cmp r5, #0 bne .L249 1468 n = n*base+s ldr r2, [r4, #4] ldr r1, [r4, #8] mla r3, r1, r2, r3 .LVL253: str r3, [r4, #4] 1469 %FINISH %ELSE %START b .L250 .L243: .L233: 1470 n = n<= lit max movs r1, #93 str r1, [r3, #248] cmp r2, #49 bgt .L338 .L293: 1480 pt = strp; mul = 0 movs r2, #1 str r2, [r3, #236] ldr r3, [r4] add r5, sp, #40 str r3, [r5, #-24]! .LVL266: ldr r3, [r4, #4] ldr ip, [r3, #64] movs r0, #3 bl ABANDON.10208(PLT) .LVL299: b .L293 .L295: .LVL300: .L298: 1481 %CYCLE ldr r2, [r3, #332] str r2, [r3, #220] 1482 get(base) mov ip, r5 ldr r0, [sp, #24] bl GET.10767(PLT) .LVL267: 1483 %EXIT %UNLESS sym = '_' %AND base # 0 %AND pend quote = 0; !change of base ldr r7, .L352+52 .LPIC305: add r7, pc ldr r3, [r7, #2548] cmp r3, #95 bne .L298 1484 pt = pt+1; byteinteger(pt) = '_' ldr r3, [sp, #16] adds r2, r3, #1 str r2, [sp, #16] 1485 read sym mov r8, #95 .L294: clz r3, r6 lsrs r3, r3, #5 ldr r2, [sp, #24] cmp r2, #0 it eq moveq r3, #0 cmp r3, #0 beq .L296 .L297: strb r8, [r3, #1] mov ip, r4 bl READSYM.10600(PLT) .LVL268: 1486 base = n ldr r3, [sp, #20] str r3, [sp, #24] 1487 %REPEAT b .L294 .LVL269: .L277: 1488 1489 %IF pend quote # 0 %START cbz r6, .L299 cmp r6, #0 beq .L302 .LVL328: .L279: .L280: 1490 ->err %IF sym # cquote cmp r3, #39 bne .L279 .L300: 1491 readsym mov ip, r4 bl READSYM.10600(PLT) .LVL301: .L299: 1492 %FINISH 1493 %IF sym = '.' %START; !a real constant ldr r3, .L352+128 .LPIC306: add r3, pc ldr r3, [r3, #2548] cmp r3, #46 beq .L344 .L301: 1494 pt = pt+1; byteinteger(pt) = '.' ldr r3, [sp, #16] adds r2, r3, #1 str r2, [sp, #16] 1495 read sym movs r2, #46 strb r2, [r3, #1] mov ip, r4 bl READSYM.10600(PLT) .LVL302: 1496 type = real; n = base; base = 0; get(n) ldr r3, .L352+144 .LPIC307: add r3, pc movs r2, #2 str r2, [r3, #236] 1497 %FINISH ldr r0, [sp, #24] str r0, [sp, #20] 1498 movs r3, #0 str r3, [sp, #24] 1499 %IF sym = '@' %START; !an exponent ldr r3, .L352+132 .LPIC308: add r3, pc ldr r3, [r3, #2548] cmp r3, #64 beq .L345 .L302: add ip, sp, #16 bl GET.10767(PLT) .LVL303: b .L301 .L345: 1500 pt = pt+1; byteinteger(pt) = '@'; k = pt ldr r3, [sp, #16] adds r2, r3, #1 str r2, [sp, #16] 1501 readsym movs r2, #64 strb r2, [r3, #1] mov ip, r4 bl READSYM.10600(PLT) .LVL305: 1502 type = integer; base = 10 ldr r5, [sp, #16] .LVL304: ldr r3, .L352+148 .LPIC309: add r3, pc movs r2, #1 str r2, [r3, #236] 1503 %IF sym = '-' %START movs r3, #10 str r3, [sp, #24] ldr r3, .L352+152 .LPIC310: add r3, pc ldr r3, [r3, #2548] cmp r3, #45 beq .L346 .L303: 1504 read sym; get(10); n = -n mov ip, r4 bl READSYM.10600(PLT) .LVL309: 1505 %FINISH %ELSE %START add ip, sp, #16 movs r0, #10 bl GET.10767(PLT) .LVL310: b .L304 .LVL311: .L260: .LBB390: 1506 get(10) add ip, sp, #16 movs r0, #10 bl GET.10767(PLT) .LVL306: .L304: ldr r3, [sp, #20] negs r3, r3 str r3, [sp, #20] 1507 %FINISH 1508 pt = k+1; byteinteger(pt) = lp; litpool(lp) = n; lp = lp+1 adds r3, r5, #1 str r3, [sp, #16] 1509 atom1 = error+10 %IF base = 0 ldr r2, .L352+156 .LPIC311: add r2, pc ldr r3, [r2, #332] strb r3, [r5, #1] ldr r3, [sp, #24] cbnz r3, .L305 1510 type = real; !exponents force the type ldr r1, [r4, #4] ldr r1, [r1, #64] ldr r0, [sp, #20] str r0, [r1, r3, lsl #2] ldr r3, .L352+160 .LPIC313: add r3, pc movw r2, #32778 str r2, [r3, #240] .L305: ldr r3, .L352+164 .LPIC314: add r3, pc movs r2, #2 str r2, [r3, #236] .LVL307: .L306: 1511 %FINISH adds r3, r3, #1 str r3, [r2, #332] 1512 1513 %IF type = real %START ldr r3, .L352+136 .LPIC315: add r3, pc ldr r3, [r3, #236] cmp r3, #2 beq .L306 .L307: 1514 byteinteger(strp) = pt-strp ldr r2, [r4] ldr r3, [sp, #16] subs r3, r3, r2 strb r3, [r2] 1515 subatom = (strp-stbase)!x'2000'; strp = pt+1 ldr r2, .L352+168 .LPIC316: add r2, pc ldr r3, [r4] ldr r1, [r2, #336] subs r3, r3, r1 orr r3, r3, #8192 str r3, [r2, #220] 1516 %FINISH %ELSE %START ldr r3, [sp, #16] adds r3, r3, #1 str r3, [r4] b .L259 .LVL308: .L346: 1517 litpool(lp) = n ldr r2, .L352+140 .LPIC318: add r2, pc ldr r3, [r2, #332] ldr r1, [r4, #4] ldr r1, [r1, #64] ldr r0, [sp, #20] str r0, [r1, r3, lsl #2] 1518 lp = lp+1 adds r3, r3, #1 str r3, [r2, #332] b .L259 .L344: 1519 %FINISH 1520 %RETURN 1521 1522 name: atom1 = 0 %AND %RETURN %IF 27 <= target <= 41 1523 hash value = 0 ldr r3, [r4, #4] ldr r3, [r3, #64] movs r2, #0 str r2, [r3, #208] 1524 1525 !***************************** 1526 !*machine dependent for speed* 1527 !***************************** 1528 ldr r3, [sp, #4] subs r3, r3, #27 cmp r3, #14 bls .L347 .L308: .LBE390: 1529 dp = dmax+1 ldr r2, .L352+172 .LPIC321: add r2, pc ldr r3, [r2, #2556] adds r1, r3, #1 str r1, [r2, #2564] 1530 da = addr(dict(dp)); dbase = da ldr r2, [r4, #4] add r8, r3, #13376 add r8, r8, #42 ldr r9, [r2, #64] add fp, r9, r8, lsl #1 .LVL312: mov r5, fp ldr r3, .L352+208 .LPIC320: add r3, pc movs r2, #0 str r2, [r3, #240] 1531 %CYCLE b .L259 .LVL319: .L348: 1532 hash value = hash value+(hash value+sym); !is this good enough? ldr r7, .L352+176 .LPIC323: add r7, pc ldr r2, [r7, #2548] ldr r3, [r4, #4] ldr r1, [r3, #64] ldr r3, [r1, #208] add r3, r2, r3, lsl #1 str r3, [r1, #208] 1533 da = da+1; byteinteger(da) = sym 1534 read sym strb r2, [r5, #1]! .LVL314: mov ip, r4 bl READSYM.10600(PLT) .LVL315: 1535 %EXIT %IF symtype >= 0 ldr r6, .L352+180 .LPIC324: add r6, pc .L309: .LVL313: .L331: .L310: ldr r3, [r6, #320] cmp r3, #0 blt .L331 .L311: 1536 %REPEAT 1537 %IF sym = cquote %START ldr r3, .L352+184 .LPIC325: add r3, pc ldr r3, [r3, #2548] cmp r3, #39 beq .L348 .L312: 1538 pend quote = 100 it eq moveq r5, #100 .LVL320: moveq r6, #100 movs r6, #100 moveq r6, #100 1539 ->symbols %IF hash value = 'M' ldr r3, [r4, #4] ldr r3, [r3, #64] ldr r3, [r3, #208] cmp r3, #77 beq .L274 .L313: 1540 read sym mov ip, r4 bl READSYM.10600(PLT) .LVL321: 1541 %IF hash value = 'X' %THEN base = 16 %AND ->bxk ldr r3, [r4, #4] ldr r3, [r3, #64] ldr r3, [r3, #208] cmp r3, #88 beq .L292 .L314: 1542 %IF hash value = 'K' %C ittt eq moveq r3, #16 streq r3, [sp, #24] bic r2, r3, #4 1543 %OR hash value = 'O' %THEN base = 8 %AND ->bxk cmp r2, #75 bne .L315 .L316: 1544 %IF hash value = 'B' %THEN base = 2 %AND ->bxk cmp r3, #66 bne .L279 1545 ->err movs r3, #8 str r3, [sp, #24] ittt eq moveq r3, #2 streq r3, [sp, #24] 1546 %FINISH b .L292 .L315: 1547 n = da-dbase sub r5, r5, fp .LVL316: str r5, [sp, #20] b .L292 .LVL322: .L349: 1548 byteinteger(dbase) = n strb r5, [r9, r8, lsl #1] 1549 dp = dp+(n+2)>>1 adds r5, r5, #2 ldr r2, .L352+188 .LPIC326: add r2, pc ldr r3, [r2, #2564] add r5, r3, r5, lsr #1 str r5, [r2, #2564] 1550 abandon(8) %IF dp >= dmin ldr r3, [r4, #4] ldr r2, [r3, #40] cmp r5, r2 bge .L349 .L317: 1551 ldr ip, [r3, #64] movs r0, #8 bl ABANDON.10208(PLT) .LVL323: b .L317 .L350: 1552 atom2 = 90; !ident ldr r3, .L352+192 .LPIC328: add r3, pc movs r2, #90 str r2, [r3, #248] 1553 %IF last1 = 0 %AND sym = ':' %START; !label ldr r3, [r3, #276] cmp r3, #0 bne .L318 1554 limit = local; lookup(lab); %RETURN ldr r3, .L352+196 .LPIC330: add r3, pc ldr r3, [r3, #2548] cmp r3, #58 beq .L350 .L319: ldr r3, .L352+212 .LPIC331: add r3, pc ldr r2, [r3, #344] str r2, [r3, #216] 1555 %FINISH add ip, sp, #16 movs r0, #3 bl LOOKUP.10653(PLT) .LVL324: 1556 %IF last1 = jump %START; !->label b .L259 .L318: cmp r3, #54 bne .L319 1557 limit = local; lookup(lab+spec+used bit); %RETURN ldr r3, .L352+216 .LPIC333: add r3, pc ldr r2, [r3, #344] str r2, [r3, #216] 1558 %FINISH add ip, sp, #16 movw r0, #32899 bl LOOKUP.10653(PLT) .LVL325: 1559 %IF decl # 0 %AND target = 90 %START; !identifier ldr r3, .L352+200 .LPIC335: add r3, pc ldr r0, [r3, #264] clz r3, r0 lsrs r3, r3, #5 b .L259 .L351: 1560 search base = fm base ldr r2, [sp, #4] cmp r2, #90 it ne orrne r3, r3, #1 cmp r3, #0 beq .L351 .L320: ldr r4, .L352+220 .LPIC336: add r4, pc ldr r3, [r4, #348] str r3, [r4, #200] 1561 limit = local; lookup(decl) ldr r3, [r4, #344] str r3, [r4, #216] 1562 search base = 0 add ip, sp, #16 bl LOOKUP.10653(PLT) .LVL326: movs r3, #0 str r3, [r4, #200] 1563 %FINISH %ELSE %START b .L259 .LVL327: .L296: 1564 limit = 0; lookup(0) movs r0, #0 ldr r3, .L352+204 .LPIC341: add r3, pc str r0, [r3, #216] 1565 %FINISH add ip, sp, #16 bl LOOKUP.10653(PLT) .LVL317: .L270: .L321: .L322: .L323: .L324: b .L259 .LVL318: .L347: 1566 %END 1567 ldr r3, .L352+4 ldr r3, [r10, r3] ldr r2, [sp, #36] ldr r3, [r3] cmp r2, r3 bne .L340 add sp, sp, #44 @ sp needed pop {r4, r5, r6, r7, r8, r9, r10, fp, pc} .LVL280: .L285: bl __stack_chk_fail(PLT) .LVL331: .L353: .align 2 .L352: .word _GLOBAL_OFFSET_TABLE_-(.LPIC231+4) .word __stack_chk_guard(GOT) .word .LANCHOR0-(.LPIC232+4) .word .LANCHOR0-(.LPIC237+4) .word .LANCHOR2-(.LPIC263+4) .word .LANCHOR0-(.LPIC268+4) .word .LANCHOR0-(.LPIC238+4) .word .LANCHOR2-(.LPIC241+4) .word .LANCHOR0-(.LPIC242+4) .word .LANCHOR0-(.LPIC244+4) .word .LANCHOR2-(.LPIC247+4) .word .LANCHOR2-(.LPIC248+4) .word .LANCHOR0-(.LPIC299+4) .word .LANCHOR2-(.LPIC305+4) .word .LANCHOR0-(.LPIC249+4) .word .LANCHOR0-(.LPIC256+4) .word .LANCHOR0-(.LPIC262+4) .word .LANCHOR0-(.LPIC265+4) .word .LANCHOR0-(.LPIC271+4) .word .LANCHOR0-(.LPIC240+4) .word .LANCHOR2-(.LPIC269+4) .word .LANCHOR0-(.LPIC278+4) .word .LANCHOR2-(.LPIC288+4) .word .LANCHOR1-(.LPIC287+4) .word .LANCHOR2-(.LPIC289+4) .word .LANCHOR0-(.LPIC290+4) .word .LANCHOR2-(.LPIC291+4) .word .LANCHOR2-(.LPIC292+4) .word .LANCHOR0-(.LPIC293+4) .word .LANCHOR0-(.LPIC295+4) .word .LANCHOR2-(.LPIC296+4) .word .LANCHOR2-(.LPIC298+4) .word .LANCHOR2-(.LPIC306+4) .word .LANCHOR2-(.LPIC308+4) .word .LANCHOR0-(.LPIC315+4) .word .LANCHOR0-(.LPIC318+4) .word .LANCHOR0-(.LPIC307+4) .word .LANCHOR0-(.LPIC309+4) .word .LANCHOR2-(.LPIC310+4) .word .LANCHOR0-(.LPIC311+4) .word .LANCHOR0-(.LPIC313+4) .word .LANCHOR0-(.LPIC314+4) .word .LANCHOR0-(.LPIC316+4) .word .LANCHOR2-(.LPIC321+4) .word .LANCHOR2-(.LPIC323+4) .word .LANCHOR0-(.LPIC324+4) .word .LANCHOR2-(.LPIC325+4) .word .LANCHOR2-(.LPIC326+4) .word .LANCHOR0-(.LPIC328+4) .word .LANCHOR2-(.LPIC330+4) .word .LANCHOR0-(.LPIC335+4) .word .LANCHOR0-(.LPIC341+4) .word .LANCHOR0-(.LPIC320+4) .word .LANCHOR0-(.LPIC331+4) .word .LANCHOR0-(.LPIC333+4) .word .LANCHOR0-(.LPIC336+4) .word .LANCHOR0-(.LPIC251+4) .word .LANCHOR0-(.LPIC255+4) .LFE204: .align 1 .thumb .thumb_func GETNEXT.11214: .LFB211: 1568 %INTEGERFN parsed machine code 1569 ! *opcode_?????????? 1570 %routine octal(%integer n) 1571 %integer m 1572 m = n>>3 1573 octal(m) %if m # 0 1574 bp = bp+1; buff(bp) = n&7+'0' 1575 %end 1576 atom1 = error %AND %RESULT=0 %UNLESS symtype = -2; !starts with letter 1577 flush buffer %IF bp >= 128 1578 bp=bp+1 %AND buff(bp)='w' 1579 %CYCLE 1580 bp=bp+1 %AND buff(bp)=sym 1581 read sym 1582 %EXIT %IF symtype >= 0; !pull in letters and digits 1583 %REPEAT 1584 bp=bp+1 %AND buff(bp)='_' 1585 %IF symtype # 0 %START; !not terminator 1586 atom1 = error %AND %result=0 %UNLESS sym = '_' 1587 read sym 1588 %WHILE symtype # 0 %CYCLE 1589 %IF symtype < 0 %START; !complex 1590 code atom(0); %result=0 %IF atom1&error # 0 1591 %IF atom2 = const %AND type = integer %START 1592 %IF subatom < 0 %THEN octal(tag(-subatom)_format) %C 1593 %ELSE octal(litpool(subatom)) 1594 %FINISH %ELSE %START 1595 %IF 91 <= atom1 <= 109 %START 1596 %if atom1 = 104 {label} %and %C 1597 Tag(Subatom)_Flags&Closed = 0 %start 1598 This = Subatom; Atom1 = Error+21 1599 %result = 0 1600 %finish 1601 op(' ', tag(subatom)_index) 1602 %FINISH %ELSE %START 1603 atom1 = error; %result=0 1604 %FINISH 1605 %FINISH 1606 %FINISH %ELSE %START 1607 bp=bp+1 %AND buff(bp)=sym; read sym 1608 %FINISH 1609 %REPEAT 1610 %FINISH 1611 bp=bp+1 %AND buff(bp)=';' 1612 %RESULT=1 1613 %END 1614 1615 cont = ' ' %IF gg = 0 ldr r3, .L932+8 .LPIC724: add r3, pc ldr r0, [r3, #656] cbnz r0, .L837 1616 last1 = 0; mapgg = 0 ldr r3, .L932+12 .LPIC725: add r3, pc movs r2, #32 str r2, [r3, #2836] .L837: ldr r3, .L932+16 .LPIC726: add r3, pc movs r2, #0 str r2, [r3, #276] 1617 s = 0; ss = 0; sstype = -1; fdef = 0 str r2, [r3, #252] .LVL748: 1618 fm base = 0 str r2, [r3, #624] str r2, [r3, #348] 1619 app = 0 mov r1, #-1 str r1, [r3, #620] str r2, [r3, #232] 1620 str r2, [r3, #272] 1621 !deal with alignment following an error in one statement 1622 !of several on a line 1623 1624 margin = column; !start of statement ldr r1, [r3, #288] str r1, [r3, #300] 1625 1626 pos = 0 str r2, [r3, #260] 1627 stbase = addr(glink(gmax+1)); strp = stbase; lp = 0 ldr r1, .L932+20 .LPIC736: add r1, pc ldr r4, [r1] add r1, r1, r4, lsl #1 adds r1, r1, #6 str r1, [r3, #336] 1628 tbase = tstart; !?????????????? str r1, [sp, #296] ldr r2, [r6, #60] str r2, [r6, #56] 1629 local = tbase str r2, [r3, #332] str r2, [r3, #344] 1630 1631 %IF gg = 0 %or ocount >= 0 %START; !data or not continuation(z) cbz r0, .L838 1632 again:%WHILE sym type = 0 %CYCLE; !skip redundant terminators ldr r3, .L932+24 .LPIC741: add r3, pc ldr r3, [r3, #2552] cmp r3, #0 blt .L848 .L838: 1633 c = cont ldr r3, .L932+44 .LPIC743: add r3, pc ldr r4, [r3, #2836] .LVL752: 1634 cont = ' '; cont = '+' %IF ocount >= 0 ldr r8, .L932+28 .LPIC742: add r8, pc ldr r3, [r8, #320] cbnz r3, .L841 movs r2, #32 str r2, [r3, #2836] 1635 read sym add ip, sp, #296 bl READSYM.10600(PLT) .LVL750: ldr r3, [r3, #2552] cmp r3, #0 blt .L842 1636 cont = c ldr r3, .L932+40 .LPIC747: add r3, pc str r4, [r3, #2836] .LVL751: .L840: ldr r3, .L932+48 .LPIC746: add r3, pc movs r2, #43 str r2, [r3, #2836] b .L842 .LVL753: .L841: 1637 %REPEAT 1638 ->skip %IF sym = '!'; !comment ldr r10, .L932+32 .LPIC748: add r10, pc ldr r3, [r10, #2548] cmp r3, #33 beq .L844 .L845: 1639 this = -1 ldr r3, .L932+52 .LPIC749: add r3, pc mov r2, #-1 str r2, [r3, #2568] 1640 code atom(0) add ip, sp, #296 movs r0, #0 bl CODEATOM.10640(PLT) .LVL754: 1641 %IF atom1 = comment %START ldr r3, .L932+56 .LPIC750: add r3, pc ldr r3, [r3, #240] cmp r3, #22 bne .L848 .L844: 1642 skip: quote = 1 1643 c = cont ldr fp, .L932+36 .LPIC751: add fp, pc b .L840 .LVL749: .L842: movs r3, #1 str r3, [fp, #324] ldr r3, .L932+60 .LPIC752: add r3, pc ldr r5, [r3, #2836] .LVL755: 1644 read sym %AND cont = c %WHILE sym # nl; !skip to end of line 1645 quote = 0; symtype = 0 ldr r3, [r3, #2548] cmp r3, #10 beq .L846 ldr r3, [r4, #2548] cmp r3, #10 bne .L847 .L846: ldr r3, .L932+68 .LPIC756: add r3, pc movs r2, #0 str r2, [r3, #324] 1646 ->again add r7, sp, #296 mov ip, r7 bl READSYM.10600(PLT) .LVL756: str r2, [r3, #320] b .L840 .L839: .LVL757: .L848: 1647 %FINISH ldr r4, .L932+64 .LPIC754: add r4, pc .L847: str r5, [r4, #2836] .LDL36: 1648 %FINISH 1649 decl = 0; mark = 0 ldr r3, .L932+72 .LPIC758: add r3, pc movs r2, #0 str r2, [r3, #264] .LVL758: 1650 gentype = 0; force = 0 str r2, [r3, #660] 1651 dim = 0; prot err = 0 str r2, [r3, #664] str r2, [r3, #192] .LVL759: 1652 node = 0; nmax = 0; nmin = rec size+1 strh r2, [sp, #286] @ movhi 1653 order = 1; gmin = max grammar+1 str r2, [r3, #668] movs r2, #1 str r2, [r3, #628] 1654 sstype = 0 %AND ->more %IF gg # 0; !continuation movw r2, #521 str r2, [r3, #672] ldr r2, .L932+76 .LPIC765: add r2, pc movw r1, #1721 str r1, [r2, #2692] ldr r3, [r3, #656] cbz r3, .L849 1655 ptype = 0; spec given = 0 movs r5, #0 ldr r3, .L932+80 .LPIC767: add r3, pc str r5, [r3, #620] .LBB620: .LBB621: .LBB622: ldr r3, .L932+100 .LPIC768: add r3, pc movs r2, #0 str r2, [r3, #676] 1656 str r2, [r3, #268] 1657 stats = stats+1; op('O', lines) %IF perm = 0 ldr r2, [r3, #640] adds r2, r2, #1 str r2, [r3, #640] 1658 ldr r3, .L932+104 .LPIC772: add r3, pc ldr r3, [r3, #2688] cmp r3, #0 beq .L921 .L851: .LVL762: .L890: 1659 ->fail1 %IF atom1&error # 0; !first atom faulty ldr ip, [r6, #64] ldr r3, .L932+120 .LPIC773: add r3, pc ldr r1, [r3, #184] movs r0, #79 bl OP.10282(PLT) .LVL823: b .L890 .LVL824: .L852: .L853: 1660 1661 %IF escape class # 0 %START; !enter the hard way after 1662 g = imp phrase; sstype = -1; ->a3 1663 %FINISH 1664 1665 g = initial(atom1); !pick up entry point 1666 %IF g = 0 %START; !invalid first atom 1667 g = initial(0); sstype = 0; ->a3; !declarator? 1668 %FINISH 1669 %IF g < 0 %START; !phrase imp 1670 g = g&255 1671 nmax = 1 1672 ar(1)_class = 0; ar(1)_link = 0; ar(1)_sub = imp phrase 1673 %FINISH 1674 1675 gg = gram(g); class = gg&255; sstype = gg>>12&3-1 1676 ->a1 1677 1678 act(194): ptype = type; papp = app; pformat = format; ->more 1679 act(196):k =g+1; ->a610 1680 act(188):k = ar(nmax)_sub+1 1681 a610: papp = glink(k) 1682 k = gram(k) 1683 ->more %IF k = 0; !%NAME 1684 ptype = k&7; pformat = k>>3 1685 act(183):k = type; gentype = k %IF gentype = 0 %OR k = real 1686 %IF pformat < 0 %START; !general type 1687 app = papp; format = pformat 1688 k = real %IF ptype = real %AND type = integer 1689 k = force %AND force = 0 %IF force # 0 1690 %FINISH 1691 ->fail2 %UNLESS papp = app %AND (ptype = k %OR ptype = 0) 1692 ->more %IF pformat=format %OR pformat = 0 %OR format = 0 1693 ->fail2 1694 act(197):arp == ar(nmin) 1695 k = arp_sub 1696 ->fail3 %UNLESS block form = k&15 1697 arp_sub = k>>4 1698 1699 type = block type 1700 ptype = block type; pformat = block fm; papp = app 1701 pformat = -1 %IF ptype # record 1702 ->more 1703 act(195):->Fail2 %if Type # 0 %and Type # Integer %and %C 1704 Type # Real 1705 arp == ar(nmin) 1706 k = arp_sub 1707 arp_sub = k>>2 1708 k = k&3 1709 !1 = check integer 1710 !2 = check real 1711 !3 = check real + int 1712 ->more %IF k = 0; !0 = no action 1713 %IF k = 1 %START 1714 force = integer 1715 ->more %IF type = integer %OR type = 0 1716 ->fail2 1717 %FINISH 1718 ->fail2 %UNLESS ptype = real %or ptype = 0 {or added?} 1719 force = integer %IF k = 3 1720 ->more 1721 act(198):!%OTHER 1722 k = gg>>8&15 1723 %IF k = 0 %START; !restore atom 1724 atom1 = last1 1725 ->more 1726 %FINISH 1727 %IF k = 1 %START; !test string 1728 ->fail2 %UNLESS type = stringv 1729 ->more 1730 %FINISH 1731 %if k = 2 %start {fault record comparisons} 1732 ->fail2 %if type = record 1733 ->more 1734 %finish 1735 %if k = 3 %start; !check OWN variable coming 1736 code atom(0) 1737 ->A7 %if atom flags&own bit = 0 1738 ->more 1739 %finish 1740 for warn = pos1 %IF x <= local; !%FORTEST 1741 ->more 1742 paction(1):%IF type = record %THEN g = phrase(242) %ELSE pformat = -1 1743 ->a3 1744 paction(2):ptype = real; pformat = -1; ->a3 1745 paction(3):ptype = stringv; pformat = -1; ->a3 1746 paction(4):ptype = integer; pformat = -1; ->a3 1747 paction(5):->a3 %if ptype = integer 1748 g = phrase(212) %AND pformat=-1 %IF ptype = real 1749 g = phrase(213) %IF ptype = stringv 1750 ->a3 1751 paction(6):ptype = gram(ar(nmax)_sub+1)&7; pformat = -1; ->a3 1752 paction(7):ptype=real %IF ptype = integer; pformat = -1; ->a3 1753 1754 a1: last1 = class; atom1 = 0; s = subatom 1755 ldr r2, .L932+124 .LPIC774: add r2, pc str r3, [r2, #276] 1756 a2: %IF gg&trans bit = 0 %START; !insert into analysis record movs r3, #0 str r3, [r2, #240] 1757 z == node ldr r5, [r2, #220] .LVL825: .L854: ldr r3, .L932+128 .LPIC777: add r3, pc ldr r2, [r3, #656] tst r2, #1 beq .L922 .L855: .LVL826: add r3, sp, #286 .LVL924: add r3, sp, #286 b .L858 .LVL925: .L930: 1758 %CYCLE; !insert cell in order 1759 k = z ldrsh r3, [sp, #286] .LVL828: addw r3, r3, #813 .LVL831: add r3, r1, r3, lsl #4 .LVL832: ldrsh r3, [r3, #8] .LVL833: sub r2, r2, #4096 1760 %EXIT %IF gg&order bits = 0 %OR k = 0 1761 gg = gg-order bit; z == ar(k)_link cmp r3, #0 beq .L856 mov r0, r2 cmp r3, #0 bne .L857 1762 %REPEAT ldr r1, [r6, #64] sub r2, r2, #4096 .LVL829: .L857: subs r4, r3, #1 .LDL37: .LVL830: add r3, r1, r4, lsl #4 .LVL834: add r3, r3, #12992 adds r3, r3, #40 .LDL38: .LDL39: ldr r2, .L932+136 .LPIC778: add r2, pc str r0, [r2, #656] 1763 gg = map gg %IF map gg # 0 %AND gg&255 = var ldr r2, [r2, #252] cbz r2, .L858 ldr r3, .L932+328 .LVL923: .LPIC899: add r3, pc ldr r2, [r3, #252] cmp r2, #0 bne .L908 1764 nmin = nmin-1; ->fail0 %IF nmin = nmax tst r0, #1 bne .L858 .LVL835: .L908: ldr r1, .L932+144 .LPIC781: add r1, pc ldr r0, [r1, #672] subs r2, r0, #1 str r2, [r1, #672] 1765 z = nmin ldr r1, .L932+140 .LPIC780: add r1, pc str r2, [r1, #656] .L858: ldr r1, [r1, #668] cmp r2, r1 beq .L859 .L860: strh r2, [r3] @ movhi .LVL836: ldr r3, [r6, #64] add r3, r3, r0, lsl #4 1766 arp == ar(nmin) 1767 arp_sub = s; arp_class = (gg&255)!mark movw r2, #12998 strh r5, [r3, r2] @ movhi .LVL837: 1768 arp_link = k ldr r2, .L932+148 .LPIC784: add r2, pc ldrb r2, [r2, #656] @ zero_extendqisi2 orr r10, r2, r10 movw r2, #12996 strh r10, [r3, r2] @ movhi movw r2, #13000 movs r1, #0 strh r1, [r3, r2] @ movhi b .L855 .LVL838: .L925: .LBB681: .LBB642: .LBB623: .LBB624: bl _imp_newline(PLT) .LVL839: b .L862 .LVL840: .L926: .LBE624: .LBE623: .LBB625: .LBB626: movs r0, #123 bl _imp_printsymbol(PLT) .LVL841: .LBE626: .LBE625: 1769 %FINISH 1770 mark = 0; map gg = 0 1771 ldr r3, .L932+132 .LPIC785: add r3, pc movs r2, #0 str r2, [r3, #252] b .L850 .LVL827: .L922: 1772 more: g = glink(g); !chain down the grammar 1773 ldr r2, .L932+88 .LPIC786: add r2, pc ldr r1, [r2, #680] ldr r3, .L932+92 .LPIC787: add r3, pc add r3, r3, r1, lsl #1 ldrsh r3, [r3, #4] str r3, [r2, #680] mov r10, #0 1774 paction(0): 1775 a3: gg = gram(g); class = gg&255 1776 trace analysis %IF diag&1 # 0 ldr r8, .L932+96 .LPIC789: add r8, pc b .L861 .LVL761: .L849: ldr r3, .L932+188 .LPIC790: add r3, pc ldr r2, [r3, #680] add r2, r8, r2, lsl #1 ldrsh r2, [r2, #3448] str r2, [r3, #656] 1777 ->a5 %IF class = 0; !end of phrase uxtb r2, r2 str r2, [r3, #684] .LBB682: .LBB643: ldr r3, .L932+212 .LPIC817: add r3, pc ldr r4, [r3, #684] cmp r4, #0 beq .L866 .L867: 1778 1779 %IF class < actions %START; !not a phrase or an action cmp r4, #179 bgt .L868 1780 class = atomic(class) %IF class >= figurative cmp r4, #129 ble .L869 1781 ->a2 %IF class >= manifest ldr r3, .L932+160 .LPIC819: add r3, pc ldr r0, [r3, #684] cmp r0, #119 bgt .L854 .L870: ldr r3, [r6, #64] add r3, r3, r4 movw r2, #38722 ldrb r2, [r3, r2] @ zero_extendqisi2 ldr r3, .L932+216 .LPIC818: add r3, pc str r2, [r3, #684] b .L869 .L923: 1782 code atom(class) %IF atom1 = 0 ldr r3, .L932+164 .LPIC820: add r3, pc ldr r3, [r3, #240] cmp r3, #0 beq .L923 .L871: 1783 %IF escape class # 0 %START; !escape to new grammar ldr r3, .L932+168 .LPIC821: add r3, pc ldr r3, [r3, #244] cmp r3, #0 bne .L924 .L872: add ip, sp, #296 bl CODEATOM.10640(PLT) .LVL865: b .L871 .L924: 1784 class = escape class; escape class = 0 ldr r2, .L932+220 .LPIC822: add r2, pc str r3, [r2, #684] 1785 g = g+escape movs r1, #0 str r1, [r2, #244] ldr r3, [r2, #680] add r3, r3, #4096 str r3, [r2, #680] .LDL42: 1786 1787 !note that following an escape the next item is 1788 !forced to be transparent! 1789 1790 esc: gg = 0 1791 arp == ar(nmax+1) str r1, [r2, #656] ldr r1, [r2, #668] ldr r3, [r6, #64] .LVL866: 1792 arp_papp = papp; arp_x = x; ->a4 add r3, r3, r1, lsl #4 .LVL867: ldr r0, [r2, #708] movw r1, #13036 .LVL868: strh r0, [r3, r1] @ movhi .LVL869: 1793 %FINISH ldr r1, [r2, #208] movw r2, #13040 strh r1, [r3, r2] @ movhi .L873: 1794 1795 ->a1 %IF class = atom1 %OR class = atom2 ldr r3, .L932+172 .LPIC830: add r3, pc ldr r2, [r3, #684] ldr r3, [r3, #240] cmp r2, r3 beq .L852 1796 ldr r3, .L932+176 .LPIC832: add r3, pc ldr r3, [r3, #248] cmp r2, r3 beq .L852 .L874: .L875: 1797 a7: ->fail1 %IF gg >= 0; !no alternative 1798 g = g+1 ldr r3, .L932+180 .LPIC833: add r3, pc ldr r3, [r3, #656] cmp r3, #0 bge .L890 .L876: ldr r2, .L932+184 .LPIC834: add r2, pc ldr r3, [r2, #680] adds r3, r3, #1 str r3, [r2, #680] .L861: 1799 ->a3 1800 %FINISH 1801 1802 %IF class >= phrasal %START; !a phrase cmp r4, #199 bgt .L873 .L878: .LVL881: .LDL43: 1803 a4: nmax = nmax+1; ->fail0 %IF nmax = nmin 1804 arp == ar(nmax) ldr r3, .L932+224 .LPIC836: add r3, pc ldr r1, [r3, #668] adds r2, r1, #1 str r2, [r3, #668] ldr r2, [r6, #64] .LVL870: add r2, r2, r1, lsl #4 .LVL871: 1805 arp_ptype = ptype ldr r3, [r3, #672] cmp r2, r3 beq .L859 .L879: ldr r3, .L932+228 .LPIC839: add r3, pc ldr r0, [r3, #676] movw r1, #13034 .LVL872: strh r0, [r2, r1] @ movhi .LVL873: 1806 arp_pos = pos1 ldr r0, [r3, #296] movw r1, #13042 strh r0, [r2, r1] @ movhi 1807 arp_pformat = pformat ldr r0, [r3, #712] movw r1, #13038 strh r0, [r2, r1] @ movhi 1808 arp_link = gentype ldr r0, [r3, #660] movw r1, #13032 strh r0, [r2, r1] @ movhi 1809 arp_class = node ldrh r5, [sp, #286] movw r0, #13028 strh r5, [r2, r0] @ movhi 1810 arp_sub = g ldr r5, [r3, #680] movw r0, #13030 strh r5, [r2, r0] @ movhi 1811 node = 0 movs r2, #0 strh r2, [sp, #286] @ movhi 1812 g = phrase(class) ldr r1, [r3, #684] ldr r2, .L932+232 .LPIC845: add r2, pc add r2, r2, r1, lsl #1 ldrsh r2, [r2, #2172] str r2, [r3, #680] 1813 ptype = force %AND force = 0 %IF force # 0 ldr r3, [r3, #664] cbz r3, .L880 1814 gentype = 0 ldr r2, .L932+236 .LPIC848: add r2, pc str r3, [r2, #676] ldr r3, .L932+240 .LPIC850: add r3, pc movs r2, #0 str r2, [r3, #660] .LVL874: 1815 ->paction(gg>>8&15) movs r3, #0 str r3, [r2, #664] .L880: ldr r3, [r3, #656] ubfx r3, r3, #8, #4 str r3, [sp, #276] .LVL875: .L881: 1816 %FINISH 1817 1818 ->act(class); !only actions left 1819 1820 a5: !reverse links 1821 1822 s = 0 mov r5, r4 1823 %WHILE node # 0 %CYCLE 1824 z == ar(node)_link ldrsh r2, [sp, #286] cbz r2, .L884 mov r5, r2 .LVL884: ldr r3, [r6, #64] add r3, r3, r2, lsl #4 mov r4, r5 cmp r2, #0 bne .L885 strh r2, [sp, #286] @ movhi .LVL887: .L884: 1825 k = z; z = s; s = node; node = k movw r1, #13016 .LVL883: .L885: ldrsh r2, [r3, r1] .LVL885: 1826 %REPEAT strh r4, [r3, r1] @ movhi .LVL886: .LDL44: .LDL45: 1827 ss = s ldr r3, .L932+268 .LPIC852: add r3, pc str r5, [r3, #624] .LDL46: 1828 1829 a6: %IF nmax # 0 %START 1830 k = gentype; !type of phrase ldr r3, [r3, #668] cbz r3, .L886 .LVL888: 1831 arp == ar(nmax); nmax = nmax-1 subs r0, r3, #1 ldr r1, [r6, #64] .LVL889: 1832 node = arp_class ldr r2, .L932+272 .LPIC854: add r2, pc str r0, [r2, #668] add r3, r1, r3, lsl #4 movw r4, #13012 ldrh ip, [r3, r4] strh ip, [sp, #286] @ movhi 1833 gentype = arp_link movw r4, #13016 ldrsh r4, [r3, r4] str r4, [r2, #660] .LVL890: 1834 ptype = arp_ptype movw r4, #13018 ldrsh r4, [r3, r4] str r4, [r2, #676] 1835 pformat = arp_pformat add r1, r1, r0, lsl #4 .LVL891: movw r0, #13038 .LVL892: ldrsh r0, [r1, r0] str r0, [r2, #712] 1836 g = arp_sub movw r0, #13014 ldrsh r3, [r3, r0] 1837 %IF g&escape # 0 %START 1838 g = g-escape sub r3, r3, #4096 str r3, [r2, #680] 1839 papp = arp_papp movw r3, #13036 ldrsh r3, [r1, r3] str r3, [r2, #708] .LVL893: 1840 mark = 255 mov r10, #255 1841 subatom = s str r5, [r2, #220] 1842 ->a3 b .L861 .LVL894: .L886: 1843 %FINISH 1844 gentype = k %IF gentype = 0 %OR k = real 1845 type = gen type 1846 1847 k = gg; !exit-point code 1848 %CYCLE 1849 gg = gram(g) 1850 ->a2 %IF k = 0 1851 ->fail1 %IF gg >= 0; !no alternative phrase 1852 k = k-order bit 1853 g = g+1; !sideways step 1854 %REPEAT 1855 1856 %FINISH 1857 1858 Fault(4) %IF copy # 0 ldr r3, .L932+276 .LPIC861: add r3, pc ldr r3, [r3, #280] cbnz r3, .L928 .L887: 1859 fault(13) %IF order = 0 ldr r3, .L932+280 .LPIC862: add r3, pc ldr r3, [r3, #628] cbz r3, .L929 .L888: .LDL47: mov ip, r6 movs r0, #4 bl FAULT.10318(PLT) .LVL895: b .L887 .L929: 1860 fault(-4) %IF for warn # 0 mov ip, r6 movs r0, #13 bl FAULT.10318(PLT) .LVL896: b .L888 .LVL897: .L882: 1861 pos1 = 0 ldr r3, .L932+284 .LPIC863: add r3, pc movs r2, #0 str r2, [r3, #296] 1862 fault rate = fault rate-1 ldr r2, [r3, #716] subs r2, r2, #1 str r2, [r3, #716] .L836: 1863 %RETURN 1864 1865 act(193):gg = 0 %AND ->a5 %UNLESS sym = '=' %or sym = '<'; !cdummy 1866 act(181):atom1 = amap(decl&15); !dummy 1867 ->more 1868 1869 act(182):class = escdec; g = glink(g)!escape 1870 decl = 0; otype = 0; ->esc; !decl 1871 1872 act(199): !compile 1873 1874 s = 0 1875 %WHILE node # 0 %CYCLE 1876 z == ar(node)_link 1877 k = z; z = s; s = node; node = k 1878 %repeat 1879 ss = s 1880 1881 code atom(28) %IF quote # 0; !expend 1882 compile; ->more %IF atom1&error = 0 1883 ->fail1 1884 1885 act(184):->fail4 %UNLESS type = integer 1886 %IF subatom < 0 %THEN lit = tag(-subatom)_format %C 1887 %ELSE lit = lit pool(subatom) 1888 ->fail4 %IF lit # 0 1889 ->more 1890 act(185): !apply parameters 1891 s = 0 1892 %WHILE node # 0 %CYCLE 1893 z == ar(node)_link 1894 k = z; z = s; s = node; node = k 1895 %REPEAT 1896 ss = s 1897 1898 atom1 = ar(s)_class; atom2 = 0 1899 atom1 = var %IF atom1 = 97 %OR atom1 = 98 1900 arp == ar(nmax) 1901 x = arp_x 1902 pos1 = arp_pos 1903 pos2 = 0 1904 app = 0 1905 format = tag(x)_format 1906 flags = tag(x)_flags 1907 type = flags>>4&7 1908 protection = flags&prot 1909 protection = 0 %IF flags&aname # 0 1910 1911 %IF flags&subname # 0 %AND format # 0 %START 1912 ->fail1 %if format selected = 0 1913 %FINISH 1914 1915 ->a6 1916 1917 act(187):protection = prot; ->more; !%SETPROT 1918 act(186):->More %if protection&prot = 0 1919 prot err = nmin 1920 ->A7 1921 act(191):k = protection; !%GUARD 1922 code atom(0) 1923 protection = k %IF atom flags&aname = 0 1924 ->more 1925 1926 act(192):->fail1 %IF parsed machine code=0 1927 ->more 1928 1929 act(189):k = gapp; !%GAPP 1930 delete names(1) 1931 tmax = tbase; tbase = gram (gmin); !restore tmax 1932 local= tbase 1933 gmin = gmin+1 1934 1935 x = ar(ar(nmax)_class)_sub 1936 tag(x)_app = k; !update app 1937 ->more 1938 1939 act(190):gmin = gmin-1; !%LOCAL 1940 abandon(2) %IF gmin <= gmax 1941 gram (gmin) = tbase; tbase = tmax 1942 local = tbase 1943 ->more 1944 1945 ! errors 1946 1947 fail4:k = error+10; ->failed; !*size 1948 fail3:k = error+7; ->failed; !*context 1949 fail2:k = error+5; pos2 = 0; ->failed; !*type 1950 fail0:k = error+3; ->failed; !*too complex 1951 fail1:k = atom1; pos2 = 0 1952 1953 failed: ldr r3, .L932+108 .LPIC866: add r3, pc movs r2, #0 str r2, [r3, #256] .LVL763: .L859: .LBB644: 1954 %IF diag&32 # 0 %START 1955 printstring("Atom1 ="); write(atom1, 3) ldr r6, .L932+112 .LPIC867: add r6, pc mov r4, #256 mov r2, r4 add r1, r6, #2024 add r5, sp, #5408 adds r5, r5, #20 mov r0, r5 bl memcpy(PLT) .LVL764: mov r2, r4 mov r1, r5 add r7, sp, #308 mov r0, r7 bl memcpy(PLT) .LVL765: mov r2, r4 mov r1, r7 mov r0, r5 bl memcpy(PLT) .LVL766: .LBE644: .LBB645: .LBB646: movs r7, #240 mov r2, r7 add r1, sp, #5440 adds r1, r1, #4 mov r0, sp bl memcpy(PLT) .LVL767: ldm r5, {r0, r1, r2, r3} bl _imp_printstring(PLT) .LVL768: .LBE646: .LBE645: 1956 printstring(" Atom2 ="); write(atom2, 3) ldr r5, .L932+116 .LPIC868: add r5, pc movs r1, #3 ldr r0, [r5, #240] bl _imp_writeint(PLT) .LVL769: .LBB647: mov r2, r4 addw r1, r6, #2280 add r8, sp, #4384 add r8, r8, #20 mov r0, r8 bl memcpy(PLT) .LVL770: mov r2, r4 mov r1, r8 add r9, sp, #564 mov r0, r9 bl memcpy(PLT) .LVL771: mov r2, r4 mov r1, r9 mov r0, r8 bl memcpy(PLT) .LVL772: .LBE647: .LBB648: .LBB649: mov r2, r7 add r1, sp, #4416 adds r1, r1, #4 mov r0, sp bl memcpy(PLT) .LVL773: ldm r8, {r0, r1, r2, r3} bl _imp_printstring(PLT) .LVL774: .LBE649: .LBE648: 1957 printstring(" subatom ="); write(subatom, 3); newline movs r1, #3 ldr r0, [r5, #248] bl _imp_writeint(PLT) .LVL775: .LBB650: mov r2, r4 addw r1, r6, #2536 add r8, sp, #4128 add r8, r8, #20 mov r0, r8 bl memcpy(PLT) .LVL776: mov r2, r4 mov r1, r8 add r9, sp, #820 mov r0, r9 bl memcpy(PLT) .LVL777: mov r2, r4 mov r1, r9 mov r0, r8 bl memcpy(PLT) .LVL778: .LBE650: .LBB651: .LBB652: mov r2, r7 add r1, sp, #4160 adds r1, r1, #4 mov r0, sp bl memcpy(PLT) .LVL779: ldm r8, {r0, r1, r2, r3} bl _imp_printstring(PLT) .LVL780: .LBE652: .LBE651: 1958 printstring("Type ="); write(type, 1) movs r1, #3 ldr r0, [r5, #220] bl _imp_writeint(PLT) .LVL781: .LBB653: .LBB654: bl _imp_newline(PLT) .LVL782: .LBE654: .LBE653: .LBB655: mov r2, r4 addw r1, r6, #2792 addw r8, sp, #3892 mov r0, r8 bl memcpy(PLT) .LVL783: mov r2, r4 mov r1, r8 addw r9, sp, #1076 mov r0, r9 bl memcpy(PLT) .LVL784: mov r2, r4 mov r1, r9 mov r0, r8 bl memcpy(PLT) .LVL785: .LBE655: .LBB656: .LBB657: mov r2, r7 addw r1, sp, #3908 mov r0, sp bl memcpy(PLT) .LVL786: ldm r8, {r0, r1, r2, r3} bl _imp_printstring(PLT) .LVL787: .LBE657: .LBE656: 1959 printstring(" Ptype ="); write(ptype, 1); newline movs r1, #1 ldr r0, [r5, #236] bl _imp_writeint(PLT) .LVL788: .LBB658: mov r2, r4 addw r1, r6, #3048 addw r8, sp, #3636 mov r0, r8 bl memcpy(PLT) .LVL789: mov r2, r4 mov r1, r8 addw r9, sp, #1332 mov r0, r9 bl memcpy(PLT) .LVL790: mov r2, r4 mov r1, r9 mov r0, r8 bl memcpy(PLT) .LVL791: .LBE658: .LBB659: .LBB660: mov r2, r7 addw r1, sp, #3652 mov r0, sp bl memcpy(PLT) .LVL792: ldm r8, {r0, r1, r2, r3} bl _imp_printstring(PLT) .LVL793: .LBE660: .LBE659: 1960 printstring("App ="); write(app, 1) movs r1, #1 ldr r0, [r5, #676] bl _imp_writeint(PLT) .LVL794: .LBB661: .LBB662: bl _imp_newline(PLT) .LVL795: .LBE662: .LBE661: .LBB663: mov r2, r4 addw r1, r6, #3304 addw r8, sp, #3380 mov r0, r8 bl memcpy(PLT) .LVL796: mov r2, r4 mov r1, r8 addw r9, sp, #1588 mov r0, r9 bl memcpy(PLT) .LVL797: mov r2, r4 mov r1, r9 mov r0, r8 bl memcpy(PLT) .LVL798: .LBE663: .LBB664: .LBB665: mov r2, r7 addw r1, sp, #3396 mov r0, sp bl memcpy(PLT) .LVL799: ldm r8, {r0, r1, r2, r3} bl _imp_printstring(PLT) .LVL800: .LBE665: .LBE664: 1961 printstring(" Papp ="); write(papp, 1); newline movs r1, #1 ldr r0, [r5, #232] bl _imp_writeint(PLT) .LVL801: .LBB666: mov r2, r4 addw r1, r6, #3560 addw r8, sp, #3124 mov r0, r8 bl memcpy(PLT) .LVL802: mov r2, r4 mov r1, r8 addw r9, sp, #1844 mov r0, r9 bl memcpy(PLT) .LVL803: mov r2, r4 mov r1, r9 mov r0, r8 bl memcpy(PLT) .LVL804: .LBE666: .LBB667: .LBB668: mov r2, r7 addw r1, sp, #3140 mov r0, sp bl memcpy(PLT) .LVL805: ldm r8, {r0, r1, r2, r3} bl _imp_printstring(PLT) .LVL806: .LBE668: .LBE667: 1962 printstring("Format ="); write(format, 1) movs r1, #1 ldr r0, [r5, #708] bl _imp_writeint(PLT) .LVL807: .LBB669: .LBB670: bl _imp_newline(PLT) .LVL808: .LBE670: .LBE669: .LBB671: mov r2, r4 addw r1, r6, #3816 addw r8, sp, #2868 mov r0, r8 bl memcpy(PLT) .LVL809: mov r2, r4 mov r1, r8 addw r9, sp, #2100 mov r0, r9 bl memcpy(PLT) .LVL810: mov r2, r4 mov r1, r9 mov r0, r8 bl memcpy(PLT) .LVL811: .LBE671: .LBB672: .LBB673: mov r2, r7 addw r1, sp, #2884 mov r0, sp bl memcpy(PLT) .LVL812: ldm r8, {r0, r1, r2, r3} bl _imp_printstring(PLT) .LVL813: .LBE673: .LBE672: 1963 printstring(" Pformat ="); write(pformat, 1); newline movs r1, #1 ldr r0, [r5, #228] bl _imp_writeint(PLT) .LVL814: .LBB674: mov r2, r4 addw r1, r6, #4072 addw r6, sp, #2612 mov r0, r6 bl memcpy(PLT) .LVL815: mov r2, r4 mov r1, r6 addw r8, sp, #2356 mov r0, r8 bl memcpy(PLT) .LVL816: mov r2, r4 mov r1, r8 mov r0, r6 bl memcpy(PLT) .LVL817: .LBE674: .LBB675: .LBB676: mov r2, r7 addw r1, sp, #2628 mov r0, sp bl memcpy(PLT) .LVL818: ldm r6, {r0, r1, r2, r3} bl _imp_printstring(PLT) .LVL819: .LBE676: .LBE675: 1964 !IMP80 BUG??? %SIGNAL 13,15 movs r1, #1 ldr r0, [r5, #712] bl _imp_writeint(PLT) .LVL820: .LBB677: .LBB678: bl _imp_newline(PLT) .LVL821: .LBE678: .LBE677: .LBB679: .LBB680: movs r0, #0 bl exit(PLT) .LVL822: .L921: .LBE680: .LBE679: 1965 %STOP 1966 %FINISH 1967 1968 quote = 0 %AND readsym %WHILE sym # nl %AND sym # ';' 1969 %IF k&error # 0 %START 1970 fault(k&255) 1971 %FINISH %ELSE %START 1972 %IF prot err = nmin %THEN fault(14) %ELSE fault(0) 1973 %FINISH 1974 gg = 0; ss = 0; symtype = 0 1975 %END; !of analyse 1976 1977 %ROUTINE compile @ Nested: function declared inside another function. @ args = 0, pretend = 0, frame = 4536 @ frame_needed = 0, uses_anonymous_args = 0 push {r4, r5, r6, r7, r8, lr} sub sp, sp, #5024 sub sp, sp, #24 str ip, [sp, #516] ldr r3, .L821 .LPIC399: add r3, pc mov r2, r3 str r3, [sp, #520] ldr r3, .L821+4 ldr r3, [r2, r3] ldr r3, [r3] add r2, sp, #5024 adds r2, r2, #20 str r3, [r2] add r2, sp, #5056 adds r2, r2, #16 str r2, [sp, #616] str ip, [sp, #612] 1978 sub r3, r4, #180 cmp r3, #20 bhi .L882 .L883: ldr r3, .L932+244 ldr r3, [r9, r3] ldr r1, [r3] cbz r1, .L891 addw r0, sp, #3892 bl _imp_c2istr(PLT) .LVL898: .L892: ldr r3, .L932+248 ldr r3, [r9, r3] ldr r3, [r3] movw r2, #1978 cmp r3, #0 it eq moveq r3, r2 movw r2, #1818 str r2, [sp, #268] ldr r2, .L932+288 .LPIC886: add r2, pc str r2, [sp, #264] str r4, [sp, #260] ldr r2, .L932+292 .LPIC887: add r2, pc str r2, [sp, #256] str r4, [sp, #252] movs r2, #3 str r2, [sp, #248] movs r2, #6 str r2, [sp, #244] str r3, [sp, #240] movs r2, #240 addw r1, sp, #3908 mov r0, sp bl memcpy(PLT) .LVL899: addw r3, sp, #3892 ldm r3, {r0, r1, r2, r3} bl _signal_eventf(PLT) .LVL900: b .L883 .L891: .LBB683: mov r6, #256 mov r2, r6 ldr r1, .L932+296 .LPIC885: add r1, pc add r5, sp, #5408 adds r5, r5, #20 mov r0, r5 bl memcpy(PLT) .LVL901: mov r2, r6 mov r1, r5 addw r5, sp, #2868 mov r0, r5 bl memcpy(PLT) .LVL902: .LBE683: mov r2, r6 mov r1, r5 addw r0, sp, #3892 bl memcpy(PLT) .LVL903: b .L892 .LVL904: .L895: 1979 %CONSTINTEGER then = 4, else = 8, loop = 16 ldr r3, .L932+264 .LPIC888: add r3, pc add r3, r3, r4, lsl #2 ldr r3, [r3, #204] b .L894 .LVL882: .L866: 1980 1981 %SWITCH c(0:actions), litop(1:12) ldr r3, .L932+244 ldr r3, [r9, r3] ldr r1, [r3] cbz r1, .L931 add r0, sp, #4128 adds r0, r0, #20 bl _imp_c2istr(PLT) .LVL905: .L898: ldr r3, .L932+248 ldr r3, [r9, r3] ldr r3, [r3] movw r2, #1981 cmp r3, #0 it eq moveq r3, r2 movw r2, #1818 str r2, [sp, #268] ldr r2, .L932+300 .LPIC890: add r2, pc str r2, [sp, #264] str r4, [sp, #260] ldr r2, .L932+304 .LPIC891: add r2, pc str r2, [sp, #256] str r4, [sp, #252] movs r2, #2 str r2, [sp, #248] movs r2, #8 str r2, [sp, #244] str r3, [sp, #240] movs r2, #240 add r1, sp, #4160 adds r1, r1, #4 mov r0, sp bl memcpy(PLT) .LVL906: add r3, sp, #4128 adds r3, r3, #20 ldm r3, {r0, r1, r2, r3} bl _signal_eventf(PLT) .LVL907: b .L881 .L931: .LBB684: mov r6, #256 mov r2, r6 ldr r1, .L932+308 .LPIC889: add r1, pc add r5, sp, #5408 adds r5, r5, #20 mov r0, r5 bl memcpy(PLT) .LVL908: mov r2, r6 mov r1, r5 addw r5, sp, #3124 mov r0, r5 bl memcpy(PLT) .LVL909: .LBE684: mov r2, r6 mov r1, r5 add r0, sp, #4128 adds r0, r0, #20 bl memcpy(PLT) .LVL910: b .L898 .L901: .LBB685: 1982 1983 %CONSTBYTEINTEGERARRAY operator(1:14) = %C ldr r4, .L821+8 .LPIC401: add r4, pc add r5, sp, #4992 adds r5, r5, #20 addw r3, r4, #1428 ldm r3, {r0, r1, r2, r3} stmia r5!, {r0, r1, r2} strh r3, [r5] @ movhi 1984 '[', ']', 'X', '/', '&', '!', '%', '+', ldr r3, [sp, #276] cmp r3, #15 bls .L900 ldr r3, .L932+244 ldr r3, [r9, r3] ldr r1, [r3] cmp r1, #0 beq .L901 add r0, sp, #4384 adds r0, r0, #20 bl _imp_c2istr(PLT) .LVL876: .L902: ldr r3, .L932+248 ldr r3, [r9, r3] ldr r3, [r3] cmp r3, #0 it eq moveq r3, #1984 movw r2, #1815 str r2, [sp, #268] ldr r2, .L932+252 .LPIC893: add r2, pc str r2, [sp, #264] ldr r1, [sp, #276] str r1, [sp, #260] ldr r2, .L932+256 .LPIC894: add r2, pc str r2, [sp, #256] str r1, [sp, #252] movs r2, #3 str r2, [sp, #248] movs r2, #6 str r2, [sp, #244] str r3, [sp, #240] movs r2, #240 add r1, sp, #4416 adds r1, r1, #4 mov r0, sp bl memcpy(PLT) .LVL877: add r3, sp, #4384 adds r3, r3, #20 ldm r3, {r0, r1, r2, r3} bl _signal_eventf(PLT) .LVL878: .L900: mov r6, #256 mov r2, r6 ldr r1, .L932+312 .LPIC892: add r1, pc add r5, sp, #5408 adds r5, r5, #20 mov r0, r5 bl memcpy(PLT) .LVL911: mov r2, r6 mov r1, r5 addw r5, sp, #3380 mov r0, r5 bl memcpy(PLT) .LVL912: .LBE685: mov r2, r6 mov r1, r5 add r0, sp, #4384 adds r0, r0, #20 bl memcpy(PLT) .LVL913: b .L902 .L904: 1985 '-', '*', 'Q', 'x', '.', 'v' ldr r3, .L932+260 .LPIC895: add r3, pc ldr r2, [sp, #276] add r3, r3, r2, lsl #2 ldr r3, [r3, #1008] .LVL879: .L894: orr r3, r3, #1 bx r3 .LVL880: .L868: 1986 1987 %CONSTBYTEINTEGERARRAY cc(0 : 7) = '#','=',')','<','(','>', 'k','t' movs r3, #35 add r2, sp, #4992 adds r2, r2, #12 strb r3, [r2] movs r3, #61 add r2, sp, #4992 adds r2, r2, #13 strb r3, [r2] movs r3, #41 add r2, sp, #4992 adds r2, r2, #14 strb r3, [r2] movs r3, #60 add r2, sp, #4992 adds r2, r2, #15 strb r3, [r2] movs r3, #40 add r2, sp, #4992 adds r2, r2, #16 strb r3, [r2] movs r3, #62 add r2, sp, #4992 adds r2, r2, #17 strb r3, [r2] movs r3, #107 add r2, sp, #4992 adds r2, r2, #18 strb r3, [r2] movs r3, #116 add r2, sp, #4992 adds r2, r2, #19 strb r3, [r2] ldr r3, .L932+244 ldr r3, [r9, r3] ldr r1, [r3] cbz r1, .L905 add r0, sp, #5408 adds r0, r0, #20 bl _imp_c2istr(PLT) .LVL914: .L906: ldr r3, .L932+248 ldr r3, [r9, r3] ldr r3, [r3] movw r2, #1987 cmp r3, #0 it eq moveq r3, r2 movw r2, #1815 str r2, [sp, #268] ldr r2, .L932+316 .LPIC897: add r2, pc str r2, [sp, #264] ldr r1, [sp, #276] str r1, [sp, #260] ldr r2, .L932+320 .LPIC898: add r2, pc str r2, [sp, #256] str r1, [sp, #252] movs r2, #2 str r2, [sp, #248] movs r2, #8 str r2, [sp, #244] str r3, [sp, #240] movs r2, #240 add r1, sp, #5440 adds r1, r1, #4 mov r0, sp bl memcpy(PLT) .LVL915: add r3, sp, #5408 adds r3, r3, #20 ldm r3, {r0, r1, r2, r3} bl _signal_eventf(PLT) .LVL916: b .L836 .LVL917: .L905: .LBB686: mov r6, #256 mov r2, r6 ldr r1, .L932+324 .LPIC896: add r1, pc add r4, sp, #5408 .LVL918: adds r4, r4, #20 mov r0, r4 bl memcpy(PLT) .LVL919: mov r2, r6 mov r1, r4 addw r5, sp, #3636 mov r0, r5 bl memcpy(PLT) .LVL920: .LBE686: mov r2, r6 mov r1, r5 mov r0, r4 bl memcpy(PLT) .LVL921: b .L906 .LVL922: .L856: 1988 ldr r3, .L932+4 ldr r3, [r9, r3] add r2, sp, #5920 adds r2, r2, #20 ldr r2, [r2] ldr r3, [r3] cmp r2, r3 bne .L930 add sp, sp, #5920 add sp, sp, #28 @ sp needed pop {r4, r5, r6, r7, r8, r9, r10, fp, pc} .L928: bl __stack_chk_fail(PLT) .LVL926: .L933: .align 2 .L932: .word _GLOBAL_OFFSET_TABLE_-(.LPIC723+4) .word __stack_chk_guard(GOT) .word .LANCHOR0-(.LPIC724+4) .word .LANCHOR2-(.LPIC725+4) .word .LANCHOR0-(.LPIC726+4) .word .LANCHOR1-(.LPIC736+4) .word .LANCHOR2-(.LPIC741+4) .word .LANCHOR0-(.LPIC742+4) .word .LANCHOR2-(.LPIC748+4) .word .LANCHOR0-(.LPIC751+4) .word .LANCHOR2-(.LPIC747+4) .word .LANCHOR2-(.LPIC743+4) .word .LANCHOR2-(.LPIC746+4) .word .LANCHOR2-(.LPIC749+4) .word .LANCHOR0-(.LPIC750+4) .word .LANCHOR2-(.LPIC752+4) .word .LANCHOR2-(.LPIC754+4) .word .LANCHOR0-(.LPIC756+4) .word .LANCHOR0-(.LPIC758+4) .word .LANCHOR2-(.LPIC765+4) .word .LANCHOR0-(.LPIC767+4) .word .LANCHOR3-(.LPIC808+4) .word .LANCHOR0-(.LPIC786+4) .word .LANCHOR1-(.LPIC787+4) .word .LANCHOR1-(.LPIC789+4) .word .LANCHOR0-(.LPIC768+4) .word .LANCHOR2-(.LPIC772+4) .word .LANCHOR0-(.LPIC866+4) .word .LANCHOR3-(.LPIC867+4) .word .LANCHOR0-(.LPIC868+4) .word .LANCHOR0-(.LPIC773+4) .word .LANCHOR0-(.LPIC774+4) .word .LANCHOR0-(.LPIC777+4) .word .LANCHOR0-(.LPIC785+4) .word .LANCHOR0-(.LPIC778+4) .word .LANCHOR0-(.LPIC780+4) .word .LANCHOR0-(.LPIC781+4) .word .LANCHOR0-(.LPIC784+4) .word .LANCHOR0-(.LPIC804+4) .word .LANCHOR0-(.LPIC806+4) .word .LANCHOR0-(.LPIC819+4) .word .LANCHOR0-(.LPIC820+4) .word .LANCHOR0-(.LPIC821+4) .word .LANCHOR0-(.LPIC830+4) .word .LANCHOR0-(.LPIC832+4) .word .LANCHOR0-(.LPIC833+4) .word .LANCHOR0-(.LPIC834+4) .word .LANCHOR0-(.LPIC790+4) .word .LANCHOR2-(.LPIC795+4) .word .LANCHOR0-(.LPIC796+4) .word .LANCHOR0-(.LPIC800+4) .word .LANCHOR0-(.LPIC802+4) .word .LANCHOR0-(.LPIC809+4) .word .LANCHOR0-(.LPIC817+4) .word .LANCHOR0-(.LPIC818+4) .word .LANCHOR0-(.LPIC822+4) .word .LANCHOR0-(.LPIC836+4) .word .LANCHOR0-(.LPIC839+4) .word .LANCHOR2-(.LPIC845+4) .word .LANCHOR0-(.LPIC848+4) .word .LANCHOR0-(.LPIC850+4) .word _imp_current_file(GOT) .word _imp_current_line(GOT) .word .LC77-(.LPIC893+4) .word .LC89-(.LPIC894+4) .word .LANCHOR4-(.LPIC895+4) .word .LANCHOR4-(.LPIC888+4) .word .LANCHOR0-(.LPIC852+4) .word .LANCHOR0-(.LPIC854+4) .word .LANCHOR0-(.LPIC861+4) .word .LANCHOR0-(.LPIC862+4) .word .LANCHOR0-(.LPIC863+4) .word .LC77-(.LPIC886+4) .word .LC87-(.LPIC887+4) .word .LANCHOR3-(.LPIC885+4) .word .LC77-(.LPIC890+4) .word .LC88-(.LPIC891+4) .word .LANCHOR3-(.LPIC889+4) .word .LANCHOR3-(.LPIC892+4) .word .LC77-(.LPIC897+4) .word .LC90-(.LPIC898+4) .word .LANCHOR3-(.LPIC896+4) .word .LANCHOR0-(.LPIC899+4) .LFE198: .align 1 .thumb .thumb_func COMPILEBLOCK.10292: .LFB191: 1989 %CONSTBYTEINTEGERARRAY anyform(0:15) = 1,0,1,1(4),1,0,1,1,0,1,1,1,1 addw r3, r4, #1444 ldm r3, {r0, r1, r2, r3} add r5, sp, #5024 adds r5, r5, #4 stm r5, {r0, r1, r2, r3} 1990 1991 %CONSTSHORTINTEGERARRAY decmap(0:15) = %C add r5, sp, #620 addw r4, r4, #1460 ldmia r4!, {r0, r1, r2, r3} stmia r5!, {r0, r1, r2, r3} ldm r4, {r0, r1, r2, r3} stm r5, {r0, r1, r2, r3} 1992 1, 2, 1993 x'100B', x'100D', x'140C', x'140E', 1994 3, 4, 1995 x'1007', x'1008', x'1009', x'100A', 1996 6, 0, 0, 0 1997 %OWNBYTEINTEGERARRAY cnest(0:15) 1998 %INTEGER lmode, clab, dupid 1999 %INTEGER resln 2000 %OWNINTEGER last def = 0 2001 %OWNINTEGER lb, ub 2002 %INTEGER cp, ord 2003 %INTEGER next, link, j, k, n, done 2004 %INTEGER class 2005 %INTEGER lit2, defs, decs, cident 2006 %INTEGER pending; %OWNINTEGERARRAY pstack(1:40) 2007 %OWNSTRING(8) name = "" 2008 %OWNINTEGER count = 0 2009 2010 %ROUTINE def lab(%INTEGER l) @ Nested: function declared inside another function. @ args = 0, pretend = 0, frame = 0 @ frame_needed = 0, uses_anonymous_args = 0 .LVL11: push {r4, lr} mov r4, ip 2011 op(':', l) ldr r3, [ip, #32] ldr ip, [r3, #64] mov r1, r0 movs r0, #58 .LVL12: bl OP.10282(PLT) .LVL13: 2012 access = 1 ldr r3, [r4, #32] movs r2, #1 str r2, [r3, #24] 2013 %END 2014 pop {r4, pc} .LFE210: .align 1 .thumb .thumb_func POPLIT.11311: .LFB219: 2015 %ROUTINE get next @ Nested: function declared inside another function. @ args = 0, pretend = 0, frame = 1288 @ frame_needed = 0, uses_anonymous_args = 0 push {r4, r5, r6, r7, r8, r9, r10, fp, lr} subw sp, sp, #1532 ldr r5, .L379 .LPIC342: add r5, pc ldr r3, .L379+4 ldr r3, [r5, r3] ldr r3, [r3] str r3, [sp, #1524] ldr r3, .L379+8 .LPIC343: add r3, pc ldr r6, [r3, #208] movs r3, #0 2016 %RECORD(arfm)%NAME p 2017 gn: %IF next = 0 %START; !end of phrase 2018 class = 0 %AND %RETURN %IF link = 0; !end of statement ldr r7, [ip, #28] cbnz r7, .L356 ldr r8, [ip, #24] cmp r8, #0 beq .L373 .L357: .LVL332: 2019 p == ar(link) ldr r3, [ip, #32] ldr r3, [r3, #64] add r3, r3, r8, lsl #4 movs r3, #0 str r3, [ip, #20] 2020 next = p_link movw lr, #13016 ldrsh r6, [r3, lr] str r6, [ip, #28] .LVL333: b .L354 .L375: ldr r3, .L379+12 .LPIC344: add r3, pc str r6, [r3, #208] b .L358 .LVL336: .L374: ldr r2, .L379+16 .LPIC345: add r2, pc str r6, [r2, #208] b .L361 .LVL337: .L365: 2021 link = p_sub movw r2, #13014 ldrsh r3, [r3, r2] str r3, [ip, #24] .L356: 2022 %FINISH 2023 %CYCLE 2024 p == ar(next) ldr r6, [ip, #28] add r9, r6, #-1 ldr r3, [ip, #32] ldr r3, [r3, #64] .LVL334: add r10, r3, r6, lsl #4 add r9, r6, #-1 ldr r3, [ip, #32] ldr r3, [r3, #64] .LVL338: add r10, r3, r6, lsl #4 2025 x = p_sub ldrsh r6, [r10, r2] ldrsh r6, [r10, r2] 2026 class = p_class movw r1, #13012 ldrsh r10, [r10, r1] str r10, [ip, #20] ldrsh r7, [r10, r1] str r7, [ip, #20] 2027 %EXIT %IF class < actions; !an atom cmp r10, #179 ble .L374 cmp r7, #179 ble .L376 .L364: 2028 %IF x = 0 %START; !null phrase cbnz r6, .L362 .LVL335: .L363: cmp r6, #0 beq .L363 .LVL339: .L362: add r9, r3, r9, lsl #4 .LVL340: 2029 next = p_link; ->gn addw r9, r9, #814 add r3, r3, r9, lsl #4 ldrsh r3, [r3, #8] str r3, [ip, #28] movs r6, #0 mov r3, fp 2030 %FINISH b .L355 .L373: cbnz r3, .L375 .L358: 2031 %IF p_link # 0 %START; !follow a phrase movw r0, #13032 ldrsh r3, [r9, r0] cmp r3, #0 beq .L365 2032 p_sub = link; link = next movw r4, #13030 mov fp, #1 .L355: ldr r3, [ip, #24] strh r3, [r9, r4] @ movhi 2033 %FINISH ldr r3, [ip, #28] str r3, [ip, #24] b .L365 .LVL341: .L376: ldr r2, .L379+20 .LPIC346: add r2, pc str r6, [r2, #208] .LVL342: .L361: 2034 next = x str r6, [ip, #28] 2035 %REPEAT 2036 next = p_link addw r9, r9, #814 add r3, r3, r9, lsl #4 ldrsh r3, [r3, #8] str r3, [ip, #28] 2037 %IF diag&2 # 0 %START 2038 spaces(8-length(name)) %UNLESS name = "" 2039 name = text(class) 2040 write(x, 2) add r1, sp, #244 ldr r0, .L379+24 .LPIC347: add r0, pc add r0, r0, #352 bl _imp_strcmp(PLT) .LVL343: cbnz r0, .L377 .L366: movs r1, #2 ldr r0, [r6, #208] bl _imp_writeint(PLT) .LVL345: .LBB391: .LBB392: bl _imp_space(PLT) .LVL346: mov r2, #256 add r1, sp, #756 addw r4, sp, #1268 mov r0, r4 bl memcpy(PLT) .LVL347: .LBE392: .LBE391: .LBB393: .LBB394: movs r2, #240 addw r1, sp, #1284 mov r0, sp bl memcpy(PLT) .LVL348: ldm r4, {r0, r1, r2, r3} bl _imp_printstring(PLT) .LVL349: .LBE394: .LBE393: .LBB395: .LBB396: bl _imp_space(PLT) .LVL350: .LBE396: .LBE395: 2041 space ldr r6, .L379+28 .LPIC349: add r6, pc movs r2, #8 add r1, sp, #500 add r0, r6, #352 bl _imp_strncpy(PLT) .LVL344: 2042 printstring(name) 2043 space ldr r3, .L379+36 .LPIC348: add r3, pc ldrb r0, [r3, #352] @ zero_extendqisi2 .LBB397: .LBB398: rsb r0, r0, #8 bl _imp_spaces(PLT) .LVL352: b .L366 .L367: .LBE398: .LBE397: 2044 count = count-1 ldr r3, [r6, #608] subs r3, r3, #1 ldr r2, .L379+32 .LPIC352: add r2, pc str r3, [r2, #608] .L359: .L368: .L354: 2045 %IF count <= 0 %START cmp r3, #0 ble .L367 2046 count = 5 ldr r0, .L379+40 .LPIC353: add r0, pc movs r3, #5 str r3, [r0, #608] .LVL353: 2047 name = "" 2048 newline 2049 %FINISH movs r2, #8 add r1, sp, #1012 add r0, r0, #352 bl _imp_strncpy(PLT) .LVL354: .LBB399: .LBB400: bl _imp_newline(PLT) .LVL355: b .L354 .L378: .LBE400: .LBE399: 2050 %FINISH 2051 %END 2052 ldr r3, .L379+4 ldr r3, [r5, r3] ldr r2, [sp, #1524] ldr r3, [r3] cmp r2, r3 bne .L378 addw sp, sp, #1532 @ sp needed pop {r4, r5, r6, r7, r8, r9, r10, fp, pc} .L377: .LVL351: bl __stack_chk_fail(PLT) .LVL356: .L380: .align 2 .L379: .word _GLOBAL_OFFSET_TABLE_-(.LPIC342+4) .word __stack_chk_guard(GOT) .word .LANCHOR0-(.LPIC343+4) .word .LANCHOR0-(.LPIC344+4) .word .LANCHOR0-(.LPIC345+4) .word .LANCHOR0-(.LPIC346+4) .word .LANCHOR0-(.LPIC347+4) .word .LANCHOR0-(.LPIC349+4) .word .LANCHOR0-(.LPIC352+4) .word .LANCHOR0-(.LPIC348+4) .word .LANCHOR0-(.LPIC353+4) .LFE211: .align 1 .thumb .thumb_func SETSUBS.11239: .LFB212: 2053 %ROUTINE set subs(%INTEGER n) @ Nested: function declared inside another function. @ args = 0, pretend = 0, frame = 0 @ frame_needed = 0, uses_anonymous_args = 0 .LVL357: push {r4, lr} 2054 2055 !update the app field in n array descriptors 2056 2057 %INTEGER p 2058 p = tmax ldr r2, [ip, #32] ldr r3, [r2, #52] .LVL358: 2059 %WHILE n > 0 %CYCLE 2060 !IMP80 BUG??? %SIGNAL 15,15 %IF p < tbase cmp r0, #0 ble .L389 cmp r0, r3 beq .L392 2061 %STOP %IF p < tbase ldr r1, [r2, #56] cmp r3, r1 blt .L384 ldr r2, [ip, #32] ldr r1, [r2, #56] cmp r1, r3 ble .L385 .LVL361: .L384: .LBB401: .LBB402: movs r0, #0 bl exit(PLT) .LVL362: .L382: .L392: .LBE402: .LBE401: 2062 tag(p)_app = dimension ldr r1, .L393 .LPIC355: add r1, pc ldr r4, [r1, #196] subs r0, r3, r0 .LVL359: .L385: ldr r2, [r2, #64] add r2, r2, r3, lsl #4 str r4, [r2, #212] 2063 p = p-1; n = n-1 subs r3, r3, #1 .LVL360: .LDL18: 2064 %REPEAT 2065 %END 2066 pop {r4, pc} .LVL363: .L389: bx lr .L394: .align 2 .L393: .word .LANCHOR0-(.LPIC355+4) .LFE212: .align 1 .thumb .thumb_func FAULT.10318: .LFB192: 2067 %ROUTINE set bp @ Nested: function declared inside another function. @ args = 0, pretend = 0, frame = 0 @ frame_needed = 0, uses_anonymous_args = 0 push {r3, r4, r5, lr} mov r4, ip 2068 2069 !define a constant bound pair from the last stacked constants 2070 2071 pending = pending-2 ldr r1, [ip, #16] subs r3, r1, #2 str r3, [ip, #16] 2072 lb = pstack(pending+1); ub = pstack(pending+2) ldr r2, .L455 .LPIC387: add r2, pc add r3, r2, r3, lsl #2 ldr r0, [r3, #8] str r0, [r2, #612] 2073 %IF ub-lb+1 < 0 %START add r1, r2, r1, lsl #2 ldr r3, [r1, #4] str r3, [r2, #616] subs r3, r3, r0 cmn r3, #1 bmi .L454 .L451: 2074 pos1 = 0; next = link; fault(11) ldr r5, .L455+12 .LPIC391: add r5, pc movs r3, #0 str r3, [r5, #296] 2075 ub = lb ldr r3, [ip, #24] str r3, [ip, #28] ldr r3, [r5, #612] str r3, [r5, #616] b .L451 .L456: .align 2 .L455: .word .LANCHOR0-(.LPIC387+4) .word .LANCHOR0-(.LPIC394+4) .word .LANCHOR0-(.LPIC396+4) .word .LANCHOR0-(.LPIC391+4) .LFE213: .align 1 .thumb .thumb_func DEFSLAB.11288: .LFB216: 2076 %FINISH ldr ip, [ip, #32] movs r0, #11 bl FAULT.10318(PLT) .LVL424: 2077 set const(lb); set const(ub) ldr r5, .L455+4 .LPIC394: add r5, pc ldr r3, [r4, #32] ldr ip, [r3, #64] ldr r0, [r5, #612] bl SETCONST.10285(PLT) .LVL422: 2078 bp=bp+1 %AND buff(bp)='b' %UNLESS class = 146 ldr r3, [r4, #32] ldr ip, [r3, #64] ldr r0, [r5, #616] bl SETCONST.10285(PLT) .LVL423: ldr r3, [r4, #20] cmp r3, #146 beq .L450 2079 %END ldr r3, .L455+8 .LPIC396: add r3, pc ldr r2, [r3] adds r1, r2, #1 str r1, [r3] 2080 ldr r3, [r4, #32] ldr r3, [r3, #64] add r3, r3, r2 add r3, r3, #104448 movs r2, #98 strb r2, [r3, #262] .L452: .L450: pop {r3, r4, r5, pc} .L454: 2081 %ROUTINE compile end(%INTEGER type) 2082 2083 ! type = 0:eof, 1:eop, 2:end 2084 2085 %IF access # 0 %START ldr r3, [sp, #612] ldr r2, [r3, #24] cmp r2, #0 bne .L614 .L617: 2086 open = 0 movs r2, #0 str r2, [r3, #20] 2087 fault(19) %IF block form > proc; !can reach end ldr r3, [sp, #612] ldr r2, [r3, #36] cmp r2, #7 ble .L617 2088 %FINISH mov ip, r3 movs r0, #19 bl FAULT.10318(PLT) .LVL565: b .L617 .LVL566: .L804: 2089 2090 %WHILE dict(dmin) >= 0 %CYCLE; !finishes & repeats 2091 fault(17+dict(dmin)&1) ldr ip, [sp, #612] ldr r2, [ip, #64] ldr r3, [ip, #40] add r3, r3, #13376 adds r3, r3, #39 add r3, r2, r3, lsl #1 ldrsh r0, [r3, #4] cmp r0, #0 blt .L615 movw r4, #13416 .LVL557: .L616: and r0, r0, #1 adds r0, r0, #17 bl FAULT.10318(PLT) .LVL558: ldr r2, [ip, #64] add r3, r3, r4 add r3, r2, r3, lsl #1 ldrsh r0, [r3, #4] cmp r0, #0 bge .L616 .L615: 2092 dmin = dmin+1 add r5, sp, #600 ldr ip, [r5, #12] ldr r3, [ip, #40] adds r2, r3, #1 str r2, [ip, #40] 2093 %REPEAT 2094 {delete names(0)} 2095 bp=bp+1 %AND buff(bp)=';' ldr r3, .L823+16 .LPIC574: add r3, pc ldr r1, [r3] adds r0, r1, #1 str r0, [r3] 2096 bp=bp+1 %AND buff(bp)=';' %IF type = 1; !endofprogram adds r3, r2, r1 add r3, r3, #104448 movs r2, #59 strb r2, [r3, #262] cmp r6, #1 beq .L804 .L618: 2097 adds r1, r1, #2 ldr r3, .L823+44 .LPIC576: add r3, pc str r1, [r3] 2098 bflags = bflags!open; !show if it returns ldr r2, [ip, #16] ldr r3, [ip, #20] ldrh r1, [r2] orrs r3, r3, r1 strh r3, [r2] @ movhi ldr r3, [ip, #64] add r3, r3, r0 add r3, r3, #104448 strb r2, [r3, #262] ldr r2, [ip, #16] ldr r3, [ip, #20] ldrh r1, [r2] orrs r3, r3, r1 strh r3, [r2] @ movhi 2099 2100 def lab(0) %IF block tag # 0 %AND level # 1; !for jump around ldr r3, [sp, #612] ldr r2, [r3, #12] cmp r2, #0 beq .L621 ldr r3, [sp, #612] ldr r2, [r3, #12] cbz r2, .L619 2101 %IF type # 2 %START; !eop, eof ldr r3, [r3, #48] cmp r3, #1 bne .L763 .L490: .L761: cmp r6, #2 beq .L626 b .L619 .LVL559: .L803: .LBE539: .LBE538: ldr r3, [r3, #48] cmp r3, #1 beq .L619 .L763: cmp r6, #2 beq .L623 .L619: 2102 fault(16) %IF level # type; !end missing add ip, sp, #580 movs r0, #0 bl DEFLAB.11211(PLT) .LVL567: .L621: ldr r3, [sp, #612] ldr r2, [r3, #48] cmp r6, r2 bne .L805 .L624: .L625: .L626: 2103 %FINISH %ELSE %START mov ip, r3 movs r0, #16 bl FAULT.10318(PLT) .LVL568: b .L626 .L623: 2104 %IF level = 0 %START ldr ip, [sp, #612] ldr r3, [ip, #48] cmp r3, #0 bne .L626 2105 fault(15); !spurious end movs r0, #15 bl FAULT.10318(PLT) .LVL569: b .L626 .LVL570: .L627: .LDL26: .LDL27: .LDL28: .LBE540: .LBE543: 2106 %FINISH 2107 %FINISH 2108 2109 end mark = 11; !******Mouses specific****** ldr r3, .L823+48 .LPIC577: add r3, pc movs r2, #11 str r2, [r3, #292] b .L466 .L805: 2110 %END 2111 2112 %ROUTINE def(%INTEGER p) @ Nested: function declared inside another function. @ args = 0, pretend = 0, frame = 0 @ frame_needed = 0, uses_anonymous_args = 0 .LVL109: push {r3, r4, r5, r6, r7, r8, r9, r10, fp, lr} mov r6, r0 mov r5, ip 2113 2114 !dump a descriptor 2115 2116 %INTEGER t, f, type 2117 %RECORD(tagfm)%NAME v 2118 flush buffer %if bp # 0 ldr r3, .L110 .LPIC55: add r3, pc ldr r3, [r3] cmp r3, #0 bne .L107 .LVL110: .L92: 2119 defs = defs+1 ldr r3, [r5, #12] adds r3, r3, #1 str r3, [r5, #12] ldr r3, [ip, #32] ldr ip, [r3, #64] bl FLUSHBUFFER.10176(PLT) .LVL131: b .L92 .LVL132: .L108: 2120 v == tag(p) ldr r3, [r5, #32] ldr r7, [r3, #64] .LVL111: 2121 t = 0 it lt movlt r1, #0 2122 %UNLESS v_index < 0 %START; !no index for subnames add r2, r7, r6, lsl #4 ldrsh r2, [r2, #222] cmp r2, #0 blt .L93 2123 id = id+1 %AND v_index = id %IF v_index = 0 cbnz r2, .L94 2124 last def = v_index ldr r2, [r3, #44] adds r2, r2, #1 str r2, [r3, #44] add r3, r7, r6, lsl #4 ldrsh r1, [r3, #222] .LVL112: .L93: 2125 t = last def add r3, r7, r6, lsl #4 ldr r2, [r5, #32] ldr r2, [r2, #44] strh r2, [r3, #222] @ movhi .L94: 2126 %FINISH 2127 op('$', t) ldr r3, [r5, #32] ldr ip, [r3, #64] movs r0, #36 bl OP.10282(PLT) .LVL113: 2128 print ident(p, 1); !output the name ldr r3, [r5, #32] ldr ip, [r3, #64] movs r1, #1 mov r0, r6 bl PRINTIDENT.10189(PLT) .LVL114: 2129 t = v_flags add r9, r7, r6, lsl #4 ldrsh r4, [r9, #220] .LVL115: .LDL5: and r8, r4, #15 2130 type = t 2131 type = type&(\(7<<4)) %IF type&(7<<4) >= 6<<4;!routine & pred 2132 op(',', type&b'1111111'); !type & form ldr r3, [r5, #32] ldr ip, [r3, #64] mov r1, r8 movs r0, #44 bl OP.10282(PLT) .LVL116: 2133 f = v_format ldr r1, [r9, #216] .LVL117: 2134 f = tag(f)_index %IF t&x'70' = record<<4 ands fp, r4, #1 2135 f = v_index %IF f < 0 itttt eq ldreq r3, [r5, #32] ldreq r3, [r3, #64] addeq r1, r3, r1, lsl #4 .LVL118: ldrsheq r1, [r1, #222] .LVL119: .L95: cmp r1, #0 2136 op(',', f); !format itt lt addlt r3, r7, r6, lsl #4 ldrshlt r1, [r3, #222] .LVL120: .L96: ldr r3, [r5, #32] ldr ip, [r3, #64] movs r0, #44 bl OP.10282(PLT) .LVL121: 2137 f = otype+t>>4&b'1111000' ldr r3, .L110+4 .LPIC56: add r3, pc ldr r10, [r3, #188] lsrs r4, r4, #4 .LVL122: and r4, r4, #120 add r4, r4, r10 .LVL123: 2138 f = f!8 %IF class = 125; !add spec from %DUP ldr r3, [r5, #20] cmp r3, #125 2139 dim = v_app; !dimension it eq orreq r4, r4, #8 .LVL124: .L97: ldr r3, [r9, #212] .LVL125: .LBB336: ldr r2, .L110+24 .LPIC57: add r2, pc str r3, [r2, #192] b .L99 .LVL133: .L109: 2140 dim = 0 %unless 0 < dim <= dim limit 2141 op(',', f+dim<<8); !otype & spec & prot ldr r3, .L110+12 .LPIC59: add r3, pc ldr r1, [r3, #192] ldr r3, [r5, #32] ldr ip, [r3, #64] add r1, r4, r1, lsl #8 movs r0, #44 bl OP.10282(PLT) .LVL127: 2142 defs = 0 %IF t¶meters = 0 cmp fp, #0 bne .L100 2143 f = t&15 movs r3, #0 str r3, [r5, #12] .L100: .LVL128: .LBB337: 2144 %IF v_flags&spec # 0 %START 2145 v_flags = v_flags&(\spec) %UNLESS 3 <= f <= 10 subs r2, r3, #1 cmp r2, #5 bls .L108 .L98: .LBE336: 2146 ocount = -1; !external specs have no constants ldr r3, .L110+16 .LPIC60: add r3, pc mov r2, #-1 str r2, [r3, #2552] .LDL6: 2147 %FINISH 2148 dimension = 0 ldr r3, .L110+8 .LVL126: .LPIC58: add r3, pc movs r2, #0 str r2, [r3, #192] .L99: ldr r3, .L110+20 .LPIC61: add r3, pc movs r2, #0 str r2, [r3, #196] 2149 %if otype = 2 %and (f=2 %or f=12 %or f=14) %start cmp r10, #2 beq .L109 .L103: .LVL129: .L91: 2150 v_flags = v_flags-1; !convert to simple sub r3, r8, #3 cmp r3, #7 .L102: .LBE337: add r6, r7, r6, lsl #4 .LVL134: ldrh r3, [r6, #220] subs r3, r3, #1 strh r3, [r6, #220] @ movhi 2151 %finish cmp r8, #2 it ne cmpne r8, #12 ite eq moveq r3, #1 movne r3, #0 eor r3, r3, #1 2152 %END cmp r8, #14 ite eq moveq r3, #0 andne r3, r3, #1 cmp r3, #0 bne .L91 .L104: b .L91 .L111: .align 2 .L110: .word .LANCHOR0-(.LPIC55+4) .word .LANCHOR0-(.LPIC56+4) .word .LANCHOR0-(.LPIC58+4) .word .LANCHOR0-(.LPIC59+4) .word .LANCHOR2-(.LPIC60+4) .word .LANCHOR0-(.LPIC61+4) .word .LANCHOR0-(.LPIC57+4) .LFE215: .align 1 .thumb .thumb_func LOOKUP.10653: .LFB205: 2153 itttt hi addhi r2, r7, r6, lsl #4 ldrhhi r3, [r2, #220] bichi r3, r3, #128 strhhi r3, [r2, #220] @ movhi .L101: pop {r3, r4, r5, r6, r7, r8, r9, r10, fp, pc} .LVL130: .L107: 2154 %ROUTINE def s lab(%INTEGER n) @ Nested: function declared inside another function. @ args = 0, pretend = 0, frame = 0 @ frame_needed = 0, uses_anonymous_args = 0 .LVL425: push {r3, r4, r5, r6, r7, lr} mov r4, ip 2155 2156 !define a switch label, x defines the switch tag 2157 2158 %INTEGER p, l, b, w, bit 2159 p = tag(x)_format; !pointer to table ldr r3, .L464 .LPIC398: add r3, pc ldr r5, [r3, #208] ldr ip, [ip, #32] ldr r3, [ip, #64] .LVL426: add r2, r3, r5, lsl #4 ldr r1, [r2, #216] add r6, r3, r1, lsl #1 2160 l = dict(p); !lower bound movw r2, #26834 ldrsh r2, [r6, r2] .LVL427: .LBB482: 2161 %IF l <= n <= dict(p+1) %START 2162 b = n-l subs r2, r0, r2 .LVL428: 2163 w = b>>4+p add r2, r1, r2, lsr #4 .LVL430: add r3, r3, r2, lsl #1 .LVL431: 2164 bit = 1<<(b&15) cmp r2, r0 bgt .L458 and r7, r2, #15 movs r6, #1 .LVL429: 2165 %IF dict(w+2)&bit # 0 %START; !already set movw r2, #26838 .LVL432: ldrsh r2, [r3, r2] lsls r6, r6, r7 .LVL433: and r1, r2, #1 .LVL434: it ne movne r1, #0 cbnz r1, .L459 2166 fault(4) %IF pending # 0 movw r7, #26836 ldrsh r6, [r6, r7] cmp r6, r0 blt .L458 .LBE482: ldr r3, [r4, #16] cbz r3, .L457 2167 %RETURN movs r0, #4 .LVL435: bl FAULT.10318(PLT) .LVL436: b .L457 .LVL437: .L459: 2168 %FINISH 2169 dict(w+2) <- dict(w+2)!bit %IF pending # 0 ldr r1, [r4, #16] cbz r1, .L461 2170 set const(n) orrs r6, r6, r2 .LVL438: movw r2, #26838 strh r6, [r3, r2] @ movhi .LVL439: .L461: ldr r3, [r4, #32] ldr ip, [r3, #64] bl SETCONST.10285(PLT) .LVL440: 2171 op('_', tag(x)_index) ldr r3, [r4, #32] ldr ip, [r3, #64] add r5, ip, r5, lsl #4 ldrsh r1, [r5, #222] movs r0, #95 bl OP.10282(PLT) .LVL441: 2172 %FINISH %ELSE %START b .L462 .LVL442: .L458: 2173 fault(12) movs r0, #12 .LVL443: bl FAULT.10318(PLT) .LVL444: .L462: 2174 %FINISH 2175 access = 1 ldr r3, [r4, #32] movs r2, #1 str r2, [r3, #24] .L460: .L457: 2176 %END 2177 pop {r3, r4, r5, r6, r7, pc} .L465: .align 2 .L464: .word .LANCHOR0-(.LPIC398+4) .LFE216: .global __aeabi_idiv .align 1 .thumb .thumb_func COMPILE.10301: .LFB209: 2178 %ROUTINE call 2179 %RECORD(tagfm)%NAME T 2180 t == tag(x) ldr r3, .L823+136 .LPIC607: add r3, pc ldr r5, [r3, #208] add r6, sp, #580 ldr r3, [sp, #612] ldr r4, [r3, #64] .LVL605: 2181 op('@', t_index) add r3, r4, r5, lsl #4 mov ip, r4 ldrsh r1, [r3, #222] movs r0, #64 bl OP.10282(PLT) .LVL606: 2182 access = 0 %IF t_flags&closed # 0; !never comes back 2183 bp=bp+1 %AND buff(bp)='E' %IF t_app = 0; !no parameters ldr r3, [r6, #32] movs r2, #0 str r2, [r3, #24] .LDL30: add r4, r4, r5, lsl #4 .LVL607: ldr r3, [r4, #212] cmp r3, #0 bne .L781 2184 %END ldr r3, .L823+140 .LPIC608: add r3, pc ldr r2, [r3] adds r1, r2, #1 str r1, [r3] 2185 ldr r3, [sp, #612] ldr r3, [r3, #64] add r3, r3, r2 add r3, r3, #104448 movs r2, #69 strb r2, [r3, #262] b .L781 .LVL608: .L657: b .L659 .L658: b .L659 .L660: b .L670 .L661: b .L670 .L662: b .L670 .L663: b .L670 .L664: b .L670 .L665: .L670: .LBE547: .LBE546: 2186 %ROUTINE pop def 2187 set const(pstack(pending)); pending = pending-1 ldr r2, .L823+204 .LPIC639: add r2, pc add r3, r2, r3, lsl #2 add r4, sp, #580 .LVL625: ldr r2, [sp, #612] ldr ip, [r2, #64] ldr r0, [r3, #4] bl SETCONST.10285(PLT) .LVL626: 2188 %END ldr r3, [r4, #16] subs r3, r3, #1 str r3, [r4, #16] .L690: .LBE549: .LBE548: 2189 2190 %ROUTINE pop lit @ Nested: function declared inside another function. @ args = 0, pretend = 0, frame = 0 @ frame_needed = 0, uses_anonymous_args = 0 @ link register save eliminated. 2191 %IF pending = 0 %THEN lit = 0 %ELSE %START ldr r3, [ip, #16] cbz r3, .L22 .L20: 2192 lit = pstack(pending); pending = pending-1 subs r3, r3, #1 ldr r2, .L23 .LPIC17: add r2, pc add r1, r2, r3, lsl #2 ldr r1, [r1, #8] str r1, [r2, #4] ldr r3, .L23+4 .LPIC16: add r3, pc movs r2, #0 str r2, [r3, #4] 2193 %FINISH str r3, [ip, #16] .L21: bx lr .L24: .align 2 .L23: .word .LANCHOR0-(.LPIC17+4) .word .LANCHOR0-(.LPIC16+4) .LFE219: .align 1 .thumb .thumb_func PUSH.11367: .LFB220: 2194 %END 2195 bx lr .L22: 2196 2197 %IF sstype < 0 %START; !executable statement ldr r3, .L821+12 .LPIC404: add r3, pc ldr r3, [r3, #620] cmp r3, #0 blt .L787 .L467: .L469: .L470: 2198 %IF level = 0 %START; !outermost level ldr r3, [ip, #48] cbz r3, .L793 .L468: 2199 fault(13); !*order movs r0, #13 bl FAULT.10318(PLT) .LVL464: b .L470 .L473: .L474: .L475: .L476: .L477: .L478: .LVL465: .L479: b .L781 .LVL466: .L788: 2200 %FINISH %ELSE %START 2201 %IF access = 0 %START ldr r3, [sp, #516] ldr r3, [r3, #24] cmp r3, #0 bne .L470 2202 access = 1; fault(-1); !only a warning movs r3, #1 ldr r2, [sp, #516] str r3, [r2, #24] 2203 %FINISH mov ip, r2 mov r0, #-1 bl FAULT.10318(PLT) .LVL463: b .L470 .L793: 2204 %FINISH 2205 %FINISH 2206 2207 %IF diag&2 # 0 %START 2208 newline %IF sym # nl ldr r3, .L821+16 .LPIC405: add r3, pc ldr r3, [r3, #2548] cmp r3, #10 beq .L471 .LBB524: .LBB525: bl _imp_newline(PLT) .LVL445: .L471: .LBE525: .LBE524: .LBB526: 2209 printstring("ss =") mov r6, #256 mov r2, r6 ldr r1, .L821+20 .LPIC406: add r1, pc addw r1, r1, #1492 add r4, sp, #4736 adds r4, r4, #12 mov r0, r4 bl memcpy(PLT) .LVL446: mov r2, r6 mov r1, r4 add r5, sp, #652 mov r0, r5 bl memcpy(PLT) .LVL447: mov r2, r6 mov r1, r5 mov r0, r4 bl memcpy(PLT) .LVL448: .LBE526: .LBB527: .LBB528: movs r2, #240 add r1, sp, #4736 adds r1, r1, #28 mov r0, sp bl memcpy(PLT) .LVL449: ldm r4, {r0, r1, r2, r3} bl _imp_printstring(PLT) .LVL450: .LBE528: .LBE527: 2210 write(ss, 1) ldr r4, .L821+24 .LPIC407: add r4, pc movs r1, #1 ldr r0, [r4, #624] bl _imp_writeint(PLT) .LVL451: .LBB529: .LBB530: bl _imp_newline(PLT) .LVL452: .LBE530: .LBE529: 2211 newline 2212 count = 5 movs r3, #5 str r3, [r4, #608] .LVL453: 2213 name = "" 2214 %FINISH 2215 movs r2, #8 add r1, sp, #908 add r0, r4, #352 bl _imp_strncpy(PLT) .LVL454: .L472: 2216 next = ss ldr r2, [r4, #624] str r2, [sp, #608] 2217 pending = 0; lmode = 0 movs r2, #0 str r2, [sp, #596] 2218 link = 0; decs = 0 str r2, [sp, #580] str r2, [sp, #604] .LVL455: 2219 defs = 0; resln = 0; done = 0 str r2, [sp, #592] .LVL456: movlt r3, r2 iteee lt strlt r3, [sp, #524] movge r3, #0 strge r3, [sp, #524] 2220 ord = level itttt lt ldrlt r3, [sp, #516] ldrlt r3, [r3, #48] strlt r3, [sp, #536] str r3, [sp, #540] 2221 ord = 1 %IF this >= 0; !recordformat declarations ldr r3, .L821+28 .LPIC411: add r3, pc ldr r3, [r3, #2568] cmp r3, r2 2222 c(0): movge r2, #1 it ge strge r2, [sp, #536] 2223 top: %IF next # link %START 2224 get next; ->c(class) ldr r2, [sp, #608] ldr r3, [sp, #604] cmp r2, r3 bne .L788 .L481: add r4, sp, #580 mov ip, r4 bl GETNEXT.11214(PLT) .LVL467: 2225 %FINISH ldr r4, [r4, #20] .LVL468: .LDL24: 2226 2227 !all done, tidy up declarations and jumps 2228 2229 newline %IF diag&2 # 0 %AND count # 5 2230 ldr r3, .L821+48 .LPIC412: add r3, pc ldr r3, [r3, #608] cmp r3, #5 beq .L485 .LBB531: .LBB532: bl _imp_newline(PLT) .LVL458: .L485: .LBE532: .LBE531: 2231 %IF lmode&(loop!then!else) # 0 %START; !pending labels and jumps 2232 op('B', label-1) %IF lmode&loop # 0; !repeat 2233 def lab(label) %IF lmode&then # 0; !entry from then ldr r5, [sp, #516] ldr r1, [r5, #8] ldr ip, [r5, #64] subs r1, r1, #1 movs r0, #66 bl OP.10282(PLT) .LVL459: .L486: 2234 def lab(label-1) %IF lmode&else # 0; !entry from else add r4, sp, #580 mov ip, r4 ldr r0, [r5, #8] bl DEFLAB.11211(PLT) .LVL460: .L487: 2235 %FINISH ldr r0, [r5, #8] mov ip, r4 subs r0, r0, #1 bl DEFLAB.11211(PLT) .LVL461: .L488: .L489: 2236 2237 %RETURN %IF decs = 0 ldr r3, [sp, #524] cmp r3, #0 beq .L466 .L491: 2238 atom1 = error %AND %RETURN %IF atom1 # 0; !%INTEGERROUTINE ldr r3, .L821+52 .LPIC413: add r3, pc ldr r3, [r3, #240] cmp r3, #0 bne .L789 .L492: 2239 order = ord ldr r2, .L821+56 .LPIC415: add r2, pc ldr r3, [sp, #536] str r3, [r2, #628] ldr r3, .L821+108 .LPIC414: add r3, pc mov r2, #32768 str r2, [r3, #240] .LVL471: .L466: 2240 decl = decl&(\15)+decmap(decl&15); !construct declarator flags ldr r1, [r2, #264] and r0, r1, #15 add r3, sp, #620 ldrsh r3, [r3, r0, lsl #1] bic r1, r1, #15 add r3, r3, r1 str r3, [r2, #264] 2241 atom1 = atoms(decl&15); !generate class ldr r1, [sp, #516] ldr r1, [r1, #64] and r0, r3, #15 add r1, r1, r0 movw r0, #38836 ldrb r1, [r1, r0] @ zero_extendqisi2 str r1, [r2, #240] 2242 %IF otype # 0 %START; !own, const etc. ldr r2, [r2, #188] cbz r2, .L499 2243 atom1 = atom1+1 %IF atom1 # proc cmp r1, #7 beq .L494 2244 %IF otype = 2 %START; !const adds r1, r1, #1 ldr r0, .L821+60 .LPIC420: add r0, pc str r1, [r0, #240] .L494: cmp r2, #2 beq .L790 .L495: 2245 n = decl&15 2246 %if n&1 # 0 %start 2247 decl = decl!prot orr r3, r3, #256 .LVL473: ldr r2, .L821+112 .LPIC421: add r2, pc str r3, [r2, #264] .LVL474: b .L499 .LVL475: .L496: 2248 decl = decl!const bit %IF decl&b'1111111' = iform tst r3, #1 beq .L496 2249 %finish orr r3, r3, #8448 .LVL476: ldr r2, .L821+116 .LPIC422: add r2, pc str r3, [r2, #264] .LVL477: b .L499 .L791: 2250 %else 2251 decl = decl!own bit orr r3, r3, #512 ldr r2, .L821+64 .LPIC423: add r2, pc str r3, [r2, #264] .L493: .L497: .L498: .L499: 2252 %FINISH 2253 %FINISH 2254 sstype = 1 %IF sstype = 0 %AND atom1 = proc ldr r3, .L821+68 .LPIC424: add r3, pc ldr r3, [r3, #620] cbnz r3, .L500 2255 atom1 = atom1+1 %IF decl&spec # 0; !onto spec variant ldr r3, .L821+72 .LPIC425: add r3, pc ldr r3, [r3, #240] cmp r3, #7 beq .L791 .L500: 2256 ocount = 0 %AND cont = '+' %IF atom1 = 5; !own array ldr r2, .L821+76 .LPIC428: add r2, pc ldr r3, [r2, #240] adds r3, r3, #1 str r3, [r2, #240] .LDL22: cmp r3, #5 beq .L792 .L501: ldr r3, .L821+120 .LPIC426: add r3, pc movs r2, #1 str r2, [r3, #620] movs r2, #8 str r2, [r3, #240] b .L501 .L792: 2257 %IF anyform(decl&15) = 0 %START; !check meaningful ldr r3, .L821+80 .LPIC432: add r3, pc ldr r2, [r3, #264] and r3, r2, #15 add r1, sp, #5024 adds r1, r1, #24 add r3, r3, r1 ldrb r3, [r3, #-20] @ zero_extendqisi2 cmp r3, #0 bne .L466 ldr r3, .L821+124 .LPIC430: add r3, pc movs r2, #0 str r2, [r3, #2552] 2258 %IF decl>>4&7 = record %START tst r2, #16 bne .L503 movs r2, #43 str r2, [r3, #2836] b .L501 .LVL478: .L506: .L507: 2259 this = fdef %IF tag(fdef)_flags&spec # 0 2260 atom1 = error+21 %IF fdef = this; !*context for format ldr r3, .L821+84 .LPIC434: add r3, pc ldr r1, [r3, #272] ldr r2, .L821+88 .LPIC433: add r2, pc str r1, [r2, #2568] .LDL23: 2261 %FINISH movw r2, #32789 str r2, [r3, #240] .L502: .L503: 2262 atom1 = error+10 %IF fdef = 0; !*size ldr r3, .L821+92 .LPIC436: add r3, pc ldr r3, [r3, #272] cmp r3, #0 bne .L466 2263 %FINISH ldr r3, .L821+96 .LPIC437: add r3, pc movw r2, #32778 str r2, [r3, #240] b .L466 .LVL462: .L787: 2264 %RETURN 2265 2266 atop: access = 0; ->top 2267 movs r3, #0 ldr r2, [sp, #516] str r3, [r2, #24] 2268 ! declarators b .L781 .LVL508: .L560: 2269 2270 c(88): !rtype 2271 c(28): decl = x&(\7); !stype 2272 fdef = x&7; !precision ldr r2, .L821+128 .LPIC438: add r2, pc ldr r3, [r2, #208] bic r1, r3, #7 str r1, [r2, #264] and r1, r3, #7 str r1, [r2, #272] 2273 fdef = reals ln %IF x&b'1110001' = real<<4+1; !convert to long ands r3, r3, #1 str r3, [sp, #524] bne .L781 2274 decs = 1; ->top ldr r3, .L821+132 .LPIC442: add r3, pc ldr r2, [r3, #2844] ldr r3, .L821+136 .LPIC441: add r3, pc str r2, [r3, #272] movs r3, #1 str r3, [sp, #524] b .L781 .L508: .L509: 2275 c(34): !own 2276 c(35): otype = x; ord = 1; ->top; !external 2277 c(152):decl = decl+x<<1; ->top; !xname ldr r3, .L821+140 .LPIC443: add r3, pc ldr r2, [r3, #208] str r2, [r3, #188] .LVL479: 2278 c(31): !proc movs r3, #1 str r3, [sp, #536] ldr r3, .L821+144 .LPIC445: add r3, pc ldr r1, [r3, #208] ldr r2, [r3, #264] add r2, r2, r1, lsl #1 str r2, [r3, #264] 2279 c(32): spec mode = level+1; !fn/map b .L781 .LVL480: .L510: b .L781 .L511: .L512: 2280 decl = decl!prot %IF x = 9; !function ldr r2, .L821+148 .LPIC448: add r2, pc ldr r3, [sp, #516] ldr r3, [r3, #48] adds r3, r3, #1 str r3, [r2, #632] ldr r3, [r2, #208] cmp r3, #9 beq .L795 .L513: .L514: .LVL481: 2281 c(29): ord = 1; !array ldr r2, .L821+160 .LPIC450: add r2, pc ldr r3, [r2, #264] orr r3, r3, #256 str r3, [r2, #264] b .L514 .L516: 2282 dim = 0 ldr r3, .L821+152 .LPIC452: add r3, pc movs r2, #0 str r2, [r3, #192] movs r3, #1 str r3, [sp, #536] .LVL482: .L515: 2283 c(30): decl = decl+x; !name 2284 decs = 1 ldr r3, .L821+156 .LPIC453: add r3, pc ldr r2, [r3, #264] ldr r1, [r3, #208] add r2, r2, r1 str r2, [r3, #264] .LVL483: movs r3, #1 str r3, [sp, #524] 2285 ->top b .L781 .LVL484: .L795: 2286 c(27): lit = 0; ! arrayd 2287 %IF pending # 0 %START ldr r3, .L821+164 .LPIC456: add r3, pc movs r2, #0 str r2, [r3, #4] ldr r3, [sp, #596] cbnz r3, .L796 .L517: .L519: 2288 pop lit add ip, sp, #580 bl POPLIT.11311(PLT) .LVL487: .LBB534: 2289 %UNLESS 0 top movs r3, #1 str r3, [sp, #524] b .L781 .LVL486: .L796: 2296 c(37): x = x!subname; !record 2297 c(36): lit = 0; !string ldr r2, .L821+180 .LPIC464: add r2, pc ldr r3, [r2, #208] orr r3, r3, #2048 str r3, [r2, #208] .L521: 2298 %IF pending # 0 %START ldr r3, .L821+184 .LPIC466: add r3, pc movs r2, #0 str r2, [r3, #4] ldr r3, [sp, #596] cbnz r3, .L797 .L522: .L524: 2299 pop lit add ip, sp, #580 bl POPLIT.11311(PLT) .LVL491: .LBB535: 2300 %UNLESS 0 < lit <= 255 %START; !max length wrong 2301 atom1 = error+10; %RETURN ldr r3, .L821+200 .LPIC468: add r3, pc movw r2, #32778 str r2, [r3, #240] 2302 %FINISH b .L466 .LVL492: .L526: 2303 %FINISH ldr r3, .L821+196 .LPIC467: add r3, pc 2304 fdef = lit; !format or length ldr r3, .L821+188 .LPIC469: add r3, pc ldr r2, [r3, #4] str r2, [r3, #272] .L525: 2305 c(33): decl = x; !switch ldr r3, [r3, #4] subs r3, r3, #1 cmp r3, #254 bls .L524 .L523: .LBE535: 2306 decs = 1 ldr r3, .L821+192 .LPIC471: add r3, pc ldr r2, [r3, #208] str r2, [r3, #264] .LVL489: movs r3, #1 str r3, [sp, #524] 2307 ->top b .L781 .LVL490: .L797: 2308 c(39): decl = decl!spec; !spec 2309 ocount = -1; !no initialisation ldr r3, .L821+204 .LPIC473: add r3, pc ldr r2, [r3, #264] orr r2, r2, #128 str r2, [r3, #264] mov r2, #-1 ldr r1, .L821+208 .LPIC475: add r1, pc str r2, [r1, #2552] 2310 spec mode = -1 str r2, [r3, #632] 2311 ->top b .L781 .L527: 2312 c(38): decl = 64+4; !recordformat (spec) 2313 order = 1 ldr r3, .L821+212 .LPIC477: add r3, pc movs r2, #68 str r2, [r3, #264] movs r2, #1 str r2, [r3, #628] 2314 atom1 = x ldr r2, [r3, #208] str r2, [r3, #240] 2315 decl = decl!spec %if atom1 = 12; !formatspec cmp r2, #12 beq .L798 .L528: 2316 fdef = tmax+1; !format tag ldr r3, [sp, #516] ldr r3, [r3, #52] adds r3, r3, #1 ldr r2, .L821+216 .LPIC482: add r2, pc str r3, [r2, #272] ldr r3, .L821+220 .LPIC481: add r3, pc movs r2, #196 str r2, [r3, #264] b .L528 .L529: 2317 %return b .L466 .L798: 2318 c(175):id = id+1; tag(x)_index = id; %return; !FSID 2319 c(41): decs = 1; decl = x!spec!closed; ->top; !label ldr r2, [sp, #516] ldr r3, [r2, #44] adds r3, r3, #1 str r3, [r2, #44] 2320 c(133):recid = 0; rbase = tmin-1; !fname ldr r2, [r2, #64] ldr r1, .L821+224 .LPIC483: add r1, pc ldr r1, [r1, #208] add r2, r2, r1, lsl #4 strh r3, [r2, #222] @ movhi movs r3, #1 str r3, [sp, #524] 2321 this = x b .L466 .L530: .LVL493: ldr r2, .L821+228 .LPIC484: add r2, pc ldr r3, [r2, #208] orr r3, r3, #16512 str r3, [r2, #264] ldr r3, [sp, #516] ldr r3, [r3, #64] movs r2, #0 str r2, [r3, #204] ldr r0, [r3, #208] str r0, [r1, #2568] 2322 fm base = fdef; format list = tmin b .L781 .LVL494: .L531: ldr r1, .L821+232 .LPIC486: add r1, pc ldr r2, [r1, #2684] ldr r3, .L821+236 .LPIC487: add r3, pc subs r0, r2, #1 str r0, [r3, #204] ldr r1, [r3, #272] str r1, [r3, #348] 2323 def(this); ->top str r2, [r3, #212] add ip, sp, #580 bl DEF.11264(PLT) .LVL495: b .L781 .L532: 2324 c(148):fdef = 0 %AND ->top %IF next = 0; !reclb 2325 get next; !skip name ldr r3, [sp, #608] cbnz r3, .L533 add ip, sp, #580 bl GETNEXT.11214(PLT) .LVL496: 2326 fdef = x ldr r3, .L821+240 .LPIC493: add r3, pc movs r2, #0 str r2, [r3, #272] ldr r3, .L821+244 .LPIC494: add r3, pc ldr r2, [r3, #208] str r2, [r3, #272] 2327 ->top b .L781 .L533: b .L781 .L534: 2328 c(127):bp=bp+1 %AND buff(bp)='}'; ->top; !%POUT 2329 c(126):bp=bp+1 %AND buff(bp)='{'; ->top; !%PIN ldr r3, .L821+248 .LPIC496: add r3, pc ldr r2, [r3] adds r1, r2, #1 str r1, [r3] 2330 ldr r3, [sp, #516] ldr r3, [r3, #64] add r3, r3, r2 add r3, r3, #104448 movs r2, #125 strb r2, [r3, #262] ldr r3, .L821+252 .LPIC498: add r3, pc ldr r2, [r3] adds r1, r2, #1 str r1, [r3] 2331 c(174):set bp; !rangerb b .L781 .L535: ldr r3, [sp, #516] ldr r3, [r3, #64] add r3, r3, r2 add r3, r3, #104448 movs r2, #123 strb r2, [r3, #262] 2332 c(171): !fmlb b .L781 .L536: add ip, sp, #580 bl SETBP.11246(PLT) .LVL497: .L539: 2333 c(172): !fmrb 2334 c(173):bp=bp+1 %AND buff(bp)='~'; bp=bp+1 %AND buff(bp)=class-171+'A'; ->top; !fmor 2335 c(168):rbase = -rbase; !orrb ldr r1, .L821+256 .LPIC500: add r1, pc ldr r2, [r1] 2336 sstype = 0; spec mode = 0 ldr r4, [sp, #516] .LVL498: ldr r3, [r4, #64] add r3, r3, r2 add r3, r3, #104448 movs r0, #126 strb r0, [r3, #262] ldr r3, .L821+260 .LPIC502: add r3, pc ldr r2, [r3, #204] negs r2, r2 str r2, [r3, #204] movs r2, #0 str r2, [r3, #620] 2337 adds r3, r2, #2 str r3, [r1] str r2, [r3, #632] .L541: 2338 c(147):search base = 0; !recrb ldr r3, [r4, #64] add r3, r3, r2 add r3, r3, #104448 ldr r2, [sp, #600] subs r2, r2, #106 strb r2, [r3, #263] 2339 tag(this)_app = tmin b .L781 .LVL499: .L537: b .L539 .L538: b .L539 .L540: ldr r2, .L821+264 .LPIC506: add r2, pc movs r3, #0 str r3, [r2, #200] ldr r0, .L821+268 .LPIC507: add r0, pc ldr r3, [r0, #2568] ldr r4, [sp, #516] .LVL500: ldr r1, [r4, #64] adds r3, r3, #13 lsls r3, r3, #4 add r1, r1, r3 ldr r0, [r0, #2684] str r0, [r1, #4] 2340 tag(this)_format = rbase ldr r1, [r4, #64] add r3, r3, r1 ldr r2, [r2, #204] str r2, [r3, #8] 2341 ->top b .L781 .LVL501: .L542: 2342 2343 c(45):bp=bp+1 %and buff(bp)='U' %IF x = 36; ->top; !sign 2344 c(46):bp=bp+1; buff(bp)='\'; ->top; !uop ldr r3, .L821+272 .LPIC510: add r3, pc ldr r3, [r3, #208] cmp r3, #36 bne .L781 2345 c(47): !mod ldr r3, .L821+276 .LPIC511: add r3, pc ldr r2, [r3] adds r1, r2, #1 str r1, [r3] ldr r3, .L821+280 .LPIC513: add r3, pc ldr r2, [r3] adds r1, r2, #1 str r1, [r3] 2346 c(48): !dot ldr r3, [sp, #516] ldr r3, [r3, #64] add r3, r3, r2 add r3, r3, #104448 movs r2, #85 strb r2, [r3, #262] b .L781 .L543: ldr r3, [sp, #516] ldr r3, [r3, #64] add r3, r3, r2 add r3, r3, #104448 movs r2, #92 strb r2, [r3, #262] 2347 c(42): !op1 b .L781 .L544: .L548: 2348 c(43): !op2 2349 c(44):bp=bp+1; buff(bp)=operator(x); ->top; !op3 2350 ldr r2, .L821+284 .LPIC515: add r2, pc ldr r1, [r2] adds r3, r1, #1 str r3, [r2] 2351 !conditions & jumps ldr r3, [sp, #516] ldr r3, [r3, #64] add r3, r3, r1 add r3, r3, #104448 ldr r2, [r2, #208] add r1, sp, #5024 adds r1, r1, #24 add r2, r2, r1 ldrb r2, [r2, #-37] @ zero_extendqisi2 strb r2, [r3, #262] 2352 b .L781 .L545: b .L548 .L546: b .L548 .L547: b .L548 .L549: .L550: 2353 %ROUTINE push(%INTEGER x) @ Nested: function declared inside another function. @ args = 0, pretend = 0, frame = 0 @ frame_needed = 0, uses_anonymous_args = 0 @ link register save eliminated. .LVL14: 2354 %IF cnest(cp)&2 # x %START ldr r3, [ip, #8] ldr r2, .L27 .LPIC19: add r2, pc add r2, r2, r3 ldrb r2, [r2, #168] @ zero_extendqisi2 cmp r0, #2 ite ne movne r1, #0 andeq r1, r2, #1 cbnz r1, .L26 2355 cnest(cp) = cnest(cp)!1; x = x+4 ldr r1, .L27+4 .LPIC20: add r1, pc add r1, r1, r3 orr r2, r2, #1 strb r2, [r1, #168] 2356 %FINISH adds r0, r0, #4 .LVL15: .L26: 2357 clab = clab+1 %IF cnest(cp)&1 # 0 2358 cnest(cp+1) = x; cp = cp+1 ldr r2, [ip, #4] adds r2, r2, #1 str r2, [ip, #4] .LDL1: adds r3, r3, #1 ldr r2, .L27+8 .LPIC21: add r2, pc add r2, r2, r3 strb r0, [r2, #168] 2359 %END str r3, [ip, #8] 2360 bx lr .L28: .align 2 .L27: .word .LANCHOR0-(.LPIC19+4) .word .LANCHOR0-(.LPIC20+4) .word .LANCHOR0-(.LPIC21+4) .LFE220: .align 1 .thumb .thumb_func ABANDON.10208: .LFB188: 2361 %ROUTINE pop label(%INTEGER mode) @ Nested: function declared inside another function. @ args = 0, pretend = 0, frame = 0 @ frame_needed = 0, uses_anonymous_args = 0 .LVL419: push {r3, lr} 2362 lmode = dict(dmin) ldr r2, [ip, #32] ldr r1, [r2, #64] ldr r3, [r2, #40] add r3, r3, #13376 adds r3, r3, #39 add r3, r1, r3, lsl #1 ldrsh r3, [r3, #4] str r3, [ip] 2363 %IF lmode < 0 %OR lmode&1 # mode %START cmp r3, #0 blt .L446 2364 fault(mode+8) cmp r0, #1 ite ne movne r3, #0 andeq r3, r3, #1 cbz r3, .L446 .L447: mov ip, r2 adds r0, r0, #8 .LVL420: bl FAULT.10318(PLT) .LVL421: .L448: .L445: 2365 %FINISH %ELSE %START 2366 dmin = dmin+1; label = label-3 ldr r3, [r2, #40] adds r3, r3, #1 str r3, [r2, #40] 2367 %FINISH ldr r2, [ip, #32] ldr r3, [r2, #8] subs r3, r3, #3 str r3, [r2, #8] 2368 %END b .L445 .L446: 2369 pop {r3, pc} .LFE221: .align 1 .thumb .thumb_func SETBP.11246: .LFB213: 2370 c(56): !and 2371 c(57):push(x); ->top; !or 2372 c(58):cnest(cp) = cnest(cp)!!2; ->top; !not add ip, sp, #580 ldr r3, .L821+288 .LPIC518: add r3, pc ldr r0, [r3, #208] bl PUSH.11367(PLT) .LVL502: b .L781 .L551: 2373 ldr r2, [sp, #588] ldr r3, .L821+292 .LPIC519: add r3, pc add r3, r3, r2 ldrb r2, [r3, #168] @ zero_extendqisi2 eor r2, r2, #2 strb r2, [r3, #168] 2374 c(138):x = 128+32+16+4; !csep: treat like %WHILE b .L781 .L552: 2375 c(59): !while ldr r3, .L821+296 .LPIC521: add r3, pc movs r2, #180 str r2, [r3, #208] .L554: 2376 c(60):%IF class = 138 %THEN op('f', label-1) %C 2377 %ELSE def lab(label-1); !until ldr r3, [sp, #600] cmp r3, #138 beq .L799 .L555: 2378 c(166): !runtil ldr r3, [sp, #516] ldr r1, [r3, #8] ldr ip, [r3, #64] subs r1, r1, #1 movs r0, #102 bl OP.10282(PLT) .LVL504: b .L558 .L556: .L557: .L558: 2379 c(62):lmode = (lmode&(else!loop)) !(x>>3); !cword 2380 clab = label; cp = 1; cnest(1) = x&7 ldr r0, .L821+300 .LPIC522: add r0, pc ldr r2, [r0, #208] ldr r3, [sp, #580] and r3, r3, #24 orr r3, r3, r2, lsr #3 str r3, [sp, #580] ldr r3, [sp, #516] ldr r3, [r3, #8] str r3, [sp, #584] 2381 ->top ldr r3, [sp, #516] ldr r0, [r3, #8] add ip, sp, #580 subs r0, r0, #1 bl DEFLAB.11211(PLT) .LVL503: b .L558 .L553: b .L554 .L799: movs r3, #1 str r3, [sp, #588] b .L781 .L559: 2382 c(72):pop label(0); !repeat and r2, r2, #7 strb r2, [r0, #169] 2383 def lab(label+1) %IF lmode&32 # 0; ->atop add r4, sp, #580 .LVL505: mov ip, r4 movs r0, #0 bl POPLABEL.11372(PLT) .LVL506: 2384 c(69):pop label(1); ->top; !finish ldr r3, [sp, #516] ldr r0, [r3, #8] mov ip, r4 adds r0, r0, #1 bl DEFLAB.11211(PLT) .LVL507: .L504: .L505: 2385 c(163): !xelse add ip, sp, #580 movs r0, #1 bl POPLABEL.11372(PLT) .LVL509: b .L781 .L561: .L562: 2386 c(70):pop label(1); !finish else ... 2387 fault(7) %IF lmode&3 = 3; !dangling else add ip, sp, #580 movs r0, #1 bl POPLABEL.11372(PLT) .LVL510: 2388 c(68):lmode = (lmode&else)!3; !...else... ldr ip, [sp, #516] movs r0, #7 bl FAULT.10318(PLT) .LVL511: .L563: .L564: 2389 %IF access # 0 %START ldr r3, [sp, #580] and r3, r3, #8 orr r3, r3, #3 str r3, [sp, #580] ldr r2, [sp, #516] ldr r3, [r2, #24] cbz r3, .L565 2390 op('F', label-1); lmode = else!3 ldr r1, [r2, #8] ldr ip, [r2, #64] subs r1, r1, #1 movs r0, #70 bl OP.10282(PLT) .LVL512: 2391 %FINISH movs r2, #11 str r2, [sp, #580] .L565: 2392 def lab(label) add r4, sp, #580 .LVL513: mov ip, r4 ldr r3, [sp, #516] ldr r0, [r3, #8] bl DEFLAB.11211(PLT) .LVL514: 2393 ->top %IF next # 0 ldr r3, [r4, #28] cmp r3, #0 bne .L781 b .L569 .L566: .LVL515: .L567: .L569: .L570: 2394 2395 c(120): !%MSTART 2396 c(67): !start 2397 c(71): !cycle 2398 stcy: def lab(label-1) %AND lmode = loop %IF lmode = 0;!cycle 2399 dmin = dmin-1; abandon(3) %IF dmin <= dmax ldr r3, [sp, #580] cbz r3, .L800 .L571: ldr r2, [sp, #516] ldr r3, [r2, #40] subs r3, r3, #1 str r3, [r2, #40] 2400 dict(dmin) = lmode ldr r2, .L821+304 .LPIC524: add r2, pc ldr r2, [r2, #2556] cmp r2, r3 bge .L801 .L572: ldr r1, [sp, #516] ldr r2, [r1, #64] ldr r3, [r1, #40] add r3, r3, #13376 adds r3, r3, #39 add r3, r2, r3, lsl #1 ldr r2, [sp, #580] strh r2, [r3, #4] @ movhi ldr r3, [sp, #516] ldr r0, [r3, #8] add r4, sp, #600 add ip, sp, #580 subs r0, r0, #1 bl DEFLAB.11211(PLT) .LVL518: 2401 label = label+3 ldr r3, [r1, #8] adds r3, r3, #3 str r3, [r1, #8] movs r3, #16 str r3, [r4, #-20] b .L571 .L801: ldr r3, [sp, #516] ldr ip, [r3, #64] movs r0, #3 bl ABANDON.10208(PLT) .LVL519: b .L572 .LVL520: .L573: 2402 %RETURN b .L466 .LVL516: .L568: b .L569 .LVL517: .L800: 2403 2404 c(64):fault(13) %IF dict(dmin) >= 0 %OR inhibit # 0; !on event 2405 inhibit = 1 ldr r1, [sp, #516] ldr r2, [r1, #64] ldr r3, [r1, #40] add r3, r3, #13376 adds r3, r3, #39 add r3, r2, r3, lsl #1 ldrsh r3, [r3, #4] cmp r3, #0 bge .L574 movs r3, #1 ldr r2, [sp, #516] str r3, [r2, #4] .LVL522: 2406 n = 0 ldr r3, [r1, #4] cbz r3, .L575 .L574: it le movle r4, #0 movs r4, #0 2407 n = x'FFFF' %IF pending = 0; !* = all events ldr r3, [sp, #596] cbz r3, .L576 2408 %WHILE pending > 0 %CYCLE ldr ip, [sp, #516] movs r0, #13 bl FAULT.10318(PLT) .LVL521: .L575: movw r4, #65535 .LVL523: 2409 pop lit; fault(10) %IF lit&(\15) # 0;!too big cmp r3, #0 ble .L576 add r5, sp, #580 ldr r3, [r5, #16] .LVL526: cmp r3, #0 ble .L576 .LVL527: .L579: mov ip, r5 bl POPLIT.11311(PLT) .LVL528: 2410 j = 1<stcy ldr ip, [r5, #64] ldr r1, [r5, #8] movs r0, #44 bl OP.10282(PLT) .LVL534: movs r2, #5 str r2, [sp, #580] b .L571 .LVL535: .L580: 2416 2417 2418 c(104):op('J', tag(x)_index); !l 2419 inhibit = 1; ->atop ldr r4, [sp, #516] .LVL536: ldr ip, [r4, #64] ldr r3, .L821+316 .LPIC527: add r3, pc ldr r3, [r3, #208] add r3, ip, r3, lsl #4 ldrsh r1, [r3, #222] movs r0, #74 bl OP.10282(PLT) .LVL537: movs r3, #1 str r3, [r4, #4] 2420 c(149):stats = stats-1; !lab b .L504 .LVL538: .L581: 2421 access = 1; inhibit = 1 ldr r3, .L821+320 .LPIC528: add r3, pc ldr r2, [r3, #640] subs r2, r2, #1 str r2, [r3, #640] movs r2, #1 ldr r1, [sp, #516] str r2, [r1, #24] 2422 op('L', tag(x)_index); ->top str r2, [r1, #4] ldr ip, [r1, #64] ldr r3, [r3, #208] add r3, ip, r3, lsl #4 ldrsh r1, [r3, #222] movs r0, #76 bl OP.10282(PLT) .LVL539: b .L781 .L582: 2423 2424 c(63):j = dmin; l = label-3; !exit, continue 2425 %CYCLE ldr r2, [sp, #516] mov r1, r2 ldr r4, [r2, #40] .LVL540: 2426 fault(7) %AND ->top %IF dict(j) < 0 ldr r3, [r2, #8] subs r3, r3, #3 str r3, [r2] subs r2, r4, #1 ldr r0, [r1, #64] add r3, r2, #13376 adds r3, r3, #40 add r3, r0, r3, lsl #1 ldrsh r3, [r3, #4] cmp r3, #0 blt .L583 ldrsh r3, [r2, #2]! cmp r3, #0 blt .L583 .L586: mov r4, r2 .LVL545: .L584: 2427 %EXIT %IF dict(j)&1 = 0 tst r3, #1 beq .L768 add r2, r0, r4, lsl #1 add r2, r2, #26752 adds r2, r2, #82 .L585: tst r3, #1 beq .L584 ldr ip, [sp, #516] movs r0, #7 bl FAULT.10318(PLT) .LVL543: b .L781 .LVL544: .L768: 2428 j = j+1; l = l-3 adds r5, r4, #1 .LVL541: mov r4, r5 b .L585 .LVL542: .L583: 2429 %REPEAT ldr r3, [r1] subs r3, r3, #3 str r3, [r1] .LDL25: 2430 l = l+1 %IF x = 32; !continue ldr r3, .L821+324 .LPIC531: add r3, pc ldr r5, [r3, #208] cmp r5, #32 2431 op('F', l) itttt eq ldreq r2, [sp, #516] moveq r3, r2 ldreq r3, [r3] addeq r3, r3, #1 it eq streq r3, [r2] .L587: mov ip, r0 ldr r6, [sp, #516] ldr r1, [r6] movs r0, #70 bl OP.10282(PLT) .LVL546: ldr r3, [r6, #64] add r4, r3, r4, lsl #1 2432 dict(j) = dict(j)!x; !show given movw r3, #26836 ldrh r2, [r4, r3] orrs r5, r5, r2 strh r5, [r4, r3] @ movhi 2433 ->atop b .L504 .LVL547: .L588: 2434 2435 c(50):bp=bp+1 %AND buff(bp)='C'; ->cop; !acomp 2436 ldr r3, .L821+328 .LPIC532: add r3, pc ldr r2, [r3] adds r1, r2, #1 str r1, [r3] 2437 c(49): bp = bp+1 ldr r3, [sp, #516] ldr r3, [r3, #64] add r3, r3, r2 add r3, r3, #104448 movs r2, #67 strb r2, [r3, #262] 2438 %IF next # 0 %START; !comparator b .L592 .L590: ldr r3, .L821+332 .LPIC534: add r3, pc ldr r2, [r3] adds r1, r2, #1 str r1, [r3] ldr r3, [sp, #608] cbnz r3, .L802 .L591: 2439 buff(bp)='"'; push(0); !double sided ldr r3, [sp, #516] ldr r3, [r3, #64] add r3, r3, r2 add r3, r3, #104448 movs r2, #34 strb r2, [r3, #262] 2440 %FINISH %ELSE %START add ip, sp, #580 movs r0, #0 bl PUSH.11367(PLT) .LVL548: b .L592 .L596: .L598: 2441 buff(bp)='?' ldr r3, [sp, #516] ldr r3, [r3, #64] add r3, r3, r2 add r3, r3, #104448 movs r2, #63 strb r2, [r3, #262] b .L592 .L802: 2442 %FINISH 2443 2444 cop: x = x!!1 %IF cnest(cp)&2 # 0; !invert the condition 2445 j = cp; l = clab ldr r4, [sp, #588] .LVL713: 2446 %WHILE cnest(j)&4 = 0 %CYCLE ldr r3, .L825+4 .LPIC536: add r3, pc ldr r0, [r3, #208] eor r0, r0, #1 str r0, [r3, #208] .LDL33: ldr r1, [sp, #584] ldr r2, [sp, #516] str r1, [r2] 2447 j = j-1; l = l-cnest(j)&1 add r3, r3, r4 ldrb r3, [r3, #168] @ zero_extendqisi2 tst r3, #1 bne .L593 ldr r2, .L825+8 .LPIC539: add r2, pc adds r2, r2, #168 add r2, r2, r4 .LVL714: .L594: ldrb r3, [r2, #-1]! @ zero_extendqisi2 .LVL715: and r3, r3, #1 cmp r3, #0 beq .L594 ldr r3, [sp, #516] str r1, [r3] .LVL716: .L593: 2448 %REPEAT subs r1, r1, r3 .LDL34: 2449 op(cc(x), l) add r3, sp, #5024 adds r3, r3, #24 add r0, r0, r3 ldr r3, [sp, #516] ldr ip, [r3, #64] ldr r1, [r3] ldrb r0, [r0, #-44] @ zero_extendqisi2 bl OP.10282(PLT) .LVL717: 2450 def lab(clab+1) %IF cnest(cp)&1 # 0 2451 cp = cp-1 add r4, sp, #580 ldr r0, [sp, #584] mov ip, r4 adds r0, r0, #1 bl DEFLAB.11211(PLT) .LVL718: .L595: ldr r3, [r4, #8] subs r3, r3, #1 str r3, [r4, #8] 2452 clab = clab-cnest(cp)&1 ldr r2, .L825+12 .LPIC540: add r2, pc add r3, r3, r2 ldrb r3, [r3, #168] @ zero_extendqisi2 and r2, r3, #1 ldr r3, [r4, #4] subs r3, r3, r2 str r3, [r4, #4] 2453 ->top b .L781 .LVL719: .L748: 2454 2455 c(78): !fresult 2456 c(79): !mresult 2457 c(80): open = 0; !return, true, false 2458 c(82): access = 0; !stop movs r3, #0 ldr r2, [sp, #516] str r3, [r2, #20] .L599: 2459 c(89): !addop movs r3, #0 ldr r2, [sp, #516] str r3, [r2, #24] .L601: 2460 c(81): bp=bp+1 %AND buff(bp)=x; ->top; !monitor 2461 ldr r2, .L821+336 .LPIC541: add r2, pc ldr r1, [r2] adds r3, r1, #1 str r3, [r2] 2462 c(65): pop lit; op('e', lit); ->atop; !signal ldr r3, [sp, #516] ldr r3, [r3, #64] add r3, r3, r1 add r3, r3, #104448 ldr r2, [r2, #208] strb r2, [r3, #262] 2463 b .L781 .L597: b .L598 .L600: b .L601 .L602: add ip, sp, #580 bl POPLIT.11311(PLT) .LVL549: 2464 c(51): bp=bp+1 %AND buff(bp)='S'; ->top; !eq ldr r3, [sp, #516] ldr ip, [r3, #64] ldr r3, .L821+340 .LPIC544: add r3, pc ldr r1, [r3, #4] movs r0, #101 bl OP.10282(PLT) .LVL550: b .L504 .L603: 2465 c(53): bp=bp+1 %AND buff(bp)='j'; ->top; !jam transfer ldr r3, .L821+344 .LPIC545: add r3, pc ldr r2, [r3] adds r1, r2, #1 str r1, [r3] 2466 c(52): bp=bp+1 %AND buff(bp)='Z'; ->top; !eqeq ldr r3, [sp, #516] ldr r3, [r3, #64] add r3, r3, r2 add r3, r3, #104448 movs r2, #83 strb r2, [r3, #262] ldr r3, .L821+348 .LPIC547: add r3, pc ldr r2, [r3] adds r1, r2, #1 str r1, [r3] 2467 b .L781 .L604: ldr r3, [sp, #516] ldr r3, [r3, #64] add r3, r3, r2 add r3, r3, #104448 movs r2, #106 strb r2, [r3, #262] ldr r3, .L821+352 .LPIC549: add r3, pc ldr r2, [r3] adds r1, r2, #1 str r1, [r3] 2468 c(74):%IF level = 0 %START; !begin b .L781 .L605: ldr r3, [sp, #516] ldr r3, [r3, #64] add r3, r3, r2 add r3, r3, #104448 movs r2, #90 strb r2, [r3, #262] 2469 %IF progmode <= 0 %THEN progmode = 1 %ELSE fault(7) b .L781 .L606: ldr r3, [sp, #516] ldr r3, [r3, #48] cbnz r3, .L609 ldr r3, .L821+356 .LPIC551: add r3, pc ldr r3, [r3, #644] cmp r3, #0 bgt .L608 2470 {Permit BEGIN after external defs} ldr r3, .L821+360 .LPIC552: add r3, pc movs r2, #1 str r2, [r3, #644] .L607: .L609: 2471 %FINISH 2472 spec mode = level+1 ldr r3, .L821+364 .LPIC553: add r3, pc ldr r0, [sp, #516] ldr r2, [r0, #48] adds r2, r2, #1 str r2, [r3, #632] 2473 block x = 0 movs r2, #0 str r2, [r3, #648] ldr ip, [sp, #516] movs r0, #7 bl FAULT.10318(PLT) .LVL551: b .L609 .L610: 2474 bp=bp+1 %AND buff(bp)='H'; %RETURN ldr r2, [r3] adds r1, r2, #1 str r1, [r3] 2475 c(77):perm = 0; lines = 0; stats = 0; !endofperm ldr r3, [r0, #64] add r3, r3, r2 add r3, r3, #104448 movs r2, #72 strb r2, [r3, #262] 2476 close input b .L466 .L608: ldr r4, .L821+368 .LVL552: .LPIC557: add r4, pc movs r3, #0 str r3, [r4, #2688] bl CLOSEINPUT(PLT) .LVL553: .LBB536: .LBB537: ldr r3, .L821+376 ldr r1, [sp, #520] ldr r3, [r1, r3] movs r2, #1 str r2, [r3] ldr r3, .L821+380 ldr r3, [r1, r3] ldr r2, .L821+384 ldr r2, [r1, r2] ldr r2, [r2, #280] str r2, [r3] ldr r0, .L821+388 .LPIC560: add r0, pc addw r0, r0, #1748 bl check_instream(PLT) .LVL554: .LBE537: .LBE536: 2477 select input(source) ldr r2, .L821+372 .LPIC558: add r2, pc str r3, [r2, #184] 2478 list = list-1 str r3, [r2, #640] ldr r3, [r4, #2832] subs r3, r3, #1 str r3, [r4, #2832] 2479 tbase = tmax; tstart = tmax ldr r2, [sp, #516] ldr r3, [r2, #52] str r3, [r2, #56] 2480 %RETURN str r3, [r2, #60] b .L466 .L822: .align 2 .L821: .word _GLOBAL_OFFSET_TABLE_-(.LPIC399+4) .word __stack_chk_guard(GOT) .word .LANCHOR3-(.LPIC401+4) .word .LANCHOR0-(.LPIC404+4) .word .LANCHOR2-(.LPIC405+4) .word .LANCHOR3-(.LPIC406+4) .word .LANCHOR0-(.LPIC407+4) .word .LANCHOR2-(.LPIC411+4) .word .LC77-(.LPIC712+4) .word .LC84-(.LPIC713+4) .word .LC77-(.LPIC716+4) .word .LC85-(.LPIC717+4) .word .LANCHOR0-(.LPIC412+4) .word .LANCHOR0-(.LPIC413+4) .word .LANCHOR0-(.LPIC415+4) .word .LANCHOR0-(.LPIC420+4) .word .LANCHOR0-(.LPIC423+4) .word .LANCHOR0-(.LPIC424+4) .word .LANCHOR0-(.LPIC425+4) .word .LANCHOR0-(.LPIC428+4) .word .LANCHOR0-(.LPIC432+4) .word .LANCHOR0-(.LPIC434+4) .word .LANCHOR2-(.LPIC433+4) .word .LANCHOR0-(.LPIC436+4) .word .LANCHOR0-(.LPIC437+4) .word .LANCHOR4-(.LPIC714+4) .word .LANCHOR3-(.LPIC715+4) .word .LANCHOR0-(.LPIC414+4) .word .LANCHOR0-(.LPIC421+4) .word .LANCHOR0-(.LPIC422+4) .word .LANCHOR0-(.LPIC426+4) .word .LANCHOR2-(.LPIC430+4) .word .LANCHOR0-(.LPIC438+4) .word .LANCHOR2-(.LPIC442+4) .word .LANCHOR0-(.LPIC441+4) .word .LANCHOR0-(.LPIC443+4) .word .LANCHOR0-(.LPIC445+4) .word .LANCHOR0-(.LPIC448+4) .word .LANCHOR0-(.LPIC452+4) .word .LANCHOR0-(.LPIC453+4) .word .LANCHOR0-(.LPIC450+4) .word .LANCHOR0-(.LPIC456+4) .word .LANCHOR0-(.LPIC459+4) .word .LANCHOR0-(.LPIC457+4) .word .LANCHOR0-(.LPIC458+4) .word .LANCHOR0-(.LPIC464+4) .word .LANCHOR0-(.LPIC466+4) .word .LANCHOR0-(.LPIC469+4) .word .LANCHOR0-(.LPIC471+4) .word .LANCHOR0-(.LPIC467+4) .word .LANCHOR0-(.LPIC468+4) .word .LANCHOR0-(.LPIC473+4) .word .LANCHOR2-(.LPIC475+4) .word .LANCHOR0-(.LPIC477+4) .word .LANCHOR0-(.LPIC482+4) .word .LANCHOR0-(.LPIC481+4) .word .LANCHOR0-(.LPIC483+4) .word .LANCHOR0-(.LPIC484+4) .word .LANCHOR2-(.LPIC486+4) .word .LANCHOR0-(.LPIC487+4) .word .LANCHOR0-(.LPIC493+4) .word .LANCHOR0-(.LPIC494+4) .word .LANCHOR0-(.LPIC496+4) .word .LANCHOR0-(.LPIC498+4) .word .LANCHOR0-(.LPIC500+4) .word .LANCHOR0-(.LPIC502+4) .word .LANCHOR0-(.LPIC506+4) .word .LANCHOR2-(.LPIC507+4) .word .LANCHOR0-(.LPIC510+4) .word .LANCHOR0-(.LPIC511+4) .word .LANCHOR0-(.LPIC513+4) .word .LANCHOR0-(.LPIC515+4) .word .LANCHOR0-(.LPIC518+4) .word .LANCHOR0-(.LPIC519+4) .word .LANCHOR0-(.LPIC521+4) .word .LANCHOR0-(.LPIC522+4) .word .LANCHOR2-(.LPIC524+4) .word .LANCHOR0-(.LPIC525+4) .word .LANCHOR0-(.LPIC526+4) .word .LANCHOR0-(.LPIC527+4) .word .LANCHOR0-(.LPIC528+4) .word .LANCHOR0-(.LPIC531+4) .word .LANCHOR0-(.LPIC532+4) .word .LANCHOR0-(.LPIC534+4) .word .LANCHOR0-(.LPIC541+4) .word .LANCHOR0-(.LPIC544+4) .word .LANCHOR0-(.LPIC545+4) .word .LANCHOR0-(.LPIC547+4) .word .LANCHOR0-(.LPIC549+4) .word .LANCHOR0-(.LPIC551+4) .word .LANCHOR0-(.LPIC552+4) .word .LANCHOR0-(.LPIC553+4) .word .LANCHOR2-(.LPIC557+4) .word .LANCHOR0-(.LPIC558+4) .word _imp_InStream(GOT) .word _imp_InFile(GOT) .word _imp_infile(GOT) .word .LANCHOR3-(.LPIC560+4) .LVL555: .L611: 2481 c(76):%IF include # 0 %AND x = 0 %START; !end of ... 2482 lines = include; sstype = 0; !include ldr r3, .L823 .LPIC563: add r3, pc ldr r3, [r3, #308] cbz r3, .L612 ldr r4, .L823+20 .LVL560: .LPIC565: add r4, pc str r3, [r4, #184] 2483 close input ldr r2, .L823+4 .LPIC564: add r2, pc ldr r2, [r2, #208] cmp r2, #0 beq .L803 .L612: movs r5, #0 str r5, [r4, #620] bl CLOSEINPUT(PLT) .LVL561: 2484 list = include list ldr r2, [r4, #652] ldr r3, .L823+24 .LPIC567: add r3, pc str r2, [r3, #2832] 2485 include level = 0 str r5, [r4, #284] 2486 include = 0; select input(source); %RETURN str r5, [r4, #308] .LVL562: .LBB541: .LBB542: ldr r3, .L823+28 ldr r1, [sp, #520] ldr r3, [r1, r3] movs r2, #1 str r2, [r3] ldr r3, .L823+32 ldr r3, [r1, r3] ldr r2, .L823+36 ldr r2, [r1, r2] ldr r2, [r2, #280] str r2, [r3] ldr r0, .L823+40 .LPIC571: add r0, pc addw r0, r0, #1748 bl check_instream(PLT) .LVL563: b .L466 .LVL564: .L614: .LBE542: .LBE541: .LBB543: .LBB540: 2487 %FINISH 2488 ss = -1; !prog/file ldr r3, .L823+8 .LPIC572: add r3, pc mov r2, #-1 str r2, [r3, #624] .L613: 2489 c(75):compile end(x); %RETURN; !%END 2490 ldr r3, .L823+12 .LPIC573: add r3, pc ldr r6, [r3, #208] .LVL556: .LBB538: .LBB539: 2491 c(85):%IF x=0 %THEN control=lit %ELSE %START; !control 2492 diag = lit&x'3FFF' %IF lit>>14&3 = 1 2493 %FINISH 2494 op('z'-x, lit) ldr r3, .L823+52 .LPIC578: add r3, pc ldr r0, [r3, #208] ldr r2, [sp, #516] ldr ip, [r2, #64] ldr r1, [r3, #4] rsb r0, r0, #122 bl OP.10282(PLT) .LVL571: b .L781 .L628: 2495 ->top 2496 c(83):list = list+x-2; ->top; !%LIST/%ENDOFLIST 2497 c(84):reals ln = x; ->top; !%REALS long/normal ldr r2, .L823+56 .LPIC580: add r2, pc ldr r3, [r2, #2832] ldr r1, .L823+60 .LPIC582: add r1, pc ldr r1, [r1, #208] add r3, r3, r1 subs r3, r3, #2 str r3, [r2, #2832] 2498 c(86):%IF include # 0 %START; !include "file" b .L781 .L629: ldr r3, .L823+64 .LPIC584: add r3, pc ldr r2, [r3, #208] ldr r3, .L823+68 .LPIC583: add r3, pc str r2, [r3, #2844] 2499 fault(7); %RETURN b .L781 .L630: ldr r3, .L823+72 .LPIC585: add r3, pc ldr r3, [r3, #308] cbz r3, .L631 ldr ip, [sp, #516] movs r0, #7 bl FAULT.10318(PLT) .LVL572: b .L466 .L631: 2500 %FINISH 2501 get next; !sconst add ip, sp, #580 bl GETNEXT.11214(PLT) .LVL573: 2502 include file = string(x-x'4000'+stbase) 2503 %begin 2504 %on 9 %start; Abandon(9); %finish ldr r3, [sp, #516] ldr r0, [r3, #64] movs r2, #63 addw r1, sp, #1164 add r0, r0, #104448 adds r0, r0, #6 bl _imp_strncpy(PLT) .LVL574: ldr r3, .L823+76 ldr r2, [sp, #520] ldr r0, [r2, r3] movs r1, #1 add r0, r0, #536 bl __sigsetjmp(PLT) .LVL575: cbnz r0, .L634 .LVL576: ldr r3, .L823+76 ldr r2, [sp, #520] ldr r3, [r2, r3] str r3, [sp, #572] mov r1, #512 mov r0, r3 bl _imp_on_event_enter(PLT) .LVL577: cbnz r0, .L635 .LVL578: .L634: 2505 open input(3, include file) ldr r3, [sp, #516] ldr ip, [r3, #64] movs r0, #9 bl ABANDON.10208(PLT) .LVL579: .L635: movs r2, #244 add r1, sp, #1432 mov r0, sp bl memcpy(PLT) .LVL580: addw r3, sp, #1420 ldm r3, {r1, r2, r3} movs r0, #3 bl OPENINPUT(PLT) .LVL581: .L636: 2506 %end 2507 include = lines; lines = 0 ldr r3, .L823+80 .LPIC586: add r3, pc ldr r2, [r3, #184] str r2, [r3, #308] 2508 include list = list; include level = level movs r2, #0 str r2, [r3, #184] ldr r2, .L823+84 .LPIC590: add r2, pc ldr r2, [r2, #2832] str r2, [r3, #652] 2509 select input(3) ldr r2, [sp, #516] ldr r2, [r2, #48] str r2, [r3, #284] .LVL582: .LBB544: .LBB545: ldr r3, .L823+28 ldr r1, [sp, #520] ldr r3, [r1, r3] movs r2, #3 str r2, [r3] ldr r3, .L823+32 ldr r3, [r1, r3] ldr r2, .L823+36 ldr r2, [r1, r2] ldr r2, [r2, #832] str r2, [r3] ldr r0, .L823+88 .LPIC592: add r0, pc addw r0, r0, #1748 bl check_instream(PLT) .LVL583: b .L781 .LVL584: .L637: .LBE545: .LBE544: 2510 ->top 2511 2512 c(154):dimension = dimension+1; !dbsep 2513 fault(11) %IF dimension = dim limit+1 ldr r2, .L823+92 .LPIC593: add r2, pc ldr r3, [r2, #196] adds r3, r3, #1 str r3, [r2, #196] cmp r3, #7 bne .L781 2514 ->top ldr ip, [sp, #516] movs r0, #11 bl FAULT.10318(PLT) .LVL585: b .L781 .L638: 2515 c(145):set bp; ->top; !crb 2516 c(146):set bp; !rcrb add ip, sp, #580 bl SETBP.11246(PLT) .LVL586: b .L781 .L639: 2517 c(142): !bplrb add ip, sp, #580 bl SETBP.11246(PLT) .LVL587: .L640: 2518 dimension = 1 %IF dimension = 0 ldr r3, .L823+96 .LPIC595: add r3, pc ldr r3, [r3, #196] cbnz r3, .L641 2519 op('d', dimension); op(',', defs) ldr r3, .L823+100 .LPIC596: add r3, pc movs r2, #1 str r2, [r3, #196] .L641: ldr r5, [sp, #516] ldr ip, [r5, #64] ldr r3, .L823+104 .LPIC597: add r3, pc ldr r1, [r3, #196] movs r0, #100 bl OP.10282(PLT) .LVL588: 2520 %IF class # 146 %START ldr ip, [r5, #64] add r4, sp, #580 .LVL589: ldr r1, [sp, #592] movs r0, #44 bl OP.10282(PLT) .LVL590: ldr r3, [r4, #20] cmp r3, #146 bne .L806 .L642: .L644: 2521 set subs(defs) add r3, sp, #580 mov ip, r3 ldr r0, [sp, #592] bl SETSUBS.11239(PLT) .LVL591: 2522 fault(13) %IF dict(dmin) >= 0 %OR inhibit # 0 %OR level=0 ldr r2, [r5, #64] ldr r3, [r5, #40] add r3, r3, #13376 adds r3, r3, #39 add r3, r2, r3, lsl #1 ldrsh r3, [r3, #4] cmp r3, #0 bge .L643 2523 %FINISH ldr r3, [r5, #4] cbnz r3, .L643 2524 dimension = 0; defs = 0 movs r3, #0 ldr r2, .L823+108 .LPIC598: add r2, pc str r3, [r2, #196] ldr r3, [r5, #48] cmp r3, #0 bne .L644 .L643: 2525 ->top str r3, [sp, #592] b .L781 .L806: 2526 c(128):id = dupid; ->top; !EDUP ldr ip, [sp, #516] movs r0, #13 bl FAULT.10318(PLT) .LVL592: b .L644 .LVL593: .L645: 2527 c(130):block x = x ldr r3, [sp, #516] mov r2, r3 ldr r3, [sp, #568] str r3, [r2, #44] 2528 op('F', 0) %IF decl&spec = 0 %AND level # 0; !jump round proc b .L781 .L646: ldr r3, .L823+112 .LPIC599: add r3, pc ldr r2, [r3, #208] str r2, [r3, #648] ldr r3, [r3, #264] tst r3, #1 bne .L649 2529 c(125):dupid = id; !%DUP ldr r3, [sp, #516] ldr r3, [r3, #48] cbnz r3, .L807 2530 %return %if Level < 0 {spec about} ldr r3, [sp, #516] ldr r3, [r3, #44] str r3, [sp, #568] .LVL594: b .L651 .LVL595: .L807: ldr r3, [sp, #516] ldr ip, [r3, #64] movs r1, #0 movs r0, #70 bl OP.10282(PLT) .LVL596: .L647: .L649: ldr r3, [sp, #516] ldr r2, [r3, #44] str r2, [sp, #568] .LVL597: ldr r3, [r3, #48] cmp r3, #0 blt .L466 .L650: .LVL598: .L651: 2531 c(90): def(x); ->top; !ident 2532 c(131): !cident add ip, sp, #580 ldr r3, .L823+116 .LPIC602: add r3, pc ldr r0, [r3, #208] bl DEF.11264(PLT) .LVL599: b .L781 .L652: 2533 %IF tag(x)_flags&(b'1111111'+const bit) = iform+const bit %START ldr r3, .L823+120 .LPIC603: add r3, pc ldr r4, [r3, #208] .LVL600: ldr r3, [sp, #516] ldr r3, [r3, #64] add r2, r3, r4, lsl #4 ldrh r2, [r2, #220] tst r2, #1 bne .L653 2534 tag(x)_format = lit add r3, r3, r4, lsl #4 ldr r2, .L823+124 .LPIC604: add r2, pc ldr r2, [r2, #4] str r2, [r3, #216] 2535 %FINISH %ELSE %START b .L781 .L653: 2536 set const(lit) %IF pending # 0 ldr r2, [sp, #596] cbz r2, .L654 2537 def(x) mov ip, r3 ldr r3, .L823+128 .LPIC605: add r3, pc ldr r0, [r3, #4] bl SETCONST.10285(PLT) .LVL601: .L654: add ip, sp, #580 mov r0, r4 bl DEF.11264(PLT) .LVL602: 2538 op('A', 1) ldr r3, [sp, #516] ldr ip, [r3, #64] movs r1, #1 movs r0, #65 bl OP.10282(PLT) .LVL603: b .L781 .LVL604: .L655: 2539 %FINISH 2540 cident = x 2541 ->top 2542 c(124):dubious = 1 %IF tag(cident)_flags&prot # 0; !%DUBIOUS 2543 ->top b .L781 .L656: .L659: .LBB546: .LBB547: 2544 c(97): !f ldr r3, .L823+132 .LPIC606: add r3, pc movs r2, #1 str r2, [r3, #636] .LDL29: 2545 c(98): !m 2546 c(99): !p 2547 c(96): call; ->top; !r 2548 2549 c(165): !nlab 2550 c(100): !rp 2551 c(101): !fp 2552 c(102): !mp 2553 c(103): !pp 2554 c(91): !v 2555 c(92): !n 2556 c(106): !a 2557 c(107): !an 2558 c(108): !na 2559 c(109): !nan 2560 k = tag(x)_index ldr r3, [sp, #516] ldr ip, [r3, #64] ldr r3, .L823+144 .LPIC610: add r3, pc ldr r3, [r3, #208] add r3, ip, r3, lsl #4 ldrsh r1, [r3, #222] .LVL609: 2561 %IF k < 0 %THEN op('n', -k) %ELSE op('@', k) cmp r1, #0 2562 ->top itte lt rsblt r1, r1, #0 .LVL610: movlt r0, #110 .L671: 2563 c(121):set const(0); ->top; !special for zero 2564 c(167):bp=bp+1; buff(bp)='G'; ->pstr; !aconst (alias) ldr r3, [sp, #516] ldr ip, [r3, #64] movs r0, #0 bl SETCONST.10285(PLT) .LVL612: b .L781 .L673: 2565 c(const): !const movge r0, #64 bl OP.10282(PLT) .LVL611: b .L781 .L666: b .L670 .L667: b .L670 .L668: b .L670 .L669: b .L670 .L672: ldr r3, .L823+148 .LPIC611: add r3, pc ldr r2, [r3] adds r1, r2, #1 str r1, [r3] 2566 %IF x < 0 %START; !constinteger ldr r3, [sp, #516] ldr r3, [r3, #64] add r3, r3, r2 add r3, r3, #104448 movs r2, #71 strb r2, [r3, #262] .L674: ldr r3, .L823+160 .LPIC613: add r3, pc ldr r3, [r3, #208] cmp r3, #0 blt .L808 .L676: 2567 set const(tag(-x)_format); ->top ldr r2, [sp, #516] ldr ip, [r2, #64] rsb r3, r3, #13 add r3, ip, r3, lsl #4 ldr r0, [r3, #8] bl SETCONST.10285(PLT) .LVL617: b .L781 .L678: 2568 %FINISH 2569 %IF x&x'4000' # 0 %START; !strings 2570 bp=bp+1 %AND buff(bp)='''' ldr r3, .L823+164 .LPIC614: add r3, pc ldr r2, [r3] adds r1, r2, #1 str r1, [r3] 2571 pstr: x = x-x'4000'+stbase ldr r3, [sp, #516] ldr r3, [r3, #64] add r3, r3, r2 add r3, r3, #104448 movs r2, #39 strb r2, [r3, #262] b .L674 .L808: 2572 k = byteinteger(x) ldr r2, .L823+152 .LPIC616: add r2, pc ldr r3, [r2, #208] sub r3, r3, #16384 ldr r1, [r2, #336] adds r0, r3, r1 str r0, [r2, #208] ldrb r6, [r3, r1] @ zero_extendqisi2 .LVL613: 2573 bp=bp+1 %AND buff(bp)=k ldr r1, [r2] adds r3, r1, #1 str r3, [r2] 2574 k = k+x ldr r7, [sp, #516] ldr r2, [r7, #64] add r2, r2, r1 add r2, r2, #104448 strb r6, [r2, #262] add r6, r6, r0 .LVL614: 2575 %CYCLE 2576 ->top %IF x = k cmp r0, r6 beq .L781 subs r5, r3, r0 add r5, r5, r6 cmp r1, r5 bne .L677 ldr r3, .L823+156 .LPIC621: add r3, pc str r6, [r3, #208] str r1, [r3] b .L781 .LVL616: .L675: 2577 x = x+1; bp=bp+1 %AND buff(bp)=byteinteger(x) 2578 %REPEAT adds r1, r3, #1 mov r3, r1 2579 %FINISH subs r0, r0, r3 .LVL615: .L677: ldrb r4, [r0, r1] @ zero_extendqisi2 ldr r2, [r7, #64] add r2, r2, r3 add r2, r2, #104448 strb r4, [r2, #262] .LDL31: 2580 %IF x&x'2000' # 0 %START; !real 2581 x = x-x'2000'+stbase 2582 k = byteinteger(x) 2583 op('D', k); bp=bp+1 %AND buff(bp)=',' 2584 k = k+x 2585 %CYCLE 2586 ->top %IF x = k 2587 x = x+1; j = byteinteger(x) 2588 %IF j = '@' %START 2589 op('@', litpool(byteinteger(x+1))); ->top 2590 %FINISH 2591 bp=bp+1 %AND buff(bp)=j 2592 %REPEAT 2593 %FINISH 2594 set const(lit pool(x)) 2595 ->top 2596 2597 c(137):bp=bp+1 %AND buff(bp)='i'; ->top; !asep 2598 c(141):bp=bp+1 %AND buff(bp)='a'; ->top; !arb ldr r3, .L823+168 .LPIC623: add r3, pc ldr r2, [r3] adds r1, r2, #1 str r1, [r3] 2599 ldr r3, [sp, #516] ldr r3, [r3, #64] add r3, r3, r2 add r3, r3, #104448 movs r2, #105 strb r2, [r3, #262] ldr r3, .L823+172 .LPIC625: add r3, pc ldr r2, [r3] adds r1, r2, #1 str r1, [r3] 2600 !own arrays b .L781 .L679: ldr r3, [sp, #516] ldr r3, [r3, #64] add r3, r3, r2 add r3, r3, #104448 movs r2, #97 strb r2, [r3, #262] 2601 b .L781 .L680: 2602 c(132):ocount = ub-lb+1 2603 def(x); !oident ldr r4, .L823+176 .LVL618: .LPIC628: add r4, pc ldr r3, [r4, #616] ldr r2, [r4, #612] subs r3, r3, r2 adds r3, r3, #1 ldr r2, .L823+180 .LPIC627: add r2, pc str r3, [r2, #2552] add r5, sp, #580 mov ip, r5 ldr r0, [r4, #208] bl DEF.11264(PLT) .LVL619: 2604 dimension = 1; set subs(1) movs r0, #1 str r0, [r4, #196] 2605 %IF next = 0 %START; !no initialisation mov ip, r5 bl SETSUBS.11239(PLT) .LVL620: ldr r3, [r5, #28] cbnz r3, .L681 2606 op('A', ocount) %IF ocount > 0 ldr r3, .L823+184 .LPIC632: add r3, pc ldr r1, [r3, #2552] cmp r1, #0 bgt .L809 .L682: 2607 ocount = -1 ldr r3, .L823+188 .LPIC633: add r3, pc mov r2, #-1 str r2, [r3, #2552] ldr r3, [sp, #516] ldr ip, [r3, #64] movs r0, #65 bl OP.10282(PLT) .LVL621: b .L682 .L681: 2608 %FINISH %ELSE %START; !initialisation given b .L781 .L809: 2609 get next add ip, sp, #580 bl GETNEXT.11214(PLT) .LVL622: b .L781 .LVL623: .L683: 2610 %FINISH 2611 ->top 2612 c(162):lit = ocount; ->ins; !indef 2613 c(143):pop lit; !orb ldr r3, .L823+192 .LPIC635: add r3, pc ldr r2, [r3, #2552] ldr r3, .L823+196 .LPIC634: add r3, pc str r2, [r3, #4] .L684: 2614 ins: fault(10) %AND lit = 0 %IF lit < 0 add ip, sp, #580 bl POPLIT.11311(PLT) .LVL630: b .L684 .L810: 2615 get next ldr r3, .L823+200 .LPIC636: add r3, pc ldr r3, [r3, #4] cmp r3, #0 blt .L810 .L686: add ip, sp, #580 bl GETNEXT.11214(PLT) .LVL624: .L687: 2616 ->inst ldr ip, [sp, #516] movs r0, #10 bl FAULT.10318(PLT) .LVL631: 2617 c(139): !osep (x=19) ldr r3, .L823+220 .LPIC637: add r3, pc movs r2, #0 str r2, [r3, #4] b .L686 .L688: .L689: 2618 c(153):lit = 1 2619 inst: pop def %IF pending # 0; !ownt (x=0) ldr r3, .L823+224 .LPIC638: add r3, pc movs r2, #1 str r2, [r3, #4] b .L687 .LVL632: .L811: 2620 op('A', lit) ldr r3, [sp, #596] cbz r3, .L690 .LBB548: .LBB549: ldr r3, .L823+208 .LPIC640: add r3, pc ldr r4, [r3, #4] ldr r3, [sp, #516] ldr ip, [r3, #64] mov r1, r4 movs r0, #65 bl OP.10282(PLT) .LVL627: 2621 ocount = ocount-lit ldr r2, .L823+212 .LPIC641: add r2, pc ldr r3, [r2, #2552] subs r3, r3, r4 str r3, [r2, #2552] 2622 %IF ocount >= 0 %START cmp r3, #0 blt .L693 2623 ->top %IF x # 0; !more coming ldr r2, .L823+216 .LPIC643: add r2, pc ldr r2, [r2, #208] cmp r2, #0 bne .L781 .L692: 2624 ocount = -1 %AND %RETURN %IF ocount = 0; !all done cbz r3, .L811 .L691: .L693: 2625 %FINISH ldr r3, .L823+228 .LPIC644: add r3, pc mov r2, #-1 str r2, [r3, #2552] 2626 fault(11); %RETURN ldr ip, [sp, #516] movs r0, #11 bl FAULT.10318(PLT) .LVL628: b .L466 .LVL629: .L685: b .L466 .LVL633: .L694: 2627 2628 c(swit):op('W', tag(x)_index); inhibit = 1; ->atop 2629 c(134):def(x); !swid ldr r4, [sp, #516] .LVL634: ldr ip, [r4, #64] ldr r3, .L823+232 .LPIC645: add r3, pc ldr r3, [r3, #208] add r3, ip, r3, lsl #4 ldrsh r1, [r3, #222] movs r0, #87 bl OP.10282(PLT) .LVL635: 2630 n = ub-lb+1 movs r3, #1 str r3, [r4, #4] ldr r4, .L823+236 .LVL637: .LPIC646: add r4, pc add ip, sp, #580 ldr r0, [r4, #208] bl DEF.11264(PLT) .LVL638: ldr r1, [r4, #616] ldr r3, [r4, #612] subs r1, r1, r3 2631 n = (n+15)>>4; !slots needed (includes zero) b .L504 .LVL636: .L695: adds r1, r1, #16 lsrs r5, r1, #4 .LVL639: 2632 j = dmax; dmax = dmax+n+2 ldr r2, .L823+240 .LPIC649: add r2, pc ldr r4, [r2, #2556] .LVL640: 2633 abandon(1) %IF dmax >= dmin adds r3, r5, r4 adds r3, r3, #2 str r3, [r2, #2556] ldr r2, [sp, #516] ldr r2, [r2, #40] cmp r3, r2 bge .L812 .L696: 2634 tag(x)_format = j ldr r6, [sp, #516] ldr r3, [r6, #64] ldr r2, .L823+244 .LPIC651: add r2, pc ldr r1, [r2, #208] add r3, r3, r1, lsl #4 str r4, [r3, #216] ldr r3, [sp, #516] ldr ip, [r3, #64] movs r0, #1 bl ABANDON.10208(PLT) .LVL645: b .L696 .LVL646: .L698: 2635 dict(j) = lb; dict(j+1) = ub ldr r3, [r6, #64] add r1, r4, #13376 adds r1, r1, #39 add r3, r3, r1, lsl #1 ldr r1, [r2, #612] strh r1, [r3, #4] @ movhi 2636 %CYCLE ldr r3, [r6, #64] add r1, r4, #13376 adds r1, r1, #40 add r3, r3, r1, lsl #1 ldr r2, [r2, #616] strh r2, [r3, #4] @ movhi .LVL641: 2637 n = n-1 2638 ->top %IF n < 0 cmp r5, #1 bmi .L781 adds r1, r4, r5 cmp r4, r1 bne .L697 b .L781 .LVL644: .L812: 2639 j = j+1; dict(j+1) = 0 adds r4, r4, #1 .LVL643: 2640 %REPEAT movw r5, #13416 .LVL642: movs r0, #0 .L697: ldr r3, [r6, #64] adds r2, r4, r5 add r3, r3, r2, lsl #1 strh r0, [r3, #4] @ movhi .LDL32: 2641 c(151):stats = stats-1; !slab 2642 fault(7) %AND %RETURN %IF x < tbase ldr r3, .L823+248 .LPIC654: add r3, pc ldr r2, [r3, #640] subs r2, r2, #1 str r2, [r3, #640] ldr r3, [r3, #208] ldr r2, [sp, #516] ldr r2, [r2, #56] cmp r3, r2 blt .L813 .L699: 2643 %IF pending # 0 %START; !explicit label ldr r2, [sp, #596] cbnz r2, .L814 .L700: ldr r2, [sp, #516] ldr r2, [r2, #64] add r2, r2, r3, lsl #4 ldr ip, [sp, #516] movs r0, #7 bl FAULT.10318(PLT) .LVL656: b .L466 .L814: 2644 def s lab(pstack(1)) add ip, sp, #580 ldr r3, .L823+256 .LPIC657: add r3, pc ldr r0, [r3, #8] bl DEFSLAB.11288(PLT) .LVL657: .L701: .L709: 2645 %FINISH %ELSE %START 2646 fault(4) %AND %RETURN %IF tag(x)_app # 0 ldr r1, [r2, #212] cbnz r1, .L815 .L702: 2647 tag(x)_app = 1 movs r1, #1 str r1, [r2, #212] ldr ip, [sp, #516] movs r0, #4 bl FAULT.10318(PLT) .LVL659: b .L466 .LVL660: .L816: .LBB553: 2648 n = tag(x)_format ldr r2, [sp, #516] ldr r2, [r2, #64] .LVL647: add r3, r2, r3, lsl #4 .LVL648: ldr r3, [r3, #216] add r3, r2, r3, lsl #1 .LBB550: 2649 %FOR j = dict(n), 1, dict(n+1) %CYCLE 2650 def s lab(j) movw r2, #26834 .LVL649: ldrsh r4, [r3, r2] .LVL650: movw r2, #26836 ldrsh r5, [r3, r2] .LVL651: .LBB551: add r7, sp, #580 mov ip, r7 mov r0, r4 bl DEFSLAB.11288(PLT) .LVL673: 2651 flush buffer %IF bp >= 128 subs r3, r5, r4 .LVL652: .LBE551: cmp r3, #0 blt .L816 .LVL653: .L703: ldr r6, .L823+252 .LPIC660: add r6, pc ldr r8, [sp, #516] b .L707 .LVL655: .L813: .LBE550: ldr r3, .L823+260 .LVL661: ldr r2, [sp, #520] ldr r3, [r2, r3] ldr r1, [r3] cbz r1, .L704 addw r0, sp, #3468 bl _imp_c2istr(PLT) .LVL662: .L705: ldr r3, .L823+264 ldr r2, [sp, #520] ldr r3, [r2, r3] ldr r6, [r3] movw r3, #2651 cmp r6, #0 it eq moveq r6, r3 ldr r1, .L823+268 .LPIC659: add r1, pc addw r7, sp, #3724 mov r0, r7 bl _imp_c2istr(PLT) .LVL663: movs r3, #0 str r3, [sp, #508] movs r3, #1 str r3, [sp, #504] movs r3, #5 str r3, [sp, #500] mov r2, #256 mov r1, r7 add r0, sp, #244 bl memcpy(PLT) .LVL664: str r6, [sp, #240] movs r2, #240 addw r1, sp, #3484 mov r0, sp bl memcpy(PLT) .LVL665: addw r3, sp, #3468 ldm r3, {r0, r1, r2, r3} bl _signal_event(PLT) .LVL666: b .L703 .LVL667: .L704: .LBB552: mov r7, #256 mov r2, r7 ldr r1, .L823+272 .LPIC658: add r1, pc addw r6, sp, #2956 mov r0, r6 bl memcpy(PLT) .LVL668: mov r2, r7 mov r1, r6 addw r6, sp, #1676 mov r0, r6 bl memcpy(PLT) .LVL669: .LBE552: mov r2, r7 mov r1, r6 addw r0, sp, #3468 bl memcpy(PLT) .LVL670: b .L705 .LVL671: .L708: ldr r3, [r6] cmp r3, #127 ble .L708 2652 %REPEAT subs r4, r4, #1 .LVL654: ldr ip, [r8, #64] bl FLUSHBUFFER.10176(PLT) .LVL674: b .L708 .LVL675: .L710: .LBE553: 2653 %FINISH 2654 inhibit = 1 cmp r5, r4 beq .L709 movs r3, #1 ldr r2, [sp, #516] str r3, [r2, #4] cmp r5, r4 beq .L709 .L707: 2655 %RETURN b .L466 .LVL658: .L815: adds r4, r4, #1 .LVL672: 2656 2657 c(140):bp=bp+1 %AND buff(bp)='p'; ->top; !psep 2658 c(144):buff(bp+1)='p'; buff(bp+2)='E'; bp=bp+2; ->top; !prb ldr r3, .L823+276 .LPIC661: add r3, pc ldr r2, [r3] adds r1, r2, #1 str r1, [r3] 2659 ldr r3, [sp, #516] ldr r3, [r3, #64] add r3, r3, r2 add r3, r3, #104448 movs r2, #112 strb r2, [r3, #262] ldr r1, .L823+280 .LPIC663: add r1, pc ldr r3, [r1] ldr r4, [sp, #516] .LVL676: ldr r2, [r4, #64] add r2, r2, r3 add r2, r2, #104448 movs r0, #112 strb r0, [r2, #262] 2660 !constant expressions b .L781 .L711: ldr r2, [r4, #64] add r2, r2, r3 add r2, r2, #104448 movs r0, #69 strb r0, [r2, #263] 2661 adds r3, r3, #2 str r3, [r1] 2662 c(155): !pconst b .L781 .LVL677: .L712: 2663 %IF x < 0 %THEN lit = tag(-x)_format %c ldr r3, .L823+284 .LPIC665: add r3, pc ldr r3, [r3, #208] cmp r3, #0 blt .L817 .L713: 2664 %ELSE lit = lit pool(x) ldr r2, [sp, #516] ldr r2, [r2, #64] rsb r3, r3, #13 add r3, r2, r3, lsl #4 ldr r2, [r3, #8] ldr r3, .L823+296 .LPIC666: add r3, pc str r2, [r3, #4] 2665 pending = pending+1; pstack(pending) = lit; ->top ldr r3, [sp, #596] adds r1, r3, #1 str r1, [sp, #596] b .L714 .L715: 2666 c(156):lit = pstack(pending); lit = -lit %IF lit < 0 ldr r2, .L823+292 .LPIC668: add r2, pc add r3, r2, r3, lsl #2 ldr r2, [r2, #4] str r2, [r3, #8] 2667 pstack(pending) = lit; ->top; !cmod ldr r2, [sp, #516] ldr r2, [r2, #64] ldr r2, [r2, r3, lsl #2] ldr r3, .L823+288 .LPIC667: add r3, pc str r2, [r3, #4] .L714: b .L781 .L817: ldr r3, [sp, #596] subs r3, r3, #1 ldr r1, .L823+300 .LPIC670: add r1, pc add r2, r1, r3, lsl #2 ldr r2, [r2, #8] str r2, [r1, #4] ldr r2, .L823+304 .LPIC673: add r2, pc add r3, r2, r3, lsl #2 ldr r2, [r2, #4] str r2, [r3, #8] 2668 c(157):lit = -pstack(pending); pstack(pending) = lit; ->top; !csign cmp r2, #0 blt .L818 .L716: b .L781 .L818: 2669 c(158):lit = \pstack(pending); pstack(pending) = lit; ->top; !cuop negs r2, r2 ldr r1, .L823+308 .LPIC672: add r1, pc str r2, [r1, #4] b .L716 .L717: ldr r3, [sp, #596] subs r3, r3, #1 ldr r1, .L823+312 .LPIC675: add r1, pc add r3, r1, r3, lsl #2 ldr r2, [r3, #8] negs r2, r2 str r2, [r1, #4] 2670 c(159): !cop1 str r2, [r3, #8] ldr r3, [sp, #596] subs r3, r3, #1 ldr r1, .L823+316 .LPIC678: add r1, pc add r3, r1, r3, lsl #2 ldr r2, [r3, #8] mvns r2, r2 str r2, [r1, #4] 2671 c(160): !cop2 b .L781 .L718: str r2, [r3, #8] 2672 c(161):pending = pending-1; !cop3 b .L781 .L719: .L721: 2673 lit2 = pstack(pending+1); lit = pstack(pending) ldr r1, [sp, #596] subs r2, r1, #1 str r2, [sp, #596] ldr r3, .L823+320 .LPIC681: add r3, pc add r2, r3, r2, lsl #2 ldr r2, [r2, #8] str r2, [sp, #552] .LVL678: 2674 ->litop(x>>2) ldr r2, [r3, r1, lsl #2] .LVL679: str r2, [r3, #4] .LVL680: ldr r3, [r3, #208] lsrs r3, r3, #2 str r3, [sp, #556] .LVL681: ldr r3, .L823+324 .LVL682: .LPIC400: add r3, pc str r3, [sp, #564] movw r3, #2674 str r3, [sp, #560] .LVL683: .L722: 2675 litop(10):lit = lit*lit2; ->setl 2676 litop(12): ldr r2, .L823+336 .LPIC685: add r2, pc ldr r3, [r2, #4] ldr r1, [sp, #552] mul r3, r1, r3 str r3, [r2, #4] 2677 litop(3):n = 1; !lit = lit\\lit2 b .L740 .L725: .L726: .LVL687: 2678 fault(10) %IF lit2 < 0 ldr r3, [sp, #552] cmp r3, #0 blt .L819 .L727: .LVL688: 2679 %WHILE lit2 > 0 %CYCLE ldr ip, [sp, #516] movs r0, #10 bl FAULT.10318(PLT) .LVL695: b .L727 .LVL696: .L730: 2680 lit2 = lit2-1 ldr r1, [sp, #552] cmp r1, #0 it le movle r3, #1 ble .L728 subs r1, r1, #1 .LVL691: bne .L729 str r1, [sp, #552] .LVL692: .L728: 2681 n = n*lit ldr r3, .L823+340 .LPIC687: add r3, pc ldr r2, [r3, #4] movs r3, #1 .LVL689: .L729: mul r3, r2, r3 .LVL690: 2682 %REPEAT 2683 lit = n; ->setl ldr r2, .L823+344 .LPIC688: add r2, pc str r3, [r2, #4] .L724: .LVL693: .L740: 2684 litop(1):lit = lit<setl 2685 litop(2):lit = lit>>lit2; ->setl ldr r2, .L823+352 .LPIC689: add r2, pc ldr r3, [r2, #4] ldr r1, [sp, #552] lsls r3, r3, r1 str r3, [r2, #4] 2686 litop(5):lit = lit&lit2; ->setl b .L740 .L731: ldr r2, .L823+356 .LPIC691: add r2, pc ldr r3, [r2, #4] ldr r1, [sp, #552] lsrs r3, r3, r1 str r3, [r2, #4] 2687 litop(11): b .L740 .L732: ldr r2, .L823+360 .LPIC693: add r2, pc ldr r3, [r2, #4] ldr r1, [sp, #552] ands r3, r3, r1 str r3, [r2, #4] 2688 litop(4):%IF lit2 = 0 %THEN fault(10) %ELSE lit = lit//lit2 b .L740 .L733: .L734: 2689 ->setl ldr r3, [sp, #552] cbz r3, .L820 .L735: 2690 litop(8):lit = lit+lit2; ->setl ldr ip, [sp, #516] movs r0, #10 bl FAULT.10318(PLT) .LVL700: b .L740 .L736: 2691 litop(9):lit = lit-lit2; ->setl ldr r2, .L823+368 .LPIC697: add r2, pc ldr r3, [r2, #4] ldr r1, [sp, #552] add r3, r3, r1 str r3, [r2, #4] 2692 litop(6):lit = lit!lit2; ->setl b .L740 .L737: ldr r2, .L823+372 .LPIC699: add r2, pc ldr r3, [r2, #4] ldr r1, [sp, #552] subs r3, r3, r1 str r3, [r2, #4] 2693 litop(7):lit = lit!!lit2 ldr r4, .L823+364 .LVL697: .LPIC695: add r4, pc ldr r1, [sp, #552] ldr r0, [r4, #4] bl __aeabi_idiv(PLT) .LVL698: str r0, [r4, #4] b .L740 .LVL699: .L820: b .L740 .L738: ldr r2, .L823+376 .LPIC701: add r2, pc ldr r3, [r2, #4] ldr r1, [sp, #552] orrs r3, r3, r1 str r3, [r2, #4] 2694 b .L740 .L739: ldr r2, .L823+380 .LPIC703: add r2, pc ldr r3, [r2, #4] ldr r1, [sp, #552] eors r3, r3, r1 str r3, [r2, #4] b .L740 .L741: 2695 setl: pstack(pending) = lit; ->top 2696 ldr r3, .L823+348 .LPIC705: add r3, pc ldr r2, [sp, #596] add r2, r3, r2, lsl #2 ldr r3, [r3, #4] str r3, [r2, #4] 2697 c(170):Fault(4) %if IMPCOM_Option # "" b .L781 .LVL694: .L819: 2698 IMPCOM_Option = String(x-x'4000'+Stbase); !Option string 2699 ->Top 2700 ldr r3, .L823+384 ldr r2, [sp, #520] ldr r0, [r2, r3] addw r1, sp, #1932 add r0, r0, #280 bl _imp_strcmp(PLT) .LVL701: cbz r0, .L742 ldr r3, .L823+384 ldr r2, [sp, #520] ldr r0, [r2, r3] movs r2, #255 addw r1, sp, #2188 add r0, r0, #280 bl _imp_strncpy(PLT) .LVL703: b .L781 .L743: .LVL704: 2701 !string resolution 2702 2703 c(135):resln = 2; ->top; !dotl ldr ip, [sp, #516] movs r0, #4 bl FAULT.10318(PLT) .LVL702: .L742: 2704 c(136):resln = resln+1; ->top; !dotr movs r3, #2 str r3, [sp, #540] 2705 c(55): op('r', resln); resln = 0; ->top; !resop b .L781 .LVL705: .L744: ldr r3, [sp, #540] adds r3, r3, #1 str r3, [sp, #540] .LVL706: 2706 c(164):op('r', resln+4); resln = 0; !cresop b .L781 .LVL707: .L745: ldr r3, [sp, #516] ldr ip, [r3, #64] ldr r1, [sp, #540] movs r0, #114 bl OP.10282(PLT) .LVL708: 2707 c(122):x = 6; ->cop; !%PRED movs r3, #0 str r3, [sp, #540] .LVL709: b .L781 .L824: .align 2 .L823: .word .LANCHOR0-(.LPIC563+4) .word .LANCHOR0-(.LPIC564+4) .word .LANCHOR0-(.LPIC572+4) .word .LANCHOR0-(.LPIC573+4) .word .LANCHOR0-(.LPIC574+4) .word .LANCHOR0-(.LPIC565+4) .word .LANCHOR2-(.LPIC567+4) .word _imp_InStream(GOT) .word _imp_InFile(GOT) .word _imp_infile(GOT) .word .LANCHOR3-(.LPIC571+4) .word .LANCHOR0-(.LPIC576+4) .word .LANCHOR0-(.LPIC577+4) .word .LANCHOR0-(.LPIC578+4) .word .LANCHOR2-(.LPIC580+4) .word .LANCHOR0-(.LPIC582+4) .word .LANCHOR0-(.LPIC584+4) .word .LANCHOR2-(.LPIC583+4) .word .LANCHOR0-(.LPIC585+4) .word _imp_event(GOT) .word .LANCHOR0-(.LPIC586+4) .word .LANCHOR2-(.LPIC590+4) .word .LANCHOR3-(.LPIC592+4) .word .LANCHOR0-(.LPIC593+4) .word .LANCHOR0-(.LPIC595+4) .word .LANCHOR0-(.LPIC596+4) .word .LANCHOR0-(.LPIC597+4) .word .LANCHOR0-(.LPIC598+4) .word .LANCHOR0-(.LPIC599+4) .word .LANCHOR0-(.LPIC602+4) .word .LANCHOR0-(.LPIC603+4) .word .LANCHOR0-(.LPIC604+4) .word .LANCHOR0-(.LPIC605+4) .word .LANCHOR0-(.LPIC606+4) .word .LANCHOR0-(.LPIC607+4) .word .LANCHOR0-(.LPIC608+4) .word .LANCHOR0-(.LPIC610+4) .word .LANCHOR0-(.LPIC611+4) .word .LANCHOR0-(.LPIC616+4) .word .LANCHOR0-(.LPIC621+4) .word .LANCHOR0-(.LPIC613+4) .word .LANCHOR0-(.LPIC614+4) .word .LANCHOR0-(.LPIC623+4) .word .LANCHOR0-(.LPIC625+4) .word .LANCHOR0-(.LPIC628+4) .word .LANCHOR2-(.LPIC627+4) .word .LANCHOR2-(.LPIC632+4) .word .LANCHOR2-(.LPIC633+4) .word .LANCHOR2-(.LPIC635+4) .word .LANCHOR0-(.LPIC634+4) .word .LANCHOR0-(.LPIC636+4) .word .LANCHOR0-(.LPIC639+4) .word .LANCHOR0-(.LPIC640+4) .word .LANCHOR2-(.LPIC641+4) .word .LANCHOR0-(.LPIC643+4) .word .LANCHOR0-(.LPIC637+4) .word .LANCHOR0-(.LPIC638+4) .word .LANCHOR2-(.LPIC644+4) .word .LANCHOR0-(.LPIC645+4) .word .LANCHOR0-(.LPIC646+4) .word .LANCHOR2-(.LPIC649+4) .word .LANCHOR0-(.LPIC651+4) .word .LANCHOR0-(.LPIC654+4) .word .LANCHOR0-(.LPIC660+4) .word .LANCHOR0-(.LPIC657+4) .word _imp_current_file(GOT) .word _imp_current_line(GOT) .word .LC83-(.LPIC659+4) .word .LANCHOR3-(.LPIC658+4) .word .LANCHOR0-(.LPIC661+4) .word .LANCHOR0-(.LPIC663+4) .word .LANCHOR0-(.LPIC665+4) .word .LANCHOR0-(.LPIC667+4) .word .LANCHOR0-(.LPIC668+4) .word .LANCHOR0-(.LPIC666+4) .word .LANCHOR0-(.LPIC670+4) .word .LANCHOR0-(.LPIC673+4) .word .LANCHOR0-(.LPIC672+4) .word .LANCHOR0-(.LPIC675+4) .word .LANCHOR0-(.LPIC678+4) .word .LANCHOR0-(.LPIC681+4) .word .LC77-(.LPIC400+4) .word .LC86-(.LPIC719+4) .word .LANCHOR4-(.LPIC720+4) .word .LANCHOR0-(.LPIC685+4) .word .LANCHOR0-(.LPIC687+4) .word .LANCHOR0-(.LPIC688+4) .word .LANCHOR0-(.LPIC705+4) .word .LANCHOR0-(.LPIC689+4) .word .LANCHOR0-(.LPIC691+4) .word .LANCHOR0-(.LPIC693+4) .word .LANCHOR0-(.LPIC695+4) .word .LANCHOR0-(.LPIC697+4) .word .LANCHOR0-(.LPIC699+4) .word .LANCHOR0-(.LPIC701+4) .word .LANCHOR0-(.LPIC703+4) .word IMPCOM(GOT) .LVL710: .L746: ldr r3, [sp, #516] ldr ip, [r3, #64] ldr r1, [sp, #540] adds r1, r1, #4 movs r0, #114 bl OP.10282(PLT) .LVL711: 2708 c(87): set const(pstack(1)); !mass movs r3, #0 str r3, [sp, #540] .LVL712: .L747: ldr r3, .L825 .LPIC707: add r3, pc movs r2, #6 str r2, [r3, #208] .L589: .L592: 2709 bp=bp+1 %AND buff(bp)='P'; ->top ldr r4, .L825+16 .LVL720: .LPIC708: add r4, pc ldr r5, [sp, #516] ldr ip, [r5, #64] ldr r0, [r4, #8] bl SETCONST.10285(PLT) .LVL721: ldr r2, [r4] adds r3, r2, #1 str r3, [r4] 2710 %END ldr r3, [r5, #64] add r3, r3, r2 add r3, r3, #104448 movs r2, #80 strb r2, [r3, #262] .L480: 2711 b .L781 .LVL722: .L483: 2712 %END; !of compile block ldr r3, .L821+32 .LPIC712: add r3, pc str r3, [sp, #528] ldr r3, .L821+36 .LPIC713: add r3, pc str r3, [sp, #532] cmp r4, #180 bhi .L483 .L484: ldr r3, .L825+20 ldr r2, [sp, #520] ldr r3, [r2, r3] ldr r1, [r3] cbz r1, .L749 addw r0, sp, #3980 bl _imp_c2istr(PLT) .LVL723: .L750: ldr r3, .L825+24 ldr r2, [sp, #520] ldr r3, [r2, r3] ldr r3, [r3] movw r2, #2712 cmp r3, #0 it eq moveq r3, r2 movw r2, #2225 str r2, [sp, #268] ldr r2, [sp, #528] str r2, [sp, #264] str r4, [sp, #260] ldr r2, [sp, #532] str r2, [sp, #256] str r4, [sp, #252] movs r2, #3 str r2, [sp, #248] movs r2, #6 str r2, [sp, #244] str r3, [sp, #240] movs r2, #240 addw r1, sp, #3996 mov r0, sp bl memcpy(PLT) .LVL724: addw r3, sp, #3980 ldm r3, {r0, r1, r2, r3} bl _signal_eventf(PLT) .LVL725: b .L484 .L749: .LBB554: mov r6, #256 mov r2, r6 ldr r1, .L825+28 .LPIC711: add r1, pc addw r5, sp, #2956 mov r0, r5 bl memcpy(PLT) .LVL726: mov r2, r6 mov r1, r5 addw r5, sp, #2444 mov r0, r5 bl memcpy(PLT) .LVL727: .LBE554: mov r2, r6 mov r1, r5 addw r0, sp, #3980 bl memcpy(PLT) .LVL728: b .L750 .LVL729: .L753: 2713 ldr r3, .L821+100 .LPIC714: add r3, pc add r3, r3, r4, lsl #2 ldr r3, [r3, #152] .LBB533: ldr r5, .L821+104 .LPIC715: add r5, pc .LVL469: .L752: orr r3, r3, #1 bx r3 .LVL470: .L789: .LBE533: ldr r3, .L983+4 ldr r3, [r10, r3] ldr r2, [sp, #1884] ldr r3, [r3] cmp r2, r3 bne .L982 addw sp, sp, #1892 @ sp needed pop {r4, r5, r6, r7, r8, r9, r10, fp, pc} .L981: bl __stack_chk_fail(PLT) .LVL985: .L984: .align 2 .L983: .word _GLOBAL_OFFSET_TABLE_-(.LPIC900+4) .word __stack_chk_guard(GOT) .word .LANCHOR2-(.LPIC901+4) .word .LANCHOR0-(.LPIC902+4) .word .LANCHOR2-(.LPIC903+4) .word .LANCHOR0-(.LPIC915+4) .word .LANCHOR0-(.LPIC916+4) .word .LANCHOR0-(.LPIC917+4) .word .LANCHOR0-(.LPIC904+4) .word .LANCHOR5-(.LPIC905+4) .word .LANCHOR5-(.LPIC906+4) .word .LANCHOR0-(.LPIC907+4) .word .LANCHOR0-(.LPIC908+4) .word .LANCHOR0-(.LPIC910+4) .word .LANCHOR5-(.LPIC911+4) .word .LANCHOR0-(.LPIC909+4) .word .LANCHOR1-(.LPIC912+4) .word .LANCHOR2-(.LPIC913+4) .word .LANCHOR0-(.LPIC914+4) .word .LANCHOR0-(.LPIC918+4) .word .LANCHOR0-(.LPIC919+4) .word .LANCHOR2-(.LPIC922+4) .word .LANCHOR0-(.LPIC923+4) .word .LANCHOR5-(.LPIC924+4) .LFE191: .align 1 .global main .thumb .thumb_func main: .LFB185: 2714 %ON 9 %START ldr r3, .L996+44 ldr r1, [sp, #248] ldr r0, [r1, r3] movs r1, #1 add r0, r0, #536 bl __sigsetjmp(PLT) .LVL991: cmp r0, #0 bne .L987 .LVL992: ldr r3, .L996+44 ldr r1, [sp, #248] ldr r3, [r1, r3] str r3, [sp, #252] mov r1, #512 mov r0, r3 bl _imp_on_event_enter(PLT) .LVL993: cmp r0, #0 beq .L987 .LVL994: .L988: 2715 abandon(5) ldr r3, .L821+40 .LPIC716: add r3, pc str r3, [sp, #544] ldr r3, .L821+44 .LPIC717: add r3, pc str r3, [sp, #548] .LVL457: .L781: ldr r3, .L825+20 ldr r2, [sp, #520] ldr r3, [r2, r3] ldr r1, [r3] cbz r1, .L754 add r0, sp, #4224 adds r0, r0, #12 bl _imp_c2istr(PLT) .LVL730: .L755: ldr r3, .L825+24 ldr r2, [sp, #520] ldr r3, [r2, r3] ldr r3, [r3] movw r2, #2715 cmp r3, #0 it eq moveq r3, r2 movw r2, #2225 str r2, [sp, #268] ldr r2, [sp, #544] str r2, [sp, #264] str r4, [sp, #260] ldr r2, [sp, #548] str r2, [sp, #256] str r4, [sp, #252] movs r2, #2 str r2, [sp, #248] movs r2, #8 str r2, [sp, #244] str r3, [sp, #240] movs r2, #240 add r1, sp, #4224 adds r1, r1, #28 mov r0, sp bl memcpy(PLT) .LVL731: add r3, sp, #4224 adds r3, r3, #12 ldm r3, {r0, r1, r2, r3} bl _signal_eventf(PLT) .LVL732: b .L722 .L754: .LBB555: mov r7, #256 mov r2, r7 mov r1, r5 addw r6, sp, #2956 mov r0, r6 bl memcpy(PLT) .LVL733: mov r2, r7 mov r1, r6 addw r6, sp, #2700 mov r0, r6 bl memcpy(PLT) .LVL734: .LBE555: mov r2, r7 mov r1, r6 add r0, sp, #4224 adds r0, r0, #12 bl memcpy(PLT) .LVL735: b .L755 .L758: .LBB556: add ip, sp, #2048 movs r0, #5 bl ABANDON.10208(PLT) .LVL1021: b .L988 .L997: .align 2 .L996: .word .LC243-(.LPIC1080+4) .word .LC247-(.LPIC1084+4) .word .LC261-(.LPIC1098+4) .word .LANCHOR5-(.LPIC1101+4) .word .LC269-(.LPIC1106+4) .word .LC297-(.LPIC1134+4) .word .LANCHOR5-(.LPIC1144+4) .word .LC309-(.LPIC1146+4) .word .LC314-(.LPIC1151+4) .word .LC316-(.LPIC1153+4) .word .LC318-(.LPIC1155+4) .word _imp_event(GOT) .word IMPCOM(GOT) .word .LANCHOR2-(.LPIC1161+4) .word .LANCHOR5-(.LPIC1162+4) .word .LANCHOR6-(.LPIC1163+4) .word _imp_InStream(GOT) .word _imp_InFile(GOT) .word _imp_infile(GOT) .word .LANCHOR3-(.LPIC1164+4) .word _imp_OutStream(GOT) .word _imp_OutFile(GOT) .word _imp_outfile(GOT) .word .LANCHOR0-(.LPIC1166+4) .word .LANCHOR6-(.LPIC1167+4) .LFE185: .comm IMPCOM,536,4 .section .rodata .align 2 .set .LANCHOR3,. + 0 .set .LANCHOR5,. + 4344 .set .LANCHOR6,. + 8688 .LC16: .byte 29 .ascii "test-new/pass1v84-noprims.imp\000" .space 225 __PRETTY_FUNCTION__.9629: .ascii "_imp_SELECTOUTPUT\000" .space 2 .LC26: .byte 7 .ascii "lookup:\000" .space 247 .LC27: .byte 0 .byte 0 .byte 0 .byte 0 .byte 0 .byte 0 .byte 0 .byte 0 .byte 0 .byte 0 .byte 10 .byte 0 .byte 3 .byte 0 .byte 0 .byte 0 .byte 0 .byte 0 .byte 0 .byte 0 .byte 0 .byte 0 .byte 0 .byte 0 .byte 0 .byte 0 .byte 0 .byte 0 .byte 0 .byte 0 .byte 0 .byte 0 .byte 0 .byte 33 .byte 34 .byte 35 .byte 36 .byte 1 .byte 38 .byte 39 .byte 40 .byte 41 .byte 42 .byte 43 .byte 44 .byte 45 .byte 46 .byte 47 .byte 48 .byte 49 .byte 50 .byte 51 .byte 52 .byte 53 .byte 54 .byte 55 .byte 56 .byte 57 .byte 58 .byte 59 .byte 60 .byte 61 .byte 62 .byte 63 .byte 64 .byte 65 .byte 66 .byte 67 .byte 68 .byte 69 .byte 70 .byte 71 .byte 72 .byte 73 .byte 74 .byte 75 .byte 76 .byte 77 .byte 78 .byte 79 .byte 80 .byte 81 .byte 82 .byte 83 .byte 84 .byte 85 .byte 86 .byte 87 .byte 88 .byte 89 .byte 90 .byte 91 .byte 92 .byte 93 .byte 94 .byte 95 .byte 96 .byte 65 .byte 66 .byte 67 .byte 68 .byte 69 .byte 70 .byte 71 .byte 72 .byte 73 .byte 74 .byte 75 .byte 76 .byte 77 .byte 78 .byte 79 .byte 80 .byte 81 .byte 82 .byte 83 .byte 84 .byte 85 .byte 86 .byte 87 .byte 88 .byte 89 .byte 90 .byte 2 .byte 124 .byte 125 .byte 126 .byte 0 .LC28: .byte 2 .ascii " &\000" .space 252 .LC31: .byte 8 .ascii " ! \000" .space 246 .LC32: .byte 5 .ascii "fault\000" .space 249 .LC11: .byte 91 .byte 93 .byte 88 .byte 47 .byte 38 .byte 33 .byte 37 .byte 43 .byte 45 .byte 42 .byte 81 .byte 120 .byte 46 .byte 118 .space 2 .LC13: .byte 1 .byte 0 .byte 1 .byte 1 .byte 1 .byte 1 .byte 1 .byte 1 .byte 0 .byte 1 .byte 1 .byte 0 .byte 1 .byte 1 .byte 1 .byte 1 .LC14: .short 1 .short 2 .short 4107 .short 4109 .short 5132 .short 5134 .short 3 .short 4 .short 4103 .short 4104 .short 4105 .short 4106 .short 6 .short 0 .short 0 .short 0 .LC15: .byte 4 .ascii "ss =\000" .space 250 __PRETTY_FUNCTION__.9625: .ascii "_imp_SELECTINPUT\000" .space 3 .LC29: .byte 2 .ascii " [\000" .space 252 .LC17: .byte 7 .ascii "Atom1 =\000" .space 247 .LC18: .byte 9 .ascii " Atom2 =\000" .space 245 .LC19: .byte 11 .ascii " subatom =\000" .space 243 .LC20: .byte 6 .ascii "Type =\000" .space 248 .LC21: .byte 10 .ascii " Ptype =\000" .space 244 .LC22: .byte 5 .ascii "App =\000" .space 249 .LC23: .byte 9 .ascii " Papp =\000" .space 245 .LC24: .byte 8 .ascii "Format =\000" .space 246 .LC25: .byte 12 .ascii " Pformat =\000" .space 242 .LC8: .byte 5 .ascii "Begin\000" .space 249 .LC9: .byte 10 .ascii "Procedure \000" .space 244 .LC30: .word 89 .word 1764 .word 247 .word 89 .word 89 .word 89 .word 89 .word -100 .word -101 .word -102 .word -103 .word 89 .word 214 .word 89 .word 229 .word 89 .LC10: .byte 3 .ascii "End\000" .space 251 .LC0: .byte 89 .byte 91 .byte 92 .byte 104 .byte 94 .byte 93 .byte 105 .byte 100 .byte 101 .byte 102 .byte 103 .byte 106 .byte 107 .byte 108 .byte 109 .byte 89 .LC1: .byte 89 .byte 1 .byte 1 .byte 10 .byte 9 .byte 1 .byte 10 .byte 7 .byte 7 .byte 7 .byte 7 .byte 4 .byte 1 .byte 4 .byte 1 .byte 89 .LC91: .ascii "Z\000" .space 6 .LC92: .ascii "VDEC\000" .space 3 .LC94: .ascii "EXTVSPEC\000" .space 3 .LC95: .ascii "ADEC\000" .space 3 .LC97: .ascii "EXTASPEC\000" .space 3 .LC98: .ascii "PROC\000" .space 3 .LC99: .ascii "PROCSPEC\000" .space 3 .LC101: .ascii "SWDEC\000" .space 2 .LC102: .ascii "LDEC\000" .space 3 .LC103: .ascii "FORMSPEC\000" .space 3 .LC104: .ascii "OPTION\000" .space 1 .LC105: .ascii "COMMA\000" .space 2 .LC106: .ascii "T\000" .space 6 .LC107: .ascii "COLON\000" .space 2 .LC109: .ascii "LB\000" .space 5 .LC110: .ascii "ALIAS\000" .space 2 .LC111: .ascii "RB\000" .space 5 .LC112: .ascii "SUB\000" .space 4 .LC113: .ascii "ARRAYD\000" .space 1 .LC114: .ascii "STYPE\000" .space 2 .LC115: .ascii "ARRAY\000" .space 2 .LC116: .ascii "NAME\000" .space 3 .LC117: .ascii "PROCD\000" .space 2 .LC118: .ascii "FNMAP\000" .space 2 .LC119: .ascii "SWITCH\000" .space 1 .LC120: .ascii "OWN\000" .space 4 .LC121: .ascii "EXTERNAL\000" .space 3 .LC122: .ascii "STRING\000" .space 1 .LC123: .ascii "RECORD\000" .space 1 .LC124: .ascii "FORMAT\000" .space 1 .LC125: .ascii "SPEC\000" .space 3 .LC126: .ascii "MCODE\000" .space 2 .LC127: .ascii "LABEL\000" .space 2 .LC128: .ascii "OP1\000" .space 4 .LC129: .ascii "OP2\000" .space 4 .LC130: .ascii "OP3\000" .space 4 .LC131: .ascii "SIGN\000" .space 3 .LC132: .ascii "UOP\000" .space 4 .LC133: .ascii "MOD\000" .space 4 .LC134: .ascii "DOT\000" .space 4 .LC135: .ascii "COMP\000" .space 3 .LC136: .ascii "ACOMP\000" .space 2 .LC137: .ascii "EQ\000" .space 5 .LC138: .ascii "EQEQ\000" .space 3 .LC139: .ascii "JAM\000" .space 4 .LC140: .ascii "JUMP\000" .space 3 .LC141: .ascii "RESOP\000" .space 2 .LC142: .ascii "AND\000" .space 4 .LC143: .ascii "OR\000" .space 5 .LC144: .ascii "NOT\000" .space 4 .LC145: .ascii "WHILE\000" .space 2 .LC146: .ascii "UNTIL\000" .space 2 .LC147: .ascii "FOR\000" .space 4 .LC148: .ascii "CWORD\000" .space 2 .LC149: .ascii "EXIT\000" .space 3 .LC150: .ascii "ON\000" .space 5 .LC151: .ascii "SIGNAL\000" .space 1 .LC152: .ascii "THEN\000" .space 3 .LC153: .ascii "START\000" .space 2 .LC154: .ascii "ELSE\000" .space 3 .LC155: .ascii "FINISH\000" .space 1 .LC156: .ascii "FELSE\000" .space 2 .LC157: .ascii "CYCLE\000" .space 2 .LC158: .ascii "REPEAT\000" .space 1 .LC160: .ascii "BEGIN\000" .space 2 .LC161: .ascii "END\000" .space 4 .LC166: .ascii "BACK\000" .space 3 .LC168: .ascii "STOP\000" .space 3 .LC169: .ascii "LIST\000" .space 3 .LC173: .ascii "MASS\000" .space 3 .LC174: .ascii "RTYPE\000" .space 2 .LC175: .ascii "ADDOP\000" .space 2 .LC176: .ascii "IDENT\000" .space 2 .LC177: .ascii "V\000" .space 6 .LC178: .ascii "N\000" .space 6 .LC179: .ascii "CONST\000" .space 2 .LC180: .ascii "FM\000" .space 5 .LC181: .ascii "R\000" .space 6 .LC182: .ascii "F\000" .space 6 .LC183: .ascii "M\000" .space 6 .LC184: .ascii "P\000" .space 6 .LC185: .ascii "RP\000" .space 5 .LC186: .ascii "FP\000" .space 5 .LC187: .ascii "MP\000" .space 5 .LC188: .ascii "PP\000" .space 5 .LC189: .ascii "L\000" .space 6 .LC190: .ascii "S\000" .space 6 .LC191: .ascii "A\000" .space 6 .LC192: .ascii "AN\000" .space 5 .LC193: .ascii "NA\000" .space 5 .LC194: .ascii "NAN\000" .space 4 .LC196: .ascii "%CLEAR\000" .space 1 .LC197: .ascii "%PRED\000" .space 2 .LC198: .ascii "%DUBIOUS\000" .space 3 .LC199: .ascii "%DUP\000" .space 3 .LC200: .ascii "%PIN\000" .space 3 .LC201: .ascii "%POUT\000" .space 2 .LC202: .ascii "%EDUP\000" .space 2 .LC203: .ascii "PIDENT\000" .space 1 .LC204: .ascii "CIDENT\000" .space 1 .LC205: .ascii "OIDENT\000" .space 1 .LC206: .ascii "FNAME\000" .space 2 .LC207: .ascii "SWID\000" .space 3 .LC208: .ascii "DOTL\000" .space 3 .LC209: .ascii "DOTR\000" .space 3 .LC210: .ascii "ASEP\000" .space 3 .LC211: .ascii "CSEP\000" .space 3 .LC212: .ascii "OSEP\000" .space 3 .LC213: .ascii "PSEP\000" .space 3 .LC214: .ascii "ARB\000" .space 4 .LC215: .ascii "BPLRB\000" .space 2 .LC216: .ascii "ORB\000" .space 4 .LC217: .ascii "PRB\000" .space 4 .LC218: .ascii "CRB\000" .space 4 .LC219: .ascii "RCRB\000" .space 3 .LC220: .ascii "RECRB\000" .space 2 .LC221: .ascii "RECLB\000" .space 2 .LC222: .ascii "LAB\000" .space 4 .LC223: .ascii "MLAB\000" .space 3 .LC224: .ascii "SLAB\000" .space 3 .LC225: .ascii "XNAME\000" .space 2 .LC226: .ascii "OWNT\000" .space 3 .LC227: .ascii "DBSEP\000" .space 2 .LC228: .ascii "PCONST\000" .space 1 .LC229: .ascii "CMOD\000" .space 3 .LC230: .ascii "CSIGN\000" .space 2 .LC231: .ascii "CUOP\000" .space 3 .LC232: .ascii "COP1\000" .space 3 .LC233: .ascii "COP2\000" .space 3 .LC234: .ascii "COP3\000" .space 3 .LC235: .ascii "INDEF\000" .space 2 .LC236: .ascii "XELSE\000" .space 2 .LC237: .ascii "CRESOP\000" .space 1 .LC238: .ascii "NLAB\000" .space 3 .LC239: .ascii "RUNTIL\000" .space 1 .LC240: .ascii "ACONST\000" .space 1 .LC241: .ascii "ORRB\000" .space 3 .LC242: .ascii "FMANY\000" .space 2 .LC244: .ascii "FMLB\000" .space 3 .LC245: .ascii "FMRB\000" .space 3 .LC246: .ascii "FMOR\000" .space 3 .LC248: .ascii "FSID\000" .space 3 .LC249: .ascii "%DUMMY\000" .space 1 .LC250: .ascii "%DECL\000" .space 2 .LC251: .ascii "%TYPE\000" .space 2 .LC252: .ascii "%ZERO\000" .space 2 .LC253: .ascii "%APPLY\000" .space 1 .LC254: .ascii "%PROT\000" .space 2 .LC255: .ascii "%SETPROT\000" .space 3 .LC256: .ascii "%PTYPE\000" .space 1 .LC257: .ascii "%GAPP\000" .space 2 .LC258: .ascii "%LOCAL\000" .space 1 .LC259: .ascii "%GUARD\000" .space 1 .LC260: .ascii "%MCODE\000" .space 1 .LC262: .ascii "%SETTYPE\000" .space 3 .LC263: .ascii "%OPER\000" .space 2 .LC264: .ascii "%PARAM\000" .space 1 .LC265: .ascii "%BLOCK\000" .space 1 .LC266: .ascii "%OTHER\000" .space 1 .LC267: .ascii "%COMPILE\000" .space 3 .LC268: .ascii "APP\000" .space 4 .LC270: .ascii "APP2\000" .space 3 .LC271: .ascii "APP3\000" .space 3 .LC272: .ascii "APP4\000" .space 3 .LC273: .ascii "APP5\000" .space 3 .LC274: .ascii "APP6\000" .space 3 .LC275: .ascii "ADEFN\000" .space 2 .LC276: .ascii "NPARM\000" .space 2 .LC277: .ascii "SWDEF\000" .space 2 .LC278: .ascii "SWIDS\000" .space 2 .LC279: .ascii "CIEXP\000" .space 2 .LC280: .ascii "RCONST\000" .space 1 .LC281: .ascii "SCONST\000" .space 1 .LC282: .ascii "ARRAYP\000" .space 1 .LC283: .ascii "XIMP\000" .space 3 .LC284: .ascii "IMP\000" .space 4 .LC285: .ascii "COND\000" .space 3 .LC286: .ascii "SCOND\000" .space 2 .LC287: .ascii "EXP1\000" .space 3 .LC288: .ascii "EXP2\000" .space 3 .LC289: .ascii "SEXP\000" .space 3 .LC290: .ascii "IEXP\000" .space 3 .LC291: .ascii "IEXP1\000" .space 2 .LC292: .ascii "IEXP2\000" .space 2 .LC293: .ascii "ISEXP\000" .space 2 .LC294: .ascii "SEQ\000" .space 4 .LC295: .ascii "FDEF\000" .space 3 .LC296: .ascii "EXP\000" .space 4 .LC298: .ascii "STRUCT\000" .space 1 .LC299: .ascii "RESEXP\000" .space 1 .LC300: .ascii "BPL\000" .space 4 .LC301: .ascii "CONSTB\000" .space 1 .LC302: .ascii "FITEM\000" .space 2 .LC303: .ascii "MOREA\000" .space 2 .LC304: .ascii "CLIST\000" .space 2 .LC305: .ascii "FPP\000" .space 4 .LC306: .ascii "FPP0\000" .space 3 .LC307: .ascii "FPP1\000" .space 3 .LC308: .ascii "FPP2\000" .space 3 .LC310: .ascii "RECEXP\000" .space 1 .LC311: .ascii "EIMP\000" .space 3 .LC312: .ascii "IDENTS\000" .space 1 .LC313: .ascii "RANGE\000" .space 2 .LC315: .ascii "VARP\000" .space 3 .LC317: .ascii "ESCDEC\000" .space 1 .LC319: .ascii "ESCARRAY\000" .space 3 .LC320: .ascii "ESCREC\000" .space 1 .LC2: .byte 90 .byte 90 .byte 90 .byte 90 .byte 90 .byte 48 .byte 48 .byte 19 .byte 19 .byte 19 .byte 19 .byte 25 .byte 25 .byte 25 .byte 25 .byte 25 .byte 25 .byte 25 .byte 23 .byte 104 .byte 104 .byte 105 .byte 30 .byte 20 .byte 21 .byte 93 .byte 47 .byte 45 .byte 46 .byte 42 .byte 43 .byte 44 .byte 40 .byte 68 .byte 55 .byte 104 .byte 60 .byte 93 .byte 25 .byte 40 .byte 93 .byte 23 .byte 25 .byte 57 .byte 25 .byte 90 .byte -80 .byte -79 .byte -78 .byte -77 .space 2 .LC3: .short 24 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 23 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 20 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short -32551 .short 0 .short 0 .short 0 .short 0 .short 13 .short 0 .short 14 .short 4 .short -32557 .short 16 .short -32550 .short 0 .short 0 .short 5 .short 6 .short 3 .short 12 .short 15 .short 8 .short 7 .short 9 .short 10 .short 11 .short -32558 .short -32554 .short -32559 .short -32552 .short -32553 .short 18 .short 22 .short 17 .short 21 .short 19 .short 0 .short 0 .short 0 .short -32562 .short -32560 .short 0 .short 0 .short 0 .short -32561 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 1 .short 2 .short 0 .short -32556 .short 0 .short -32555 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .LC4: .short 0 .short 511 .short 131 .short 531 .short 131 .short 551 .short 559 .short 131 .short 567 .short 575 .short 583 .short 603 .short 623 .short 631 .short 663 .short 671 .short 129 .short 129 .short 129 .short 129 .short 129 .short 129 .short 129 .short 129 .short 129 .short 129 .short 691 .short 698 .short 707 .short 751 .short 795 .short 131 .short 131 .short 824 .short 900 .short 960 .short 1076 .short 1120 .short 1280 .short 128 .short 128 .short 1392 .short 128 .short 128 .short 1460 .short 1556 .short 1592 .short 1660 .short 1748 .short 128 .short 1828 .short 2044 .short 2240 .short 2272 .short 128 .short 2312 .short 128 .short 128 .short 128 .short 2331 .short 2339 .short 2371 .short 2379 .short 2399 .short 131 .short 131 .short 131 .short 131 .short 131 .short 131 .short 131 .short 131 .short 131 .short 131 .short 131 .short 131 .short 131 .short 131 .short 131 .short 131 .short 131 .short 131 .short 131 .short 131 .short 131 .short 131 .short 131 .short 131 .short 131 .short 131 .short 131 .short 131 .short 2407 .short 131 .short 2379 .short -32351 .short 16428 .short 25 .short 16428 .short 29 .short -32349 .short 16433 .short 1 .short 16434 .short 1 .short -16127 .short 0 .short 16427 .short 21 .short 16407 .short 0 .short 16409 .short 0 .short -32323 .short -10840 .short 40 .short 16471 .short 0 .short -32341 .short -10580 .short 32 .short 16473 .short 117 .short 16384 .short 19 .short -31955 .short -32322 .short -10580 .short 36 .short -9290 .short 0 .short 16473 .short 113 .short 16432 .short 13 .short -32337 .short 16427 .short 46 .short 16427 .short 17 .short 16405 .short 0 .short 16404 .short 0 .short -31556 .short -31939 .short -32322 .short -9551 .short 2 .short 16433 .short 1 .short 16433 .short 5 .short 16426 .short 5 .short -31606 .short -32323 .short -9807 .short 0 .short -32374 .short -9678 .short 0 .short 16436 .short 0 .short 16435 .short 0 .short -31939 .short -32322 .short 16433 .short 4 .short 16426 .short 9 .short 16433 .short 3 .short -30772 .short -31666 .short 10578 .short 11457 .short -32344 .short 16413 .short 2 .short 16411 .short 2 .short 68 .short -32374 .short 16440 .short 0 .short 16440 .short 0 .short 8393 .short 83 .short 16408 .short 0 .short -31291 .short 10841 .short 69 .short -32311 .short 16412 .short 18 .short 10830 .short 9157 .short 10565 .short 16412 .short 18 .short 9415 .short 78 .short 16458 .short 0 .short -32049 .short 8665 .short 8908 .short 16455 .short 0 .short -30131 .short 78 .short -31277 .short 84 .short -32055 .short 10194 .short 76 .short 16469 .short 0 .short 10958 .short 69 .short 16447 .short 32 .short 84 .short -32319 .short 16418 .short 2 .short 10830 .short 16418 .short 2 .short 8909 .short 10830 .short 16406 .short 0 .short -31927 .short 10073 .short 9921 .short 8649 .short 16419 .short 5 .short 9153 .short 10190 .short 8915 .short 16469 .short 1 .short -27956 .short -31282 .short 88 .short -31927 .short 8916 .short 10066 .short 9793 .short 16419 .short 3 .short 84 .short 16447 .short 4 .short 68 .short -32305 .short 16459 .short 2 .short 70 .short -30650 .short -31284 .short 80 .short -31931 .short 10194 .short 10567 .short 9921 .short 16460 .short 1 .short 9938 .short 16461 .short 0 .short 10697 .short 84 .short 16467 .short 3 .short 9801 .short 69 .short 16460 .short 0 .short 8915 .short 16452 .short 0 .short -29631 .short -30903 .short -31282 .short -31793 .short 10069 .short 10819 .short 10185 .short 78 .short 16416 .short 9 .short 82 .short 16445 .short 0 .short 16416 .short 9 .short 9422 .short 9299 .short -32315 .short 16453 .short 0 .short 10700 .short 69 .short 16454 .short 0 .short 10700 .short 69 .short 16464 .short 1210 .short -30778 .short 78 .short -31549 .short 8916 .short 8903 .short 82 .short -32344 .short 16412 .short 17 .short 16472 .short 17 .short 10956 .short 8900 .short 16470 .short 0 .short 16446 .short 44 .short -30143 .short -30647 .short 10063 .short 71 .short -31671 .short -32302 .short 16412 .short 20 .short 8389 .short 76 .short 16412 .short 36 .short 10830 .short 9157 .short 10565 .short 16412 .short 20 .short 10835 .short 16467 .short 1 .short 8898 .short 76 .short 16425 .short 6 .short -31935 .short 10063 .short 10825 .short 10575 .short 16465 .short 109 .short 80 .short 16416 .short 10 .short -32191 .short 10831 .short 16442 .short 0 .short 8909 .short -32314 .short 16414 .short 1 .short -31794 .short 10069 .short 10819 .short 10185 .short 78 .short 16416 .short 10 .short 16416 .short 10 .short -30770 .short -31408 .short -32174 .short 10071 .short 16418 .short 1 .short -32374 .short 16441 .short 2 .short 16441 .short 2 .short 9428 .short 10063 .short 16402 .short 0 .short -32315 .short 16448 .short 0 .short 8918 .short 10830 .short 16448 .short 0 .short -30523 .short 82 .short -31419 .short -31927 .short 9167 .short 8402 .short 77 .short 16457 .short 0 .short 77 .short 16419 .short 6 .short 9412 .short 8387 .short 8916 .short 16415 .short 123 .short 9938 .short 16419 .short 7 .short -31931 .short 10959 .short 9428 .short 8910 .short 16415 .short 104 .short -28351 .short -30397 .short -31024 .short -32045 .short 10964 .short 10066 .short 16464 .short 1319 .short 9813 .short 7892 .short -32323 .short 16462 .short 1384 .short 16463 .short 1241 .short 8389 .short 84 .short 16456 .short 0 .short 10575 .short 68 .short -32314 .short 16421 .short 64 .short 10575 .short 8397 .short 84 .short -32301 .short 16422 .short 9 .short 8912 .short 67 .short 16422 .short 12 .short 76 .short -32301 .short 16412 .short 33 .short -31924 .short 10190 .short 9938 .short 9793 .short 16468 .short 1 .short 10063 .short 71 .short 16468 .short 4 .short -27704 .short -28983 .short -29488 .short -31276 .short -31913 .short 10713 .short 8916 .short 77 .short 16419 .short 4 .short 10825 .short 9283 .short 16417 .short 12 .short -31423 .short -31921 .short 9426 .short 9166 .short 40 .short 16420 .short 48 .short 80 .short 16466 .short 115 .short 10834 .short 16451 .short 0 .short 8645 .short 16423 .short 0 .short 10055 .short 9793 .short -32315 .short 16449 .short 0 .short 8918 .short 10830 .short 16449 .short 0 .short 10575 .short 84 .short -32311 .short 16412 .short 19 .short 10830 .short 9157 .short 10565 .short 16412 .short 19 .short -32056 .short 10962 .short 69 .short 16464 .short 1354 .short 10053 .short 16450 .short 0 .short 78 .short -32052 .short 9428 .short 76 .short 16444 .short 182 .short 10693 .short 83 .short 16446 .short 46 .short 9416 .short 8908 .short 16443 .short 180 .short 16407 .short 0 .short -31939 .short -32292 .short -10454 .short 51 .short 16426 .short 13 .short 16433 .short 1 .short 16409 .short 0 .short -32290 .short -10454 .short 51 .short 16426 .short 13 .short 16410 .short 0 .short 16431 .short 14 .short -32323 .short 16430 .short 51 .short 16433 .short 1 .LC5: .byte 7 .ascii "LISTING\000" .space 247 .LC6: .byte 14 .ascii "prims-null.inc\000" .space 240 .LC7: .byte 44 .ascii " Edinburgh IMP77 Compiler - Version \000" .space 210 .data .align 2 .set .LANCHOR1,. + 0 .set .LANCHOR2,. + 4344 GMAX.10168: .word 719 GLINK.10173: .short -1 .short 71 .short 72 .short 38 .short 46 .short 47 .short 67 .short 67 .short 75 .short 67 .short 0 .short 67 .short 51 .short 76 .short 79 .short 53 .short 55 .short 80 .short 67 .short 81 .short 82 .short 83 .short 67 .short 84 .short 26 .short 41 .short 85 .short 86 .short 57 .short 57 .short 89 .short 93 .short 96 .short 97 .short 102 .short 103 .short 104 .short 107 .short 46 .short 67 .short 67 .short 0 .short 110 .short 110 .short 111 .short 52 .short 49 .short 0 .short 61 .short 67 .short 62 .short 0 .short 67 .short 0 .short 111 .short 112 .short 112 .short 58 .short 113 .short 114 .short 115 .short 64 .short 67 .short 66 .short 116 .short 117 .short 68 .short 0 .short 67 .short 122 .short 67 .short 0 .short 73 .short 123 .short 123 .short 67 .short 77 .short 67 .short 40 .short 77 .short 67 .short 67 .short 0 .short 124 .short 127 .short 128 .short 87 .short 86 .short 0 .short 90 .short 131 .short 89 .short 0 .short 94 .short 93 .short 0 .short 132 .short 98 .short 137 .short 100 .short 97 .short 0 .short 138 .short 67 .short 105 .short 104 .short 0 .short 108 .short 107 .short 0 .short 67 .short 67 .short 67 .short 139 .short 140 .short 141 .short 0 .short 118 .short 120 .short 116 .short 142 .short 116 .short 67 .short 71 .short 125 .short 67 .short 0 .short 67 .short 129 .short 85 .short 0 .short 143 .short 133 .short 144 .short 135 .short 145 .short 0 .short 156 .short 157 .short 59 .short 158 .short 67 .short 119 .short 91 .short 159 .short 146 .short 145 .short 148 .short 146 .short 151 .short 0 .short 153 .short 153 .short 154 .short 146 .short 0 .short 99 .short 160 .short 67 .short 134 .short 161 .short 162 .short 165 .short 161 .short 141 .short 162 .short 162 .short 168 .short 172 .short 174 .short 175 .short 176 .short 177 .short 178 .short 179 .short 182 .short 185 .short 188 .short 189 .short 180 .short 190 .short 190 .short 183 .short 191 .short 191 .short 186 .short 191 .short 191 .short 0 .short 188 .short 192 .short 193 .short 194 .short 0 .short 196 .short 0 .short 0 .short 198 .short 197 .short 0 .short 201 .short 200 .short 0 .short 204 .short 205 .short 0 .short 228 .short 232 .short 219 .short 234 .short 235 .short 0 .short 236 .short 237 .short 238 .short 0 .short 232 .short 226 .short 244 .short 245 .short 221 .short 248 .short 249 .short 250 .short 251 .short 245 .short 0 .short 252 .short 229 .short 249 .short 250 .short 251 .short 253 .short 0 .short 0 .short 188 .short 254 .short 260 .short 239 .short 269 .short 269 .short 242 .short 191 .short 191 .short 270 .short 246 .short 272 .short 272 .short 229 .short 273 .short 274 .short 275 .short 276 .short 0 .short 255 .short 266 .short 266 .short 258 .short 267 .short 267 .short 261 .short 266 .short 266 .short 264 .short 267 .short 267 .short 232 .short 268 .short 232 .short 0 .short 277 .short 0 .short 278 .short 232 .short 273 .short 232 .short 282 .short 283 .short 279 .short 285 .short 253 .short 0 .short 0 .short 286 .short 0 .short 232 .short 0 .short 288 .short 0 .short 290 .short 0 .short 292 .short 294 .short 0 .short 0 .short 297 .short 0 .short 0 .short 299 .short 301 .short 0 .short 303 .short 0 .short 305 .short 0 .short 307 .short 0 .short 0 .short 310 .short 313 .short 314 .short 315 .short 0 .short 0 .short 316 .short 311 .short 314 .short 0 .short 332 .short 332 .short 328 .short 349 .short 350 .short 351 .short 351 .short 351 .short 351 .short 330 .short 282 .short 352 .short 358 .short 0 .short 333 .short 341 .short 347 .short 359 .short 360 .short 361 .short 362 .short 363 .short 0 .short 342 .short 343 .short 345 .short 0 .short 346 .short 0 .short 269 .short 269 .short 0 .short 0 .short 366 .short 353 .short 371 .short 372 .short 373 .short 374 .short 0 .short 375 .short 376 .short 377 .short 383 .short 384 .short 364 .short 385 .short 385 .short 367 .short 269 .short 269 .short 269 .short 269 .short 389 .short 390 .short 391 .short 392 .short 393 .short 0 .short 378 .short 360 .short 361 .short 362 .short 341 .short 0 .short 379 .short 380 .short 386 .short 363 .short 341 .short 0 .short 353 .short 354 .short 355 .short 375 .short 395 .short 0 .short 396 .short 0 .short 400 .short 269 .short 269 .short 401 .short 0 .short 411 .short 411 .short 406 .short 417 .short 407 .short 418 .short 419 .short 420 .short 0 .short 412 .short 418 .short 419 .short 420 .short 421 .short 0 .short 409 .short 406 .short 424 .short 417 .short 422 .short 425 .short 425 .short 408 .short 415 .short 427 .short 430 .short 431 .short 0 .short 426 .short 432 .short 428 .short 434 .short 436 .short 0 .short 433 .short 269 .short 269 .short 441 .short 442 .short 282 .short 443 .short 0 .short 446 .short 451 .short 447 .short 446 .short 452 .short 451 .short 0 .short 449 .short 448 .short 454 .short 453 .short 457 .short 0 .short 455 .short 459 .short 458 .short 0 .short 269 .short 464 .short 465 .short 282 .short 466 .short 0 .short 469 .short 469 .short 470 .short 471 .short 472 .short 473 .short 474 .short 475 .short 476 .short 477 .short 0 .short 479 .short 269 .short 481 .short 0 .short 483 .short 485 .short 485 .short 205 .short 490 .short 488 .short 496 .short 497 .short 491 .short 494 .short 490 .short 0 .short 491 .short 491 .short 0 .short 498 .short 499 .short 501 .short 0 .short 0 .short 504 .short 506 .short 510 .short 499 .short 508 .short 0 .short 506 .short 506 .short 504 .short 512 .short 513 .short 514 .short 515 .short 0 .short 517 .short 518 .short 519 .short 520 .short 0 .short 522 .short 523 .short 524 .short 525 .short 522 .short 0 .short 528 .short 529 .short 531 .short 536 .short 532 .short 534 .short 0 .short 532 .short 0 .short 537 .short 538 .short 539 .short 541 .short 542 .short 542 .short 0 .short 544 .short 546 .short 0 .short 547 .short 548 .short 549 .short 533 .short 551 .short 553 .short 558 .short 554 .short 556 .short 0 .short 554 .short 0 .short 559 .short 560 .short 557 .short 0 .short 563 .short 205 .short 0 .short 566 .short 564 .short 568 .short 565 .short 570 .short 567 .short 572 .short 569 .short 574 .short 571 .short 576 .short 575 .short 0 .short 579 .short 580 .short 592 .short 593 .short 584 .short 205 .short 585 .short 588 .short 588 .short 588 .short 590 .short 205 .short 594 .short 594 .short 595 .short 596 .short 597 .short 581 .short 600 .short 598 .short 601 .short 0 .short 205 .short 205 .short 205 .short 606 .short 606 .short 607 .short 608 .short 609 .short 605 .short 610 .short 612 .short 0 .short 193 .short 193 .short 193 .short 193 .short 193 .short 193 .short 193 .short 193 .short 0 .short 623 .short 623 .short 192 .short 626 .short 626 .short 0 .short 626 .short 626 .short 631 .short 633 .short 282 .short 282 .short 634 .short 282 .short 282 .short 637 .short 638 .short 639 .short 0 .short 650 .short 677 .short 684 .short 666 .short 655 .short 205 .short 205 .short 205 .short 205 .short 650 .short 659 .short 668 .short 685 .short 666 .short 0 .short 662 .short 686 .short 666 .short 662 .short 668 .short 685 .short 0 .short 670 .short 674 .short 689 .short 666 .short 205 .short 0 .short 205 .short 0 .short 674 .short 689 .short 205 .short 0 .short 666 .short 205 .short 0 .short 680 .short 692 .short 680 .short 659 .short 668 .short 685 .short 0 .short 650 .short 687 .short 662 .short 688 .short 205 .short 690 .short 691 .short 666 .short 680 .short 697 .short 697 .short 697 .short 697 .short 698 .short 699 .short 700 .short 0 .short 703 .short 703 .short 704 .short 706 .short 707 .short 708 .short 708 .short 700 .short 711 .short 711 .short 712 .short 713 .short 719 .short 719 .short 719 .short 719 .short 719 .short 719 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .space 2 GRAM.10172: .short 0 .short -28523 .short -28521 .short -28602 .short -32706 .short -28509 .short -28603 .short -24502 .short -24503 .short -20405 .short -20404 .short -28595 .short -32697 .short -32709 .short -16323 .short -28600 .short -32704 .short -28587 .short -28589 .short -32681 .short -16344 .short -28586 .short -28588 .short -12270 .short -32586 .short 216 .short -12287 .short -16380 .short -8185 .short -8184 .short -12285 .short -12286 .short -12283 .short -12282 .short -12279 .short -12276 .short -16373 .short 20490 .short -32706 .short -32701 .short 216 .short -16364 .short -28610 .short -28613 .short -28612 .short 16445 .short 217 .short -16364 .short 62 .short -32701 .short 16450 .short -16364 .short 5346 .short -16364 .short 166 .short -16344 .short 4332 .short 130 .short -16360 .short -16361 .short 126 .short 217 .short -32701 .short 216 .short -16364 .short 16450 .short -32700 .short 16404 .short -32701 .short -32706 .short 216 .short 16405 .short 16407 .short -16222 .short 8414 .short 130 .short 217 .short -32697 .short 16450 .short 1250 .short 4307 .short 4318 .short 192 .short 93 .short 170 .short 90 .short 207 .short -16365 .short 16404 .short 90 .short -16360 .short -16365 .short 16404 .short 241 .short -16365 .short 16404 .short 132 .short 132 .short -16360 .short 4329 .short -16365 .short 16404 .short 133 .short 175 .short 90 .short -16365 .short 16404 .short 209 .short -16365 .short 16404 .short 4313 .short 217 .short 16451 .short 4263 .short 16384 .short 16384 .short 120 .short 216 .short -32700 .short 16404 .short -32706 .short 16404 .short 243 .short 16409 .short 454 .short -32685 .short 16404 .short 454 .short 248 .short -16365 .short 16404 .short 4263 .short 194 .short -16360 .short 4329 .short -32717 .short 16404 .short 4263 .short 16407 .short 454 .short 237 .short 127 .short 215 .short 454 .short 4263 .short 16384 .short -16364 .short 1502 .short -32629 .short -16361 .short 153 .short -32606 .short 222 .short 143 .short -32629 .short 153 .short 454 .short 126 .short 16409 .short 454 .short 16384 .short 234 .short -16365 .short -32595 .short 147 .short -32678 .short 234 .short 193 .short -32677 .short -32676 .short -32661 .short 109 .short -32717 .short 53 .short 52 .short 52 .short 52 .short 194 .short 194 .short 194 .short -28581 .short 4188 .short 194 .short -28566 .short 4203 .short 194 .short -28564 .short 4205 .short 4580 .short 16429 .short 183 .short 183 .short 186 .short 186 .short -28583 .short 0 .short 9437 .short 90 .short -16365 .short 0 .short 134 .short -16365 .short 0 .short 210 .short 4329 .short 199 .short -32677 .short -32672 .short -32676 .short -32688 .short -32690 .short -32705 .short -32661 .short -32659 .short -32689 .short -32686 .short -32687 .short -16330 .short 65 .short -32716 .short 186 .short -28583 .short -32717 .short -32715 .short -32713 .short 52 .short -32664 .short 4201 .short 186 .short -32717 .short -32715 .short 55 .short -16328 .short 0 .short 197 .short 197 .short 52 .short 52 .short 197 .short -28581 .short -28580 .short 186 .short -28581 .short 4188 .short 4318 .short 194 .short -28581 .short 4188 .short 9437 .short 194 .short 194 .short 454 .short 16407 .short 216 .short 194 .short -28566 .short -28565 .short 186 .short -28566 .short 4203 .short 194 .short -28564 .short -28563 .short 186 .short -28564 .short 4205 .short 183 .short 183 .short 186 .short 183 .short -16365 .short 0 .short 183 .short 4580 .short 16429 .short 5095 .short 9444 .short 5348 .short 186 .short -28583 .short -16328 .short 0 .short 16409 .short -16365 .short 0 .short 9437 .short 5348 .short 217 .short -32701 .short 16450 .short -32701 .short 216 .short -32700 .short 0 .short -32701 .short -32706 .short 216 .short 243 .short 217 .short -16318 .short 0 .short -32552 .short 0 .short -32700 .short 0 .short -32706 .short 0 .short 215 .short -32550 .short 228 .short -28616 .short -28615 .short 0 .short 4096 .short 218 .short 218 .short -28616 .short 0 .short -32677 .short -32676 .short -16361 .short -32710 .short -32669 .short -32662 .short -32661 .short -32660 .short -32659 .short 740 .short -32039 .short 740 .short -32719 .short 4096 .short 194 .short -32719 .short -32718 .short -32604 .short -32726 .short -32725 .short -32724 .short -32720 .short 4096 .short 710 .short 6116 .short -32719 .short 0 .short 710 .short 6116 .short -28581 .short 4188 .short 218 .short 122 .short 50 .short 16409 .short -32726 .short -32725 .short -32724 .short -32719 .short 4096 .short 710 .short 454 .short 195 .short 195 .short 195 .short 454 .short -28581 .short 4188 .short 194 .short -28566 .short -28565 .short -28564 .short 4205 .short 195 .short 195 .short 195 .short 710 .short 4836 .short 5095 .short 4829 .short -32726 .short -32725 .short -32724 .short -32719 .short 4096 .short 4827 .short 4828 .short 454 .short -32720 .short -32719 .short 4096 .short 4829 .short 4827 .short 4828 .short 194 .short -32719 .short 0 .short 710 .short 4836 .short -16291 .short -32677 .short 92 .short 184 .short 121 .short -28581 .short -28580 .short -32722 .short -32723 .short 4317 .short -32726 .short -32725 .short -32724 .short 0 .short 183 .short -32726 .short -32725 .short -32724 .short -32720 .short 0 .short 4316 .short 195 .short 195 .short 195 .short 454 .short -28581 .short 4188 .short 4315 .short 183 .short 4317 .short -32726 .short -32725 .short 0 .short 195 .short 195 .short 4315 .short 4317 .short -32726 .short 0 .short 195 .short -32677 .short -32676 .short -16361 .short 16431 .short 228 .short 228 .short 47 .short -32610 .short -32611 .short 5345 .short -32609 .short -32608 .short -32607 .short 0 .short 4320 .short 4319 .short 5345 .short -32609 .short -32608 .short 0 .short 4319 .short 5345 .short -32609 .short 0 .short -32613 .short -16361 .short 16431 .short 222 .short 222 .short 156 .short -32677 .short 92 .short 183 .short 186 .short 1222 .short 16435 .short 228 .short 16403 .short 4324 .short 138 .short 8420 .short -32723 .short 4189 .short 93 .short 454 .short 148 .short -32674 .short 16546 .short 16409 .short -32597 .short 182 .short -16383 .short 16388 .short 234 .short -16365 .short -32595 .short 172 .short -32678 .short 234 .short 90 .short 244 .short 246 .short -16365 .short 0 .short 235 .short -32678 .short 234 .short -16365 .short 246 .short -16365 .short 0 .short -32678 .short 234 .short 90 .short 16407 .short 222 .short 16405 .short 222 .short 145 .short 16407 .short 222 .short 16405 .short 222 .short 146 .short 16407 .short 1252 .short 154 .short 5348 .short -16365 .short 142 .short 126 .short 182 .short -16383 .short 16391 .short 90 .short -16365 .short 127 .short -32678 .short 238 .short 90 .short 125 .short 239 .short -16365 .short 8319 .short 8430 .short 128 .short 126 .short -16361 .short 127 .short 190 .short 240 .short 189 .short 16409 .short 182 .short -16383 .short 16391 .short 90 .short -16365 .short 0 .short -32678 .short 240 .short 90 .short 16623 .short -16365 .short 0 .short 244 .short 232 .short 1252 .short 1252 .short 137 .short 1252 .short 137 .short 1252 .short 137 .short 1252 .short 137 .short 1252 .short 137 .short 222 .short -16365 .short 0 .short 131 .short 194 .short -16360 .short -16333 .short -16332 .short 124 .short 181 .short -16292 .short -16277 .short 16493 .short -31802 .short 5342 .short -28581 .short 4188 .short 4263 .short 181 .short 186 .short 454 .short 16475 .short 183 .short -28583 .short 199 .short 5598 .short 9438 .short 222 .short -32677 .short -32676 .short 16407 .short 186 .short 228 .short 135 .short 16409 .short -32632 .short 0 .short -32677 .short 92 .short -32677 .short -32676 .short -32662 .short -32661 .short -32660 .short -32659 .short 165 .short -32677 .short 92 .short 188 .short -32662 .short 107 .short 188 .short -32660 .short 109 .short -32732 .short 37 .short -16344 .short 4318 .short 148 .short -32674 .short 16424 .short 222 .short 16405 .short 222 .short 174 .short -28644 .short -32734 .short -32680 .short -28641 .short -32733 .short -32730 .short -32735 .short -32727 .short -32738 .short 4326 .short -32738 .short -32739 .short -32741 .short -32736 .short 199 .short -28644 .short -32680 .short -28641 .short 4326 .short -32739 .short -32741 .short 199 .short -32738 .short -32739 .short -32741 .short -32736 .short -32729 .short 199 .short -32616 .short 199 .short -32739 .short -32741 .short -32729 .short 199 .short -32616 .short -32729 .short 199 .short -28644 .short -32680 .short 4326 .short -32738 .short -32739 .short -32741 .short 199 .short 245 .short 4318 .short 245 .short 16409 .short 152 .short 4318 .short 16409 .short 152 .short 245 .short -32672 .short -32671 .short -32670 .short 99 .short 16407 .short 200 .short 144 .short 185 .short -32677 .short 92 .short 16407 .short -32582 .short 200 .short 200 .short 187 .short 141 .short -32677 .short 92 .short 16410 .short 191 .short -32677 .short -32676 .short -32662 .short -32661 .short -32660 .short 109 .short 198 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .short 0 .space 2 SYM.10097: .word 10 OCOUNT.10138: .word -1 DMAX.10127: .word 1 SPARENAMES.10050: .word 2047 DP.10144: .word 1 THIS.10121: .word -1 PHRASE.10169: .short 0 .short 564 .short 565 .short 567 .short 569 .short 571 .short 573 .short 562 .short 614 .short 203 .short 200 .short 602 .short 478 .short 480 .short 624 .short 298 .short 206 .short 308 .short 318 .short 433 .short 426 .short 437 .short 444 .short 458 .short 453 .short 461 .short 467 .short 482 .short 402 .short 627 .short 629 .short 603 .short 521 .short 511 .short 486 .short 502 .short 575 .short 527 .short 528 .short 543 .short 550 .short 578 .short 397 .short 287 .short 197 .short 636 .short 516 .short 621 .short 167 .short 0 .short 0 .short 0 .short 640 .short 693 .short 701 .short 709 TMIN.10128: .word 800 PERM.10134: .word 1 GMIN.10126: .word 1720 CHAR.10154: .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .byte 10 .space 2 LIST.10159: .word 1 CONT.10101: .word 32 CSYM.10102: .word 32 REALSLN.10110: .word 1 .bss .align 2 .set .LANCHOR0,. + 0 BP.10166: .space 4 LIT.10156: .space 4 PSTACK.11207: .space 160 CNEST.11185: .space 16 LINES.10089: .space 4 OTYPE.10109: .space 4 DIM.10104: .space 4 DIMENSION.10148: .space 4 SEARCHBASE.10151: .space 4 RBASE.10124: .space 4 X.10079: .space 4 FORMATLIST.10152: .space 4 LIMIT.10139: .space 4 SUBATOM.10082: .space 4 ATOMFLAGS.10108: .space 4 FORMAT.10085: .space 4 APP.10084: .space 4 TYPE.10083: .space 4 ATOM1.10080: .space 4 ESCAPECLASS.10106: .space 4 ATOM2.10081: .space 4 MAPGG.10119: .space 4 POS2.10146: .space 4 POS.10147: .space 4 DECL.10103: .space 4 SPECGIVEN.10105: .space 4 FDEF.10120: .space 4 LAST1.10111: .space 4 COPY.10140: .space 4 INCLUDELEVEL.10132: .space 4 COLUMN.10094: .space 4 ENDMARK.10100: .space 4 POS1.10145: .space 4 MARGIN.10091: .space 4 LAST.10602: .space 4 INCLUDE.10133: .space 4 ERRORMARGIN.10092: .space 4 ERRORSYM.10093: .space 4 SYMTYPE.10098: .space 4 QUOTE.10099: .space 4 KEY.10555: .space 4 LP.10157: .space 4 STBASE.10125: .space 4 TEXTLINE.10090: .space 4 LOCAL.10149: .space 4 FMBASE.10150: .space 4 NAME.11208: .space 256 COUNT.11209: .space 4 LB.11191: .space 4 UB.11192: .space 4 SSTYPE.10136: .space 4 SS.10129: .space 4 ORDER.10141: .space 4 SPECMODE.10137: .space 4 DUBIOUS.10143: .space 4 STATS.10095: .space 4 PROGMODE.10135: .space 4 BLOCKX.10158: .space 4 INCLUDELIST.10131: .space 4 GG.10118: .space 4 GENTYPE.10112: .space 4 FORCE.10116: .space 4 NMAX.10123: .space 4 NMIN.10122: .space 4 PTYPE.10113: .space 4 G.10117: .space 4 CLASS.10078: .space 4 MONPOS.10096: .space 4 LA1.10581: .space 4 LA2.10582: .space 4 LSA.10583: .space 4 LT.10584: .space 4 PAPP.10114: .space 4 PFORMAT.10115: .space 4 FAULTRATE.10088: .space 4 .section .data.rel.ro.local,"aw",%progbits .align 2 .set .LANCHOR4,. + 0 REASON.10213: .word .L35 .word .L35 .word .L35 .word .L35 .word .L35 .word .L35 .word .L35 .word .L35 .word .L35 .word .L35 FM.10323: .word .L422 .word .L422 .word .L422 .word .L422 .word .L422 .word .L422 .word .L422 .word .L422 .word .L422 .word .L422 .word .L422 .word .L422 .word .L422 .word .L422 .word .L422 .word .L422 .word .L422 .word .L422 .word .L422 .word .L422 .word .L422 .word .L422 .word .L422 .word .L422 .word .L422 .word .L422 .word .L422 .word .L422 C.11034: .word .L479 .word .L753 .word .L753 .word .L753 .word .L753 .word .L753 .word .L753 .word .L753 .word .L753 .word .L753 .word .L753 .word .L753 .word .L753 .word .L753 .word .L753 .word .L753 .word .L753 .word .L753 .word .L753 .word .L753 .word .L753 .word .L753 .word .L753 .word .L753 .word .L753 .word .L753 .word .L753 .word .L516 .word .L507 .word .L514 .word .L515 .word .L511 .word .L512 .word .L525 .word .L508 .word .L509 .word .L521 .word .L520 .word .L527 .word .L526 .word .L753 .word .L530 .word .L546 .word .L547 .word .L548 .word .L542 .word .L543 .word .L544 .word .L545 .word .L590 .word .L588 .word .L603 .word .L605 .word .L604 .word .L753 .word .L745 .word .L549 .word .L550 .word .L551 .word .L553 .word .L554 .word .L753 .word .L558 .word .L582 .word .L573 .word .L602 .word .L753 .word .L568 .word .L564 .word .L560 .word .L562 .word .L569 .word .L559 .word .L753 .word .L606 .word .L613 .word .L611 .word .L610 .word .L596 .word .L597 .word .L598 .word .L601 .word .L599 .word .L628 .word .L629 .word .L627 .word .L630 .word .L748 .word .L506 .word .L600 .word .L651 .word .L665 .word .L666 .word .L675 .word .L753 .word .L753 .word .L659 .word .L656 .word .L657 .word .L658 .word .L661 .word .L662 .word .L663 .word .L664 .word .L580 .word .L694 .word .L667 .word .L668 .word .L669 .word .L670 .word .L753 .word .L753 .word .L753 .word .L753 .word .L753 .word .L753 .word .L753 .word .L753 .word .L753 .word .L753 .word .L567 .word .L672 .word .L747 .word .L753 .word .L655 .word .L649 .word .L535 .word .L534 .word .L645 .word .L753 .word .L646 .word .L652 .word .L680 .word .L531 .word .L695 .word .L743 .word .L744 .word .L678 .word .L552 .word .L688 .word .L710 .word .L679 .word .L640 .word .L685 .word .L711 .word .L638 .word .L639 .word .L541 .word .L532 .word .L581 .word .L753 .word .L698 .word .L510 .word .L689 .word .L637 .word .L712 .word .L715 .word .L717 .word .L718 .word .L719 .word .L720 .word .L721 .word .L683 .word .L561 .word .L746 .word .L660 .word .L557 .word .L673 .word .L540 .word .L753 .word .L741 .word .L537 .word .L538 .word .L539 .word .L536 .word .L529 .word .L753 .word .L753 .word .L753 .word .L753 .word .L753 LITOP.11168: .word .L730 .word .L731 .word .L726 .word .L734 .word .L732 .word .L738 .word .L739 .word .L736 .word .L737 .word .L723 .word .L733 .word .L725 ACT.10562: .word .L895 .word .L895 .word .L895 .word .L895 .word .L895 .word .L895 .word .L895 .word .L895 .word .L895 .word .L895 .word .L895 .word .L895 .word .L895 .word .L895 .word .L895 .word .L895 .word .L895 .word .L895 .word .L895 .word .L895 .word .L895 PACTION.10567: .word .L904 .word .L904 .word .L904 .word .L904 .word .L904 .word .L904 .word .L904 .word .L904 .word .L904 .word .L904 .word .L904 .word .L904 .word .L904 .word .L904 .word .L904 .word .L904 .section .rodata.str1.4,"aMS",%progbits,1 .align 2 .LC77: .ascii "test-new/pass1v84-noprims.imp\000" .space 2 .LC78: .ascii "->REASON(%d) out of bounds at %s line %d\000" .space 3 .LC79: .ascii "switch jump to undefined label REASON(%d): at %s li" .ascii "ne %d\000" .space 3 .LC80: .ascii "Illegal cycle J = AD + 1, 1, AD + *_imp_BYTEINTEGER" .ascii "(AD)\000" .LC81: .ascii "Illegal cycle J = 1, 1, BP\000" .space 1 .LC82: .ascii "switch jump to undefined label FM(%d): at %s line %" .ascii "d\000" .space 3 .LC83: .ascii "Illegal cycle J = DICT[N - 1], 1, DICT[N + 1 - 1]\000" .space 2 .LC84: .ascii "->C(%d) out of bounds at %s line %d\000" .LC85: .ascii "switch jump to undefined label C(%d): at %s line %d" .ascii "\000" .LC86: .ascii "->LITOP(%d) out of bounds at %s line %d\000" .LC87: .ascii "->ACT(%d) out of bounds at %s line %d\000" .space 2 .LC88: .ascii "switch jump to undefined label ACT(%d): at %s line " .ascii "%d\000" .space 2 .LC89: .ascii "->PACTION(%d) out of bounds at %s line %d\000" .space 2 .LC90: .ascii "switch jump to undefined label PACTION(%d): at %s l" .ascii "ine %d\000" .space 2 .LC93: .ascii "OWNVDEC\000" .LC96: .ascii "OWNADEC\000" .LC100: .ascii "FORMDEC\000" .LC108: .ascii "COMMENT\000" .LC159: .ascii "PROGRAM\000" .LC162: .ascii "ENDPROG\000" .LC163: .ascii "ENDPERM\000" .LC164: .ascii "FRESULT\000" .LC165: .ascii "MRESULT\000" .LC167: .ascii "MONITOR\000" .LC170: .ascii "REALSLN\000" .LC171: .ascii "CONTROL\000" .LC172: .ascii "INCLUDE\000" .LC195: .ascii "%MSTART\000" .LC243: .ascii "OSTRING\000" .LC247: .ascii "RANGERB\000" .LC261: .ascii "%CDUMMY\000" .LC269: .ascii "BASEAPP\000" .LC297: .ascii "NARRAYP\000" .LC309: .ascii "INITVAR\000" .LC314: .ascii "RCONSTB\000" .LC316: .ascii "INITDEC\000" .LC318: .ascii "ESCPROC\000" .Letext0: 2716 %FINISH 2717 2718 impcom_flags = 0 ldr r3, [sp, #556] subs r3, r3, #1 cmp r3, #11 bls .L757 ldr r3, .L823+260 ldr r2, [sp, #520] ldr r3, [r2, r3] ldr r1, [r3] cmp r1, #0 beq .L758 add r0, sp, #4480 adds r0, r0, #12 bl _imp_c2istr(PLT) .LVL684: .L759: ldr r3, .L823+264 ldr r2, [sp, #520] ldr r3, [r2, r3] ldr r3, [r3] movw r2, #2718 cmp r3, #0 it eq moveq r3, r2 ldr r2, [sp, #560] str r2, [sp, #268] ldr r2, [sp, #564] str r2, [sp, #264] ldr r1, [sp, #556] str r1, [sp, #260] ldr r2, .L823+328 .LPIC719: add r2, pc str r2, [sp, #256] str r1, [sp, #252] movs r2, #3 str r2, [sp, #248] movs r2, #6 str r2, [sp, #244] str r3, [sp, #240] movs r2, #240 add r1, sp, #4480 adds r1, r1, #28 mov r0, sp bl memcpy(PLT) .LVL685: add r3, sp, #4480 adds r3, r3, #12 ldm r3, {r0, r1, r2, r3} bl _signal_eventf(PLT) .LVL686: .L757: mov r7, #256 mov r2, r7 ldr r1, .L825+32 .LPIC718: add r1, pc addw r6, sp, #2956 mov r0, r6 bl memcpy(PLT) .LVL736: mov r2, r7 mov r1, r6 addw r6, sp, #3212 mov r0, r6 bl memcpy(PLT) .LVL737: .LBE556: mov r2, r7 mov r1, r6 add r0, sp, #4480 adds r0, r0, #12 bl memcpy(PLT) .LVL738: b .L759 .LVL739: .L794: bl __stack_chk_fail(PLT) .LVL740: .L826: .align 2 .L825: .word .LANCHOR0-(.LPIC707+4) .word .LANCHOR0-(.LPIC536+4) .word .LANCHOR0-(.LPIC539+4) .word .LANCHOR0-(.LPIC540+4) .word .LANCHOR0-(.LPIC708+4) .word _imp_current_file(GOT) .word _imp_current_line(GOT) .word .LANCHOR3-(.LPIC711+4) .word .LANCHOR3-(.LPIC718+4) .LFE209: .align 1 .thumb .thumb_func DELETENAMES.10297: .LFB197: ldr r3, .L996+48 ldr r2, [sp, #248] ldr r0, [r2, r3] movs r4, #0 str r4, [r0, #4] .LVL995: 2719 impcom_option = "" ldr r3, .L823+332 .LPIC720: add r3, pc ldr r2, [sp, #556] add r3, r3, r2, lsl #2 ldr r3, [r3, #872] b .L752 .L720: b .L721 .L723: 2720 ldr r3, .L821+4 ldr r2, [sp, #520] ldr r3, [r2, r3] add r2, sp, #5024 adds r2, r2, #20 ldr r2, [r2] ldr r3, [r3] cmp r2, r3 bne .L794 add sp, sp, #5024 add sp, sp, #24 @ sp needed pop {r4, r5, r6, r7, r8, pc} .LVL472: .L790: 2721 list = 15 %IF Impcom_Flags&x'1000' # 0 movs r2, #255 add r1, sp, #256 add r0, r0, #280 bl _imp_strncpy(PLT) .LVL996: 2722 ldr r3, .L996+52 .LPIC1161: add r3, pc movs r2, #15 str r2, [r3, #2832] .LDL49: .LBB735: 2723 open output(2, "LISTING"); mov r8, #256 mov r2, r8 ldr r1, .L996+56 .LPIC1162: add r1, pc addw r1, r1, #3988 add r5, sp, #1024 mov r0, r5 bl memcpy(PLT) .LVL997: add r7, sp, #784 add r6, sp, #512 mov r2, r8 mov r1, r5 mov r0, r6 bl memcpy(PLT) .LVL998: .LBE735: mov r9, #244 mov r2, r9 sub r1, r7, #260 mov r0, sp bl memcpy(PLT) .LVL999: ldm r6, {r1, r2, r3} movs r0, #2 bl OPENOUTPUT(PLT) .LVL1000: .LBB736: 2724 open input(2, "prims-null.inc"); mov r2, r8 ldr r1, .L996+60 .LPIC1163: add r1, pc subs r1, r1, #100 mov r0, r5 bl memcpy(PLT) .LVL1001: sub r6, r7, #16 mov r2, r8 mov r1, r5 mov r0, r6 bl memcpy(PLT) .LVL1002: .LBE736: mov r2, r9 subs r1, r7, #4 mov r0, sp bl memcpy(PLT) .LVL1003: ldm r6, {r1, r2, r3} movs r0, #2 bl OPENINPUT(PLT) .LVL1004: .LBB737: .LBB738: ldr r3, .L996+64 ldr r7, [sp, #248] ldr r3, [r7, r3] movs r6, #2 str r6, [r3] ldr r3, .L996+68 ldr r3, [r7, r3] ldr r2, .L996+72 ldr r2, [r7, r2] ldr r2, [r2, #556] str r2, [r3] ldr r5, .L996+76 .LPIC1164: add r5, pc addw r0, r5, #1748 bl check_instream(PLT) .LVL1005: .LBE738: .LBE737: .LBB739: .LBB740: ldr r3, .L996+80 ldr r3, [r7, r3] str r6, [r3] ldr r3, .L996+84 ldr r3, [r7, r3] ldr r2, .L996+88 ldr r2, [r7, r2] ldr r2, [r2, #556] str r2, [r3] add r0, r5, r8 bl check_outstream(PLT) .LVL1006: .LBE740: .LBE739: 2725 select input(2); selectoutput(listing) 2726 tag(max tag) = 0; !%BEGIN defn add r3, sp, #2048 movw r0, #13012 adds r2, r3, r0 str r4, [r3, r0] str r4, [r2, #4] str r4, [r2, #8] str r4, [r2, #12] 2727 tag(0) = 0; tag(0)_flags = 7; !%BEGIN tag! str r4, [sp, #2260] str r4, [sp, #2264] str r4, [sp, #2268] str r4, [sp, #2272] 2728 Hash(x) = 0 %FOR x = 0, 1, max names movs r2, #7 strh r2, [sp, #2268] @ movhi add r2, r3, #21504 adds r2, r2, #82 add r3, r3, #25600 adds r3, r3, #82 2729 printstring(" Edinburgh IMP77 Compiler - Version ") add r6, sp, #1296 add r4, sp, #1024 mov r8, #256 mov r2, r8 ldr r1, .L996+96 .LPIC1167: add r1, pc adds r1, r1, #156 mov r0, r4 bl memcpy(PLT) .LVL1007: subs r6, r6, #16 mov r2, r8 mov r1, r4 mov r0, r6 bl memcpy(PLT) .LVL1008: add r4, sp, #1808 add r5, sp, #1536 mov r2, r8 mov r1, r6 mov r0, r5 bl memcpy(PLT) .LVL1009: .LBE741: .LBB742: .LBB743: movs r6, #240 mov r2, r6 sub r1, r4, #256 mov r0, sp bl memcpy(PLT) .LVL1010: ldm r5, {r0, r1, r2, r3} bl _imp_printstring(PLT) .LVL1011: sub r5, r4, #16 .LVL1012: movs r3, #0 strb r3, [r4, #-16] .LBE743: .LBE742: .LBB744: .LBB745: mov r2, r6 mov r1, r4 mov r0, sp bl memcpy(PLT) .LVL1013: ldm r5, {r0, r1, r2, r3} bl _imp_printstring(PLT) .LVL1014: .LBE745: .LBE744: .LBB746: .LBB747: movs r0, #2 bl _imp_newlines(PLT) .LVL1015: .LBE747: .LBE746: 2730 printstring(version); newlines(2) 2731 op('l', 0) cmp r2, r3 bne .L989 .LDL51: ldr r7, .L996+92 .LPIC1166: add r7, pc movw r3, #2047 str r3, [r7, #208] .LBB741: add r5, sp, #2048 mov ip, r5 movs r1, #0 movs r0, #108 bl OP.10282(PLT) .LVL1016: 2732 compile block(0, 0, max dict, 0, 0) movs r4, #0 str r4, [sp] mov ip, r5 mov r3, r4 movw r2, #6000 mov r1, r4 mov r0, r4 bl COMPILEBLOCK.10292(PLT) .LVL1017: ldr r3, [r7] adds r2, r3, #1 str r2, [r7] 2733 bp=bp+1 %AND buff(bp)=nl {for bouncing off} mov r1, r4 .L989: strh r1, [r2, #2]! @ movhi .LDL50: 2734 flush buffer add r3, r3, r5 add r3, r3, #104448 movs r2, #10 strb r2, [r3, #262] mov ip, r5 bl FLUSHBUFFER.10176(PLT) .LVL1018: 2735 Impcom_Statements = stats ldr r3, .L996+48 ldr r2, [sp, #248] ldr r3, [r2, r3] ldr r2, [r7, #640] str r2, [r3] .LDL52: .LVL1019: .LBB748: .LBB749: mov r0, r4 bl exit(PLT) .LVL1020: .L987: .LBE749: .LBE748: 2736 Impcom_Statements = -faulty %IF faulty # 0 2737 %ENDOFPROGRAM 2310 Statements compiled