;;;; component: NIL IR1 block 0 start c1 start stack: 1> bind SB-C::CLAMBDA (SB-C::TL-XEP NIL) :KIND :EXTERNAL 2> 3: SB-C::%VERIFY-ARG-COUNT {GLOBAL-FUNCTION} 4> 5: #:G0 6> 7: '0 8> known combination v3 v5 v7 9> 10: SB-C::CLAMBDA NIL 11> tail local combination v10 end stack: successors c12 IR1 block 1 start c12 start stack: 12> bind SB-C::CLAMBDA NIL 13> 14: SB-INT:FIND-UNDELETED-PACKAGE-OR-LOSE {GLOBAL-FUNCTION} 15> 16: '"HELLO-TWO" 17> 18: full combination v14 v16 19> 20: SB-C::CLAMBDA (LET ((#:G1 (QUOTE "#<...>" . "#<...>"))) ) 21> local combination v20 v18 22> bind SB-C::CLAMBDA (LET ((#:G1 (QUOTE "#<...>" . "#<...>"))) ) :KIND :LET 23> 24: SB-KERNEL:%INSTANCEP {GLOBAL-FUNCTION} 25> 26: #:G1 27> 28: known combination v24 v26 29> if v28 c30 c31 end stack: successors c31 c30 IR1 block 2 start c30 start stack: 30> 32: SB-C::CLAMBDA (LET ((#:G3 (SB-KERNEL:%INSTANCE-LAYOUT "#<...>" . "#<...>"))) ) 33> 34: SB-KERNEL:%INSTANCE-REF {GLOBAL-FUNCTION} 35> 36: #:G1 37> 38: '0 39> 40: known combination v34 v36 v38 41> local combination v32 v40 42> bind SB-C::CLAMBDA (LET ((#:G3 (SB-KERNEL:%INSTANCE-LAYOUT "#<...>" . "#<...>"))) ) :KIND :LET 43> 44: EQ {GLOBAL-FUNCTION} 45> 46: #:G3 47> 48: '# 49> 50: known combination v44 v46 v48 51> if v50 c52 c53 end stack: successors c52 c53 IR1 block 3 start c53 start stack: 53> 54: > {GLOBAL-FUNCTION} 55> 56: SB-KERNEL:%INSTANCE-REF {GLOBAL-FUNCTION} 57> 58: #:G3 59> 60: '12 61> 62: known combination v56 v58 v60 63> 64: '3 65> 66: known combination v54 v62 v64 67> if v66 c68 c31 end stack: successors c31 c68 IR1 block 4 start c68 start stack: 68> 69: EQ {GLOBAL-FUNCTION} 70> 71: SB-KERNEL:%INSTANCE-REF {GLOBAL-FUNCTION} 72> 73: #:G3 74> 75: '11 76> 77: known combination v71 v73 v75 78> 79: SB-C::%ALLOCATE-CLOSURES {GLOBAL-FUNCTION} 80> 81: '(# :WHERE-FROM :DEFINED :ARGLIST (# :ARG-INFO # {A954D69}> # :ARG-INFO # {A954DD9}> # {A954E49}>) :ALLOWP NIL :KEYP NIL :MIN-ARGS 0 :MAX-ARGS 2 :ENTRY-POINTS ((NIL . #) (NIL . #) #" . "#<...>") "#<...>" . "#<...>"))) :KIND :ZOMBIE :TYPE # :WHERE-FROM :DEFINED :VARS (ARRAY SB-INT:INDEX) {A955DE9}>) :MORE-ENTRY #" . "#<...>") "#<...>" . "#<...>"))) :KIND :DELETED :TYPE # :WHERE-FROM :DEFINED :VARS (ARRAY SB-INT:INDEX #:N-CONTEXT-5 #:N-COUNT-6) {A9567E9}> :MAIN-ENTRY #" . "#<...>") "#<...>" . "#<...>"))) :KIND :ZOMBIE :TYPE # :WHERE-FROM :DEFINED :VARS (ARRAY SB-INT:INDEX #:G4) {A955109}> {A954FA9}>) 82> known combination v79 v81 83> 84: SB-KERNEL:DATA-VECTOR-REF {GLOBAL-FUNCTION} 85> 86: '3 87> 88: known combination v84 v77 v86 89> 90: '# 91> 92: known combination v69 v88 v90 93> if v92 c52 c31 end stack: successors c52 c31 IR1 block 5 start c52 start stack: 52> 94: #:G1 95> 96: set *PACKAGE* {SPECIAL} v94 97> return v96 SB-C::CLAMBDA NIL end stack: successors c98 IR1 block 6 start c31 start stack: 31> 99: SB-C::%TYPE-CHECK-ERROR {GLOBAL-FUNCTION} 100>101: #:G1 102>103: 'PACKAGE 104> known combination v99 v101 v103 end stack: successors c98 ;;;; IR2 component: NIL entries: L1: NIL TNs: 10 local, 3 temps, 9 constant, 5 env, 0 comp, 6 global. Wired: 21, Unused: 0. 7 blocks, 30 global conflicts. IR1 block 9 start c98 IR2 block NIL start c98 IR1 block 0 start c1 IR2 block 6 start c1 0: XEP-ALLOCATE-FRAME {# NIL} 1: SETUP-ENVIRONMENT {#} 2: MOVE t1[ECX] => #:G0!2[ECX] 3: MOVE t3[S0]>t4[EAX] => t5[S0]t8[EAX] => t9[S1]t11[EAX] => t12[S0]t14[EAX] => t15[S1]t17[EAX] => t18[S1] t20[EBX] 3: MOVE-ARG '"HELLO-TWO"!21[Const6]>t22[EDX] t20[EBX] => t23[EDX] 4: CALL-NAMED t20[EBX] t24[Const7]>t25[EAX] t23[EDX] {# 1 1 NIL} => t26[EDX] 5: MOVE t26[EDX] => t27[EDX] 6: %INSTANCEP t27[EDX] {# T} IR1 block 2 start c30 IR2 block 4 start c30 0: INSTANCE-INDEX-REF t27[EDX] '0!28 => t29[EAX] 1: IF-EQ t29[EAX] '#!30[Const8]>t31[ECX] {# NIL} IR1 block 3 start c53 IR2 block 3 start c53 0: INSTANCE-INDEX-REF t29[EAX] '12!32 => t33[ECX] 1: FAST-IF->-C/FIXNUM t33[ECX] {# T 3} IR1 block 4 start c68 IR2 block 2 start c68 0: INSTANCE-INDEX-REF t29[EAX] '11!34 => t35[EAX] 1: DATA-VECTOR-REF/SIMPLE-VECTOR t35[EAX] '3!36 => t37[EAX] 2: IF-EQ t37[EAX] '#!30[Const8]>t38[ECX] {# T} IR1 block 5 start c52 IR2 block 1 start c52 L2: 0: SET '*PACKAGE*!39[Const9]>t40[EAX] t27[EDX] 1: MOVE t27[EDX] => t41[EDX] 2: RETURN-SINGLE t12[S0] t18[S1] t41[EDX] IR1 block 6 start c31 IR2 block 0 start c31 L3: 0: TYPE-CHECK-ERROR t27[EDX] 'PACKAGE!42[Const10]>t43[EAX] IR1 block 1 start c98 IR2 block NIL start c98 assembly code for # in the elsewhere segment: L4: in the regular segment: L5: in the elsewhere segment: L6: in the regular segment: VOP XEP-ALLOCATE-FRAME {# NIL} .align 3 L7: L1: SIMPLE-FUN-HEADER-WORD DWORD 0 DWORD 0 DWORD 0 DWORD 0 DWORD 0 DWORD 0 POP DWORD PTR [EBP-8] LEA #, DWORD PTR [EBP-32] L8: VOP NOTE-ENVIRONMENT-START {#} L9: in the elsewhere segment: VOP VERIFY-ARG-COUNT #:G0!2[ECX] {0} L10: INT 3 L11: BYTE 10 BYTE 2 BYTE 24 BYTE 77 in the regular segment: TEST #, # JMP NE, L10 L12: in the elsewhere segment: L13: in the regular segment: VOP NOTE-ENVIRONMENT-START {#} L14: VOP ALLOCATE-FULL-CALL-FRAME {1} => t20[EBX] MOV #, # SUB #, 12 VOP MOVE-ARG '"HELLO-TWO"!21[Const6]>t22[EDX] t20[EBX] => t23[EDX] MOV #, # VOP CALL-NAMED t20[EBX] t24[Const7]>t25[EAX] t23[EDX] {# 1 1 NIL} => t26[EDX] MOV #, # L15: MOV #, 4 MOV DWORD PTR [EBX-4], # MOV #, # L16: L17: CALL DWORD PTR [EAX+5] L18: JMP NC, L19 MOV #, # L19: L20: VOP %INSTANCEP t27[EDX] {# T} MOV #, # AND #, 7 CMP #, 1 JMP NE, L3 L21: VOP INSTANCE-INDEX-REF t27[EDX] '0!28 => t29[EAX] MOV #, DWORD PTR [EDX+3] VOP IF-EQ t29[EAX] '#!30[Const8]>t31[ECX] {# NIL} CMP #, #!30[Const8]> JMP E, L2 L22: VOP INSTANCE-INDEX-REF t29[EAX] '12!32 => t33[ECX] MOV #, DWORD PTR [EAX+51] VOP FAST-IF->-C/FIXNUM t33[ECX] {# T 3} CMP #, 12 JMP LE, L3 L23: VOP INSTANCE-INDEX-REF t29[EAX] '11!34 => t35[EAX] MOV #, DWORD PTR [EAX+47] VOP DATA-VECTOR-REF/SIMPLE-VECTOR t35[EAX] '3!36 => t37[EAX] MOV #, DWORD PTR [EAX+13] VOP IF-EQ t37[EAX] '#!30[Const8]>t38[ECX] {# T} CMP #, #!30[Const8]> JMP NE, L3 L2: VOP SET '*PACKAGE*!39[Const9]>t40[EAX] t27[EDX] MOV #, # MOV DWORD PTR [EAX-3], # VOP RETURN-SINGLE t12[S0] t18[S1] t41[EDX] L24: LEA #, DWORD PTR [EBP-8] CLC MOV #, # RET 4 L3: VOP TYPE-CHECK-ERROR t27[EDX] 'PACKAGE!42[Const10]>t43[EAX] MOV #, # INT 3 L25: BYTE 10 BYTE 3 BYTE 31 BYTE 142 BYTE 14 .align 3 disassembly of code for # ; 00000000: 2A0C00 SUB CL, [EAX+EAX] ; 03: 0000 ADD [EAX], AL ; 05: 0000 ADD [EAX], AL ; 07: 0000 ADD [EAX], AL ; 09: 0000 ADD [EAX], AL ; 0B: 0000 ADD [EAX], AL ; 0D: 0000 ADD [EAX], AL ; 0F: 0000 ADD [EAX], AL ; 11: 0000 ADD [EAX], AL ; 13: 0000 ADD [EAX], AL ; 15: 0000 ADD [EAX], AL ; 17: 0000 ADD [EAX], AL ; 19: 0000 ADD [EAX], AL ; 1B: 008F45F88D65 ADD [EDI+1703802949], CL ; 21: E085 LOOPNZ #x-58 ; 23: C9 LEAVE ; 24: 756A JNE L3 ; 26: 8BDC MOV EBX, ESP ; 28: 83EC0C SUB ESP, 12 ; 2B: 8B1511000000 MOV EDX, [#x11] ; 31: 8B0515000000 MOV EAX, [#x15] ; 37: B904000000 MOV ECX, 4 ; 3C: 896BFC MOV [EBX-4], EBP ; 3F: 8BEB MOV EBP, EBX ; 41: FF5005 CALL DWORD PTR [EAX+5] ; 44: 7302 JNB L0 ; 46: 8BE3 MOV ESP, EBX ; 48: L0: 8BC2 MOV EAX, EDX ; 4A: 2407 AND AL, 7 ; 4C: 3C01 CMP AL, 1 ; 4E: 7534 JNE L2 ; 50: 8B4203 MOV EAX, [EDX+3] ; 53: 3B0519000000 CMP EAX, [#x19] ; 59: 7416 JEQ L1 ; 5B: 8B4833 MOV ECX, [EAX+51] ; 5E: 83F90C CMP ECX, 12 ; 61: 7E21 JLE L2 ; 63: 8B402F MOV EAX, [EAX+47] ; 66: 8B400D MOV EAX, [EAX+13] ; 69: 3B0519000000 CMP EAX, [#x19] ; 6F: 7513 JNE L2 ; 71: L1: 8B051D000000 MOV EAX, [#x1D] ; 77: 8950FD MOV [EAX-3], EDX ; 7A: 8D65F8 LEA ESP, [EBP-8] ; 7D: F8 CLC ; 7E: 8B6DFC MOV EBP, [EBP-4] ; 81: C20400 RET 4 ; 84: L2: 8B0521000000 MOV EAX, [#x21] ; 8A: CC0A BREAK 10 ; error trap ; 8C: 03 BYTE #X03 ; 8D: 1F BYTE #X1F ; OBJECT-NOT-TYPE-ERROR ; 8E: 8E BYTE #X8E ; EDX ; 8F: 0E BYTE #X0E ; EAX ; 90: L3: CC0A BREAK 10 ; error trap ; 92: 02 BYTE #X02 ; 93: 18 BYTE #X18 ; INVALID-ARG-COUNT-ERROR ; 94: 4D BYTE #X4D ; ECX ;;;; component: ENDPAINT IR1 block 77 start c1 start stack: 1> bind SB-C::CLAMBDA (FLET #:CLEANUP-FUN-8) :KIND :CLEANUP end stack: successors c2 IR1 block 78 start c2 start stack: 2> entry NIL 3> 4: WINDOW-HWND {GLOBAL-FUNCTION} 5> 6: WINDOW 7> 8: full combination v4 v6 end stack: successors c9 IR1 block 79 start c9 start stack: 9> entry NIL 10> 11: SB-C::CLAMBDA (SB-C::LAMBDA-INLINED ALIEN-FUNCALL) 12> 13: SB-SYS:FOREIGN-SYMBOL-SAP {GLOBAL-FUNCTION} 14> 15: '"EndPaint" 16> 17: known combination v13 v15 18> local combination v11 v8 19> bind SB-C::CLAMBDA (SB-C::LAMBDA-INLINED ALIEN-FUNCALL) :KIND :LET 20> 21: SB-C:%ALIEN-FUNCALL {GLOBAL-FUNCTION} 22> 23: '# 24> 25: SB-C::CLAMBDA (SB-C::LAMBDA-INLINED SB-ALIEN-INTERNALS:DEPORT) 26> 27: #:G48 28> if v27 c29 c30 end stack: successors c30 c29 IR1 block 88 start c29 start stack: 29> 31: SB-SYS:SYSTEM-AREA-POINTER-P {GLOBAL-FUNCTION} 32> 33: #:G48 34> 35: known combination v31 v33 36> if v35 c30 c37 end stack: successors c30 c37 IR1 block 89 start c37 start stack: 37> 38: SB-KERNEL:%TYPEP {GLOBAL-FUNCTION} 39> 40: #:G48 41> 42: '(ALIEN (* (SIGNED 8))) 43> 44: known combination v38 v40 v42 45> if v44 c30 c46 end stack: successors c46 c30 IR1 block 90 start c46 start stack: 46> 47: SB-C::%TYPE-CHECK-ERROR {GLOBAL-FUNCTION} 48> 49: #:G48 50> 51: '(OR NULL SYSTEM-AREA-POINTER (ALIEN (* (SIGNED 8)))) 52> known combination v47 v49 v51 end stack: successors c53 IR1 block 80 start c30 start stack: 30> 54: #:G48 55> 56: cast v54 -[# -> #] 57> local combination v25 v56 58> bind SB-C::CLAMBDA (SB-C::LAMBDA-INLINED SB-ALIEN-INTERNALS:DEPORT) :KIND :LET 59> 60: SB-ALIEN::VALUE 61> if v60 c62 c63 end stack: successors c62 c63 IR1 block 87 start c63 start stack: 63> 64: SB-SYS:INT-SAP {GLOBAL-FUNCTION} 65> 66: '0 67> 68: known combination v64 v66 end stack: successors c69 IR1 block 81 start c62 start stack: 62> 70: SB-SYS:SYSTEM-AREA-POINTER-P {GLOBAL-FUNCTION} 71> 72: SB-ALIEN::VALUE 73> 74: known combination v70 v72 75> if v74 c76 c77 end stack: successors c76 c77 IR1 block 86 start c77 start stack: 77> 78: ALIEN-SAP {GLOBAL-FUNCTION} 79> 80: SB-ALIEN::VALUE 81> 68: known combination v78 v80 end stack: successors c69 IR1 block 82 start c76 start stack: 76> 68: SB-ALIEN::VALUE end stack: successors c69 IR1 block 83 start c69 start stack: 69> 82: #:G7 83> known combination v21 v17 v23 v68 v82 end stack: successors c84 IR1 block 84 start c84 start stack: 84> 85: 'NIL end stack: successors c86 IR1 block 85 start c86 start stack: 86> return v85 SB-C::CLAMBDA (FLET #:CLEANUP-FUN-8) end stack: successors c53 IR1 block 0 start c87 start stack: 87> bind SB-C::CLAMBDA (SB-C::TL-XEP NIL) :KIND :EXTERNAL 88> 89: SB-C::%VERIFY-ARG-COUNT {GLOBAL-FUNCTION} 90> 91: #:G17 92> 93: '6 94> known combination v89 v91 v93 95> 96: SB-C::CLAMBDA (SB-PCL::FAST-METHOD HANDLE-WINDOW-MESSAGE (HELLO-WINDOW (EQL WM_PAINT) T T)) 97> 98: #:G20 99> tail local combination v96 v98 end stack: successors c100 IR1 block 1 start c100 start stack: 100> bind SB-C::CLAMBDA (SB-PCL::FAST-METHOD HANDLE-WINDOW-MESSAGE (HELLO-WINDOW (EQL WM_PAINT) T T)) end stack: successors c101 IR1 block 2 start c101 start stack: 101> entry NIL 102>103: SB-C::CLAMBDA (LET ((#:G5 (SB-ALIEN-INTERNALS:MAKE-LOCAL-ALIEN "#<...>" . "#<...>"))) ) 104>105: SB-C::%%PRIMITIVE {GLOBAL-FUNCTION} 106>107: '# 108>109: '(16) 110>111: known combination v105 v107 v109 112> local combination v103 v111 113> bind SB-C::CLAMBDA (LET ((#:G5 (SB-ALIEN-INTERNALS:MAKE-LOCAL-ALIEN "#<...>" . "#<...>"))) ) :KIND :LET 114>115: SB-C::CLAMBDA (LET ((#:G7 (SB-ALIEN-INTERNALS:MAKE-LOCAL-ALIEN "#<...>" . "#<...>"))) ) 116>117: SB-C::%%PRIMITIVE {GLOBAL-FUNCTION} 118>119: '# 120>121: '(64) 122>123: known combination v117 v119 v121 124> local combination v115 v123 125> bind SB-C::CLAMBDA (LET ((#:G7 (SB-ALIEN-INTERNALS:MAKE-LOCAL-ALIEN "#<...>" . "#<...>"))) ) :KIND :LET 126>127: SB-C::CLAMBDA (LET ((HDC (BEGINPAINT "#<...>" . "#<...>"))) ) 128>129: WINDOW-HWND {GLOBAL-FUNCTION} 130>131: WINDOW 132>133: full combination v129 v131 end stack: successors c134 IR1 block 3 start c134 start stack: 134> entry NIL 135>136: SB-C::CLAMBDA (SB-C::LAMBDA-INLINED ALIEN-FUNCALL) 137>138: SB-SYS:FOREIGN-SYMBOL-SAP {GLOBAL-FUNCTION} 139>140: '"BeginPaint" 141>142: known combination v138 v140 143> local combination v136 v133 144> bind SB-C::CLAMBDA (SB-C::LAMBDA-INLINED ALIEN-FUNCALL) :KIND :LET 145>146: SB-C:%ALIEN-FUNCALL {GLOBAL-FUNCTION} 147>148: '# 149>150: SB-C::CLAMBDA (SB-C::LAMBDA-INLINED SB-ALIEN-INTERNALS:DEPORT) 151>152: #:G24 153> if v152 c154 c155 end stack: successors c155 c154 IR1 block 72 start c154 start stack: 154>156: SB-SYS:SYSTEM-AREA-POINTER-P {GLOBAL-FUNCTION} 157>158: #:G24 159>160: known combination v156 v158 161> if v160 c155 c162 end stack: successors c155 c162 IR1 block 73 start c162 start stack: 162>163: SB-KERNEL:%TYPEP {GLOBAL-FUNCTION} 164>165: #:G24 166>167: '(ALIEN (* (SIGNED 8))) 168>169: known combination v163 v165 v167 170> if v169 c155 c171 end stack: successors c171 c155 IR1 block 74 start c171 start stack: 171>172: SB-C::%TYPE-CHECK-ERROR {GLOBAL-FUNCTION} 173>174: #:G24 175>176: '(OR NULL SYSTEM-AREA-POINTER (ALIEN (* (SIGNED 8)))) 177> known combination v172 v174 v176 end stack: successors c53 IR1 block 4 start c155 start stack: 155>178: #:G24 179>180: cast v178 -[# -> #] 181> local combination v150 v180 182> bind SB-C::CLAMBDA (SB-C::LAMBDA-INLINED SB-ALIEN-INTERNALS:DEPORT) :KIND :LET 183>184: SB-ALIEN::VALUE 185> if v184 c186 c187 end stack: successors c186 c187 IR1 block 71 start c187 start stack: 187>188: SB-SYS:INT-SAP {GLOBAL-FUNCTION} 189>190: '0 191>192: known combination v188 v190 end stack: successors c193 IR1 block 5 start c186 start stack: 186>194: SB-SYS:SYSTEM-AREA-POINTER-P {GLOBAL-FUNCTION} 195>196: SB-ALIEN::VALUE 197>198: known combination v194 v196 199> if v198 c200 c201 end stack: successors c200 c201 IR1 block 70 start c201 start stack: 201>202: ALIEN-SAP {GLOBAL-FUNCTION} 203>204: SB-ALIEN::VALUE 205>192: known combination v202 v204 end stack: successors c193 IR1 block 6 start c200 start stack: 200>192: SB-ALIEN::VALUE end stack: successors c193 IR1 block 7 start c193 start stack: 193>206: #:G7 207>208: known combination v146 v142 v148 v192 v206 209>210: SB-ALIEN-INTERNALS:%SAP-ALIEN {GLOBAL-FUNCTION} 211>212: '# 213>214: known combination v210 v208 v212 end stack: successors c215 IR1 block 8 start c215 start stack: 215> local combination v127 v214 216> bind SB-C::CLAMBDA (LET ((HDC (BEGINPAINT "#<...>" . "#<...>"))) ) :KIND :LET 217>218: SB-C::%ALLOCATE-CLOSURES {GLOBAL-FUNCTION} 219>220: '(# :WHERE-FROM :DEFINED :VARS NIL {AF65799}>) 221> known combination v218 v220 end stack: successors c222 IR1 block 9 start c222 start stack: 222> entry NIL 223>224: SB-C::%ALLOCATE-CLOSURES {GLOBAL-FUNCTION} 225>226: '(# :WHERE-FROM :DEFINED :ARGLIST (# {AF6B8E1}> # {AF6B951}> # {AF6B9C1}> # {AF6BA31}>) :ALLOWP NIL :KEYP NIL :MIN-ARGS 0 :MAX-ARGS 3 :ENTRY-POINTS ((NIL . #) (NIL . #) (NIL . #) #" . "#<...>") "#<...>" . "#<...>"))) :KIND :MV-LET :TYPE # :WHERE-FROM :DEFINED :VARS (#:NEXT11 #:START12 #:COUNT13) {AF6C861}>) :MORE-ENTRY #" . "#<...>") "#<...>" . "#<...>"))) :KIND :DELETED :TYPE # :WHERE-FROM :DEFINED :VARS (#:NEXT11 #:START12 #:COUNT13 #:N-CONTEXT-15 #:N-COUNT-16) {AF6D2F1}> :MAIN-ENTRY #" . "#<...>") "#<...>" . "#<...>"))) :KIND :ZOMBIE :TYPE # :WHERE-FROM :DEFINED :VARS (#:NEXT11 #:START12 #:COUNT13 #:G14) {AF6BC61}> {AF6BAD9}>) 227> known combination v224 v226 228>229: SB-C::CLAMBDA (SB-C::&OPTIONAL-PROCESSOR (LAMBDA (&OPTIONAL ("#<...>" . "#<...>") "#<...>" . "#<...>"))) end stack: successors c230 IR1 block 10 start c230 start stack: 230> entry NIL 231>232: SB-C::%UNWIND-PROTECT {GLOBAL-FUNCTION} 233>234: SB-C::%ALLOCATE-CLOSURES {GLOBAL-FUNCTION} 235>236: '(# :WHERE-FROM :DEFINED :VARS NIL {AF6E8B1}>) 237> known combination v234 v236 238>239: '# :TARGET # :INFO # :DYNAMIC-STATE (# # #)> {B2855C1}> 242>243: SB-C::CLAMBDA (FLET #:CLEANUP-FUN-8) 244> known combination v232 v239 v243 245>246: SB-C::%CLEANUP-POINT {GLOBAL-FUNCTION} 247> known combination v246 248>249: WINDOW-HWND {GLOBAL-FUNCTION} 250>251: WINDOW 252>253: full combination v249 v251 end stack: successors c254 IR1 block 11 start c254 start stack: 254> entry NIL 255>256: SB-C::CLAMBDA (SB-C::LAMBDA-INLINED ALIEN-FUNCALL) 257>258: SB-SYS:FOREIGN-SYMBOL-SAP {GLOBAL-FUNCTION} 259>260: '"GetClientRect" 261>262: known combination v258 v260 263> local combination v256 v253 264> bind SB-C::CLAMBDA (SB-C::LAMBDA-INLINED ALIEN-FUNCALL) :KIND :LET 265>266: SB-C:%ALIEN-FUNCALL {GLOBAL-FUNCTION} 267>268: '# 269>270: SB-C::CLAMBDA (SB-C::LAMBDA-INLINED SB-ALIEN-INTERNALS:DEPORT) 271>272: #:G36 273> if v272 c274 c275 end stack: successors c275 c274 IR1 block 67 start c274 start stack: 274>276: SB-SYS:SYSTEM-AREA-POINTER-P {GLOBAL-FUNCTION} 277>278: #:G36 279>280: known combination v276 v278 281> if v280 c275 c282 end stack: successors c275 c282 IR1 block 68 start c282 start stack: 282>283: SB-KERNEL:%TYPEP {GLOBAL-FUNCTION} 284>285: #:G36 286>287: '(ALIEN (* (SIGNED 8))) 288>289: known combination v283 v285 v287 290> if v289 c275 c291 end stack: successors c291 c275 IR1 block 69 start c291 start stack: 291>292: SB-C::%TYPE-CHECK-ERROR {GLOBAL-FUNCTION} 293>294: #:G36 295>296: '(OR NULL SYSTEM-AREA-POINTER (ALIEN (* (SIGNED 8)))) 297> known combination v292 v294 v296 end stack: successors c53 IR1 block 12 start c275 start stack: 275>298: #:G36 299>300: cast v298 -[# -> #] 301> local combination v270 v300 302> bind SB-C::CLAMBDA (SB-C::LAMBDA-INLINED SB-ALIEN-INTERNALS:DEPORT) :KIND :LET 303>304: SB-ALIEN::VALUE 305> if v304 c306 c307 end stack: successors c306 c307 IR1 block 66 start c307 start stack: 307>308: SB-SYS:INT-SAP {GLOBAL-FUNCTION} 309>310: '0 311>312: known combination v308 v310 end stack: successors c313 IR1 block 13 start c306 start stack: 306>314: SB-SYS:SYSTEM-AREA-POINTER-P {GLOBAL-FUNCTION} 315>316: SB-ALIEN::VALUE 317>318: known combination v314 v316 319> if v318 c320 c321 end stack: successors c320 c321 IR1 block 65 start c321 start stack: 321>322: ALIEN-SAP {GLOBAL-FUNCTION} 323>324: SB-ALIEN::VALUE 325>312: known combination v322 v324 end stack: successors c313 IR1 block 14 start c320 start stack: 320>312: SB-ALIEN::VALUE end stack: successors c313 IR1 block 15 start c313 start stack: 313>326: #:G5 327> known combination v266 v262 v268 v312 v326 end stack: successors c328 IR1 block 16 start c328 start stack: 328> entry NIL 329>330: SB-SYS:FOREIGN-SYMBOL-SAP {GLOBAL-FUNCTION} 331>332: '"DrawTextA" 333>334: known combination v330 v332 335>336: SB-C:%ALIEN-FUNCALL {GLOBAL-FUNCTION} 337>338: '# 339>340: ALIEN-SAP {GLOBAL-FUNCTION} 341>342: HDC 343>344: known combination v340 v342 345>346: SB-SYS:VECTOR-SAP {GLOBAL-FUNCTION} 347>348: SB-ALIEN::STRING-TO-C-STRING {GLOBAL-FUNCTION} 349>350: '"Hello Lisp World!" 351>352: SB-ALIEN::C-STRING-EXTERNAL-FORMAT {GLOBAL-FUNCTION} 353>354: '# 355>356: full combination v352 v354 357>358: full combination v348 v350 v356 359>360: SB-C::CLAMBDA (LET ((#:G67 (QUOTE "#<...>" . "#<...>"))) ) 361> local combination v360 v358 362> bind SB-C::CLAMBDA (LET ((#:G67 (QUOTE "#<...>" . "#<...>"))) ) :KIND :LET 363>364: SB-KERNEL:SIMPLE-ARRAY-NIL-P {GLOBAL-FUNCTION} 365>366: #:G67 367>368: known combination v364 v366 369> if v368 c370 c371 end stack: successors c370 c371 IR1 block 44 start c371 start stack: 371>372: SB-KERNEL:SIMPLE-BASE-STRING-P {GLOBAL-FUNCTION} 373>374: #:G67 375>376: known combination v372 v374 377> if v376 c370 c378 end stack: successors c370 c378 IR1 block 45 start c378 start stack: 378>379: SB-KERNEL:SIMPLE-CHARACTER-STRING-P {GLOBAL-FUNCTION} 380>381: #:G67 382>383: known combination v379 v381 384> if v383 c370 c385 end stack: successors c370 c385 IR1 block 46 start c385 start stack: 385>386: SB-KERNEL:SIMPLE-ARRAY-SINGLE-FLOAT-P {GLOBAL-FUNCTION} 387>388: #:G67 389>390: known combination v386 v388 391> if v390 c370 c392 end stack: successors c370 c392 IR1 block 47 start c392 start stack: 392>393: SB-KERNEL:SIMPLE-ARRAY-DOUBLE-FLOAT-P {GLOBAL-FUNCTION} 394>395: #:G67 396>397: known combination v393 v395 398> if v397 c370 c399 end stack: successors c370 c399 IR1 block 48 start c399 start stack: 399>400: SIMPLE-BIT-VECTOR-P {GLOBAL-FUNCTION} 401>402: #:G67 403>404: known combination v400 v402 405> if v404 c370 c406 end stack: successors c370 c406 IR1 block 49 start c406 start stack: 406>407: SB-KERNEL:SIMPLE-ARRAY-UNSIGNED-BYTE-2-P {GLOBAL-FUNCTION} 408>409: #:G67 410>411: known combination v407 v409 412> if v411 c370 c413 end stack: successors c370 c413 IR1 block 50 start c413 start stack: 413>414: SB-KERNEL:SIMPLE-ARRAY-UNSIGNED-BYTE-4-P {GLOBAL-FUNCTION} 415>416: #:G67 417>418: known combination v414 v416 419> if v418 c370 c420 end stack: successors c370 c420 IR1 block 51 start c420 start stack: 420>421: SB-KERNEL:SIMPLE-ARRAY-UNSIGNED-BYTE-7-P {GLOBAL-FUNCTION} 422>423: #:G67 424>425: known combination v421 v423 426> if v425 c370 c427 end stack: successors c370 c427 IR1 block 52 start c427 start stack: 427>428: SB-KERNEL:SIMPLE-ARRAY-UNSIGNED-BYTE-8-P {GLOBAL-FUNCTION} 429>430: #:G67 431>432: known combination v428 v430 433> if v432 c370 c434 end stack: successors c370 c434 IR1 block 53 start c434 start stack: 434>435: SB-KERNEL:SIMPLE-ARRAY-UNSIGNED-BYTE-15-P {GLOBAL-FUNCTION} 436>437: #:G67 438>439: known combination v435 v437 440> if v439 c370 c441 end stack: successors c370 c441 IR1 block 54 start c441 start stack: 441>442: SB-KERNEL:SIMPLE-ARRAY-UNSIGNED-BYTE-16-P {GLOBAL-FUNCTION} 443>444: #:G67 445>446: known combination v442 v444 447> if v446 c370 c448 end stack: successors c370 c448 IR1 block 55 start c448 start stack: 448>449: SB-KERNEL:SIMPLE-ARRAY-UNSIGNED-BYTE-29-P {GLOBAL-FUNCTION} 450>451: #:G67 452>453: known combination v449 v451 454> if v453 c370 c455 end stack: successors c370 c455 IR1 block 56 start c455 start stack: 455>456: SB-KERNEL:SIMPLE-ARRAY-UNSIGNED-BYTE-31-P {GLOBAL-FUNCTION} 457>458: #:G67 459>460: known combination v456 v458 461> if v460 c370 c462 end stack: successors c370 c462 IR1 block 57 start c462 start stack: 462>463: SB-KERNEL:SIMPLE-ARRAY-UNSIGNED-BYTE-32-P {GLOBAL-FUNCTION} 464>465: #:G67 466>467: known combination v463 v465 468> if v467 c370 c469 end stack: successors c370 c469 IR1 block 58 start c469 start stack: 469>470: SB-KERNEL:SIMPLE-ARRAY-SIGNED-BYTE-8-P {GLOBAL-FUNCTION} 471>472: #:G67 473>474: known combination v470 v472 475> if v474 c370 c476 end stack: successors c370 c476 IR1 block 59 start c476 start stack: 476>477: SB-KERNEL:SIMPLE-ARRAY-SIGNED-BYTE-16-P {GLOBAL-FUNCTION} 478>479: #:G67 480>481: known combination v477 v479 482> if v481 c370 c483 end stack: successors c370 c483 IR1 block 60 start c483 start stack: 483>484: SB-KERNEL:SIMPLE-ARRAY-SIGNED-BYTE-30-P {GLOBAL-FUNCTION} 485>486: #:G67 487>488: known combination v484 v486 489> if v488 c370 c490 end stack: successors c370 c490 IR1 block 61 start c490 start stack: 490>491: SB-KERNEL:SIMPLE-ARRAY-SIGNED-BYTE-32-P {GLOBAL-FUNCTION} 492>493: #:G67 494>495: known combination v491 v493 496> if v495 c370 c497 end stack: successors c370 c497 IR1 block 62 start c497 start stack: 497>498: SB-KERNEL:SIMPLE-ARRAY-COMPLEX-SINGLE-FLOAT-P {GLOBAL-FUNCTION} 499>500: #:G67 501>502: known combination v498 v500 503> if v502 c370 c504 end stack: successors c370 c504 IR1 block 63 start c504 start stack: 504>505: SB-KERNEL:SIMPLE-ARRAY-COMPLEX-DOUBLE-FLOAT-P {GLOBAL-FUNCTION} 506>507: #:G67 508>509: known combination v505 v507 510> if v509 c370 c511 end stack: successors c370 c511 IR1 block 64 start c511 start stack: 511>512: SB-C::%TYPE-CHECK-ERROR {GLOBAL-FUNCTION} 513>514: #:G67 515>516: '(OR (SIMPLE-ARRAY NIL (*)) SIMPLE-BASE-STRING (SIMPLE-ARRAY CHARACTER (*)) (SIMPLE-ARRAY SINGLE-FLOAT (*)) (SIMPLE-ARRAY DOUBLE-FLOAT (*)) SIMPLE-BIT-VECTOR (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 29) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)) (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)) (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)) (SIMPLE-ARRAY FIXNUM (*)) (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)) (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) (*)) (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) (*))) 517> known combination v512 v514 v516 end stack: successors c53 IR1 block 17 start c370 start stack: 370>518: #:G67 519>520: cast v518 -[# -> #] 521>522: known combination v346 v520 523>524: '-1 525>526: #:G5 527>528: '37 529> known combination v336 v334 v338 v344 v522 v524 v526 v528 end stack: successors c530 IR1 block 18 start c530 start stack: 530> entry NIL 531>532: SB-SYS:FOREIGN-SYMBOL-SAP {GLOBAL-FUNCTION} 533>534: '"DrawTextA" 535>536: known combination v532 v534 537>538: SB-C:%ALIEN-FUNCALL {GLOBAL-FUNCTION} 539>540: '# 541>542: ALIEN-SAP {GLOBAL-FUNCTION} 543>544: HDC 545>546: known combination v542 v544 547>548: SB-SYS:VECTOR-SAP {GLOBAL-FUNCTION} 549>550: SB-ALIEN::STRING-TO-C-STRING {GLOBAL-FUNCTION} 551>552: '"Hello Lisp World!" 553>554: SB-ALIEN::C-STRING-EXTERNAL-FORMAT {GLOBAL-FUNCTION} 555>556: '# 557>558: full combination v554 v556 559>560: full combination v550 v552 v558 561>562: SB-C::CLAMBDA (LET ((#:G90 (QUOTE "#<...>" . "#<...>"))) ) 563> local combination v562 v560 564> bind SB-C::CLAMBDA (LET ((#:G90 (QUOTE "#<...>" . "#<...>"))) ) :KIND :LET 565>566: SB-KERNEL:SIMPLE-ARRAY-NIL-P {GLOBAL-FUNCTION} 567>568: #:G90 569>570: known combination v566 v568 571> if v570 c572 c573 end stack: successors c572 c573 IR1 block 23 start c573 start stack: 573>574: SB-KERNEL:SIMPLE-BASE-STRING-P {GLOBAL-FUNCTION} 575>576: #:G90 577>578: known combination v574 v576 579> if v578 c572 c580 end stack: successors c572 c580 IR1 block 24 start c580 start stack: 580>581: SB-KERNEL:SIMPLE-CHARACTER-STRING-P {GLOBAL-FUNCTION} 582>583: #:G90 584>585: known combination v581 v583 586> if v585 c572 c587 end stack: successors c572 c587 IR1 block 25 start c587 start stack: 587>588: SB-KERNEL:SIMPLE-ARRAY-SINGLE-FLOAT-P {GLOBAL-FUNCTION} 589>590: #:G90 591>592: known combination v588 v590 593> if v592 c572 c594 end stack: successors c572 c594 IR1 block 26 start c594 start stack: 594>595: SB-KERNEL:SIMPLE-ARRAY-DOUBLE-FLOAT-P {GLOBAL-FUNCTION} 596>597: #:G90 598>599: known combination v595 v597 600> if v599 c572 c601 end stack: successors c572 c601 IR1 block 27 start c601 start stack: 601>602: SIMPLE-BIT-VECTOR-P {GLOBAL-FUNCTION} 603>604: #:G90 605>606: known combination v602 v604 607> if v606 c572 c608 end stack: successors c572 c608 IR1 block 28 start c608 start stack: 608>609: SB-KERNEL:SIMPLE-ARRAY-UNSIGNED-BYTE-2-P {GLOBAL-FUNCTION} 610>611: #:G90 612>613: known combination v609 v611 614> if v613 c572 c615 end stack: successors c572 c615 IR1 block 29 start c615 start stack: 615>616: SB-KERNEL:SIMPLE-ARRAY-UNSIGNED-BYTE-4-P {GLOBAL-FUNCTION} 617>618: #:G90 619>620: known combination v616 v618 621> if v620 c572 c622 end stack: successors c572 c622 IR1 block 30 start c622 start stack: 622>623: SB-KERNEL:SIMPLE-ARRAY-UNSIGNED-BYTE-7-P {GLOBAL-FUNCTION} 624>625: #:G90 626>627: known combination v623 v625 628> if v627 c572 c629 end stack: successors c572 c629 IR1 block 31 start c629 start stack: 629>630: SB-KERNEL:SIMPLE-ARRAY-UNSIGNED-BYTE-8-P {GLOBAL-FUNCTION} 631>632: #:G90 633>634: known combination v630 v632 635> if v634 c572 c636 end stack: successors c572 c636 IR1 block 32 start c636 start stack: 636>637: SB-KERNEL:SIMPLE-ARRAY-UNSIGNED-BYTE-15-P {GLOBAL-FUNCTION} 638>639: #:G90 640>641: known combination v637 v639 642> if v641 c572 c643 end stack: successors c572 c643 IR1 block 33 start c643 start stack: 643>644: SB-KERNEL:SIMPLE-ARRAY-UNSIGNED-BYTE-16-P {GLOBAL-FUNCTION} 645>646: #:G90 647>648: known combination v644 v646 649> if v648 c572 c650 end stack: successors c572 c650 IR1 block 34 start c650 start stack: 650>651: SB-KERNEL:SIMPLE-ARRAY-UNSIGNED-BYTE-29-P {GLOBAL-FUNCTION} 652>653: #:G90 654>655: known combination v651 v653 656> if v655 c572 c657 end stack: successors c572 c657 IR1 block 35 start c657 start stack: 657>658: SB-KERNEL:SIMPLE-ARRAY-UNSIGNED-BYTE-31-P {GLOBAL-FUNCTION} 659>660: #:G90 661>662: known combination v658 v660 663> if v662 c572 c664 end stack: successors c572 c664 IR1 block 36 start c664 start stack: 664>665: SB-KERNEL:SIMPLE-ARRAY-UNSIGNED-BYTE-32-P {GLOBAL-FUNCTION} 666>667: #:G90 668>669: known combination v665 v667 670> if v669 c572 c671 end stack: successors c572 c671 IR1 block 37 start c671 start stack: 671>672: SB-KERNEL:SIMPLE-ARRAY-SIGNED-BYTE-8-P {GLOBAL-FUNCTION} 673>674: #:G90 675>676: known combination v672 v674 677> if v676 c572 c678 end stack: successors c572 c678 IR1 block 38 start c678 start stack: 678>679: SB-KERNEL:SIMPLE-ARRAY-SIGNED-BYTE-16-P {GLOBAL-FUNCTION} 680>681: #:G90 682>683: known combination v679 v681 684> if v683 c572 c685 end stack: successors c572 c685 IR1 block 39 start c685 start stack: 685>686: SB-KERNEL:SIMPLE-ARRAY-SIGNED-BYTE-30-P {GLOBAL-FUNCTION} 687>688: #:G90 689>690: known combination v686 v688 691> if v690 c572 c692 end stack: successors c572 c692 IR1 block 40 start c692 start stack: 692>693: SB-KERNEL:SIMPLE-ARRAY-SIGNED-BYTE-32-P {GLOBAL-FUNCTION} 694>695: #:G90 696>697: known combination v693 v695 698> if v697 c572 c699 end stack: successors c572 c699 IR1 block 41 start c699 start stack: 699>700: SB-KERNEL:SIMPLE-ARRAY-COMPLEX-SINGLE-FLOAT-P {GLOBAL-FUNCTION} 701>702: #:G90 703>704: known combination v700 v702 705> if v704 c572 c706 end stack: successors c572 c706 IR1 block 42 start c706 start stack: 706>707: SB-KERNEL:SIMPLE-ARRAY-COMPLEX-DOUBLE-FLOAT-P {GLOBAL-FUNCTION} 708>709: #:G90 710>711: known combination v707 v709 712> if v711 c572 c713 end stack: successors c572 c713 IR1 block 43 start c713 start stack: 713>714: SB-C::%TYPE-CHECK-ERROR {GLOBAL-FUNCTION} 715>716: #:G90 717>718: '(OR (SIMPLE-ARRAY NIL (*)) SIMPLE-BASE-STRING (SIMPLE-ARRAY CHARACTER (*)) (SIMPLE-ARRAY SINGLE-FLOAT (*)) (SIMPLE-ARRAY DOUBLE-FLOAT (*)) SIMPLE-BIT-VECTOR (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 29) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)) (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)) (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)) (SIMPLE-ARRAY FIXNUM (*)) (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)) (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) (*)) (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) (*))) 719> known combination v714 v716 v718 end stack: successors c53 IR1 block 19 start c572 start stack: 572>720: #:G90 721>722: cast v720 -[# -> #] 723>724: known combination v548 v722 725>726: '-1 727>728: #:G5 729>730: '37 731> known combination v538 v536 v540 v546 v724 v726 v728 v730 end stack: successors c732 IR1 block 20 start c732 start stack: 732>733: SB-C:%UNWIND-PROTECT-BREAKUP {GLOBAL-FUNCTION} 734> known combination v733 735>736: SB-C::CLAMBDA (FLET #:CLEANUP-FUN-8) 737> local combination v736 end stack: successors c738 IR1 block 21 start c738 start stack: 738>739: SB-C::%%PRIMITIVE {GLOBAL-FUNCTION} 740>741: '# 742>743: '(64) 744> known combination v739 v741 v743 745>746: SB-C::%%PRIMITIVE {GLOBAL-FUNCTION} 747>748: '# 749>750: '(16) 751> known combination v746 v748 v750 752>753: '0 end stack: successors c754 IR1 block 22 start c754 start stack: 754> return v753 SB-C::CLAMBDA (SB-PCL::FAST-METHOD HANDLE-WINDOW-MESSAGE (HELLO-WINDOW (EQL WM_PAINT) T T)) end stack: successors c53 IR1 block 75 start c241 start stack: 241>755: SB-C::%NLX-ENTRY {GLOBAL-FUNCTION} 756>757: '# :TARGET # :INFO # :DYNAMIC-STATE (# # #)> {B2855C1}> 758>759: known combination v755 v757 end stack: successors c240 IR1 block 76 start c240 start stack: 240> local mv-combination v229 v759 760> bind SB-C::CLAMBDA (SB-C::&OPTIONAL-PROCESSOR (LAMBDA (&OPTIONAL ("#<...>" . "#<...>") "#<...>" . "#<...>"))) :KIND :MV-LET 761>762: SB-C::CLAMBDA (FLET #:CLEANUP-FUN-8) 763> local combination v762 764>765: SB-C:%CONTINUE-UNWIND {GLOBAL-FUNCTION} 766>767: #:NEXT11 768>769: #:START12 770>771: #:COUNT13 772> known combination v765 v767 v769 v771 end stack: successors c53 ;;;; IR2 component: ENDPAINT entries: L1: (SB-PCL::FAST-METHOD HANDLE-WINDOW-MESSAGE (HELLO-WINDOW (EQL WM_PAINT) T T)) TNs: 211 local, 106 temps, 34 constant, 15 env, 0 comp, 30 global. Wired: 256, Unused: 0. 91 blocks, 1067 global conflicts. IR1 block 93 start c53 IR2 block NIL start c53 IR1 block 0 start c87 IR2 block 76 start c87 0: XEP-ALLOCATE-FRAME {# NIL} 1: SETUP-ENVIRONMENT {#} 2: MOVE t5[ECX] => #:G17!6[ECX] 3: MOVE t7[ESI] => #:G20!8[ESI] 4: MOVE t9[S0]>t10[EAX] => t11[S0]t14[EAX] => t15[S1] WINDOW!17[S9]t19[EAX] => t20[S0]t22[EAX] => t23[S1]t25[EAX] => t26[S1] t28[S8] t30[S4]t32[EAX] => #:G7!33[S18] t35[EBX] 4: MOVE-ARG WINDOW!17[S9]>t36[EDX] t35[EBX] => t37[EDX] 5: CALL-NAMED t35[EBX] t38[Const6]>t39[EAX] t37[EDX] {# 1 1 NIL} => t40[EDX] 6: MOVE t40[EDX] => t41[EBX] 7: MOVE-OPERAND t41[EBX] {SB-VM::STORE-STACK} => t42[S2] IR1 block 3 start c134 IR2 block 73 start c134 0: FOREIGN-SYMBOL-SAP {"BeginPaint"} => t43[S3] t46[EAX] IR1 block 7 start c193 IR2 block 64 start c193 L3: 0: SET-FPU-WORD-FOR-C 1: CURRENT-STACK-POINTER => t47[S2] 2: ALLOC-NUMBER-STACK-SPACE {8} => t48[ESP] 3: MOVE-SAP-ARG t46[EAX] t48[ESP] => t49[S0] 4: MOVE-SAP-ARG t30[S4]>t50[EAX] t48[ESP] => t51[S1] 5: CALL-OUT t43[S3]>t52[EAX] t49[S0] t51[S1] => t53[EAX] 6: RESET-STACK-POINTER t47[S2]>t54[ECX] 7: SET-FPU-WORD-FOR-LISP 8: SAP-MOVE t53[EAX] => t55[EAX] 9: ALLOCATE-FULL-CALL-FRAME {2} => t56[EBX] 10: MOVE-FROM-SAP t55[EAX] => t57[EDX] 11: MOVE-ARG t57[EDX] t56[EBX] => t58[EDX] 12: MOVE-ARG '#!59[Const7]>t60[EDI] t56[EBX] => t61[EDI] 13: CALL-NAMED t56[EBX] t62[Const8]>t63[EAX] t58[EDX] t61[EDI] {# 2 1 NIL} => t64[EDX] 14: MOVE t64[EDX] => t65[S7] t2[S21] t3[S20] t1[S22] 3: MAKE-UNWIND-BLOCK t70[S10] {#} => t71[ECX] 4: SET-UNWIND-PROTECT t70[S10] 5: ALLOCATE-FULL-CALL-FRAME {1} => t72[EBX] 6: MOVE-ARG WINDOW!17[S9]>t73[EDX] t72[EBX] => t74[EDX] 7: CALL-NAMED t72[EBX] t75[Const6]>t76[EAX] t74[EDX] {# 1 1 NIL} => t77[EDX] 8: MOVE t77[EDX] => t78[EBX] 9: MOVE-OPERAND t78[EBX] {SB-VM::STORE-STACK} => t79[S2] IR1 block 11 start c254 IR2 block 60 start c254 0: FOREIGN-SYMBOL-SAP {"GetClientRect"} => t80[S3] t82[EAX] IR1 block 15 start c313 IR2 block 51 start c313 L5: 0: SET-FPU-WORD-FOR-C 1: CURRENT-STACK-POINTER => t83[S2] 2: ALLOC-NUMBER-STACK-SPACE {8} => t84[ESP] 3: MOVE-SAP-ARG t82[EAX] t84[ESP] => t85[S0] 4: MOVE-SAP-ARG t28[S8]>t86[EAX] t84[ESP] => t87[S1] 5: CALL-OUT t80[S3]>t88[EAX] t85[S0] t87[S1] => t89[EAX] 6: RESET-STACK-POINTER t83[S2]>t90[EAX] 7: SET-FPU-WORD-FOR-LISP IR1 block 16 start c328 IR2 block 50 start c328 0: FOREIGN-SYMBOL-SAP {"DrawTextA"} => t91[S6] t93[EBX] 2: MOVE-ARG t65[S7]>t94[EDX] t93[EBX] => t95[EDX] 3: CALL-NAMED t93[EBX] t96[Const9]>t97[EAX] t95[EDX] {# 1 1 NIL} => t98[EDX] 4: MOVE-TO-SAP t98[EDX] => t99[S2] t101[EBX] 6: MOVE-ARG '#!102[Const10]>t103[EDX] t101[EBX] => t104[EDX] 7: CALL-NAMED t101[EBX] t105[Const11]>t106[EAX] t104[EDX] {# 1 1 NIL} => t107[EDX] 8: MOVE t107[EDX] => t108[EDI] 9: ALLOCATE-FULL-CALL-FRAME {2} => t109[EBX] 10: MOVE-ARG '"Hello Lisp World!"!110[Const12]>t111[EDX] t109[EBX] => t112[EDX] 11: MOVE-ARG t108[EDI] t109[EBX] => t113[EDI] 12: CALL-NAMED t109[EBX] t114[Const13]>t115[EAX] t112[EDX] t113[EDI] {# 2 1 NIL} => t116[EDX] 13: MOVE t116[EDX] => t117[EDX] 14: SIMPLE-ARRAY-NIL-P t117[EDX] {# T} IR1 block 17 start c370 IR2 block 28 start c370 L6: 0: VECTOR-SAP t117[EDX] => t118[EDX] 1: SET-FPU-WORD-FOR-C 2: CURRENT-STACK-POINTER => t119[S5] 3: ALLOC-NUMBER-STACK-SPACE {20} => t120[ESP] 4: MOVE-SAP-ARG t99[S2]>t121[EAX] t120[ESP] => t122[S0] 5: MOVE-SAP-ARG t118[EDX] t120[ESP] => t123[S1] 6: MOVE-WORD-ARG '-1!124>t125[EAX] t120[ESP] => t126[S2] 7: MOVE-SAP-ARG t28[S8]>t127[EAX] t120[ESP] => t128[S3] 8: MOVE-WORD-ARG '37!129>t130[EAX] t120[ESP] => t131[S4] 9: CALL-OUT t91[S6]>t132[EAX] t122[S0] t123[S1] t126[S2] t128[S3] t131[S4] => t133[EAX] 10: RESET-STACK-POINTER t119[S5]>t134[EAX] 11: SET-FPU-WORD-FOR-LISP IR1 block 18 start c530 IR2 block 27 start c530 0: FOREIGN-SYMBOL-SAP {"DrawTextA"} => t135[S6] t137[EBX] 2: MOVE-ARG t65[S7]>t138[EDX] t137[EBX] => t139[EDX] 3: CALL-NAMED t137[EBX] t140[Const9]>t141[EAX] t139[EDX] {# 1 1 NIL} => t142[EDX] 4: MOVE-TO-SAP t142[EDX] => t143[S2] t145[EBX] 6: MOVE-ARG '#!146[Const14]>t147[EDX] t145[EBX] => t148[EDX] 7: CALL-NAMED t145[EBX] t149[Const11]>t150[EAX] t148[EDX] {# 1 1 NIL} => t151[EDX] 8: MOVE t151[EDX] => t152[EDI] 9: ALLOCATE-FULL-CALL-FRAME {2} => t153[EBX] 10: MOVE-ARG '"Hello Lisp World!"!154[Const15]>t155[EDX] t153[EBX] => t156[EDX] 11: MOVE-ARG t152[EDI] t153[EBX] => t157[EDI] 12: CALL-NAMED t153[EBX] t158[Const13]>t159[EAX] t156[EDX] t157[EDI] {# 2 1 NIL} => t160[EDX] 13: MOVE t160[EDX] => t161[EDX] 14: SIMPLE-ARRAY-NIL-P t161[EDX] {# T} IR1 block 19 start c572 IR2 block 5 start c572 L7: 0: VECTOR-SAP t161[EDX] => t162[EDX] 1: SET-FPU-WORD-FOR-C 2: CURRENT-STACK-POINTER => t163[S5] 3: ALLOC-NUMBER-STACK-SPACE {20} => t164[ESP] 4: MOVE-SAP-ARG t143[S2]>t165[EAX] t164[ESP] => t166[S0] 5: MOVE-SAP-ARG t162[EDX] t164[ESP] => t167[S1] 6: MOVE-WORD-ARG '-1!124>t168[EAX] t164[ESP] => t169[S2] 7: MOVE-SAP-ARG t28[S8]>t170[EAX] t164[ESP] => t171[S3] 8: MOVE-WORD-ARG '37!129>t172[EAX] t164[ESP] => t173[S4] 9: CALL-OUT t135[S6]>t174[EAX] t166[S0] t167[S1] t169[S2] t171[S3] t173[S4] => t175[EAX] 10: RESET-STACK-POINTER t163[S5]>t176[EAX] 11: SET-FPU-WORD-FOR-LISP IR1 block 20 start c732 IR2 block 4 start c732 0: UNLINK-UNWIND-PROTECT 1: CURRENT-FP => t177[EDX] 2: ALLOCATE-FRAME {#} => t178[EAX] t179[IGNORE-ME] 3: MOVE-SAP-ARG #:G7!33[S18]>t180[ECX] t178[EAX] => t181[S5] 4: MOVE-ARG WINDOW!17[S9]>t182[ECX] t178[EAX] => t183[ECX] 5: MOVE-ARG t177[EDX] t178[EAX] => t184[S0] 6: KNOWN-CALL-LOCAL t178[EAX] t179[IGNORE-ME] t181[S5] t183[ECX] t184[S0] {# # #} => t185[EAX] IR1 block 21 start c738 IR2 block 3 start c738 0: DEALLOC-ALIEN-STACK-SPACE {64} 1: DEALLOC-ALIEN-STACK-SPACE {16} IR1 block 22 start c754 IR2 block 2 start c754 0: MOVE '0!186 => t187[EDX] 1: RETURN-SINGLE t20[S0] t26[S1] t187[EDX] IR1 block 23 start c573 IR2 block 26 start c573 L8: 0: SIMPLE-BASE-STRING-P t161[EDX] {# NIL} IR1 block 24 start c580 IR2 block 25 start c580 0: SIMPLE-CHARACTER-STRING-P t161[EDX] {# NIL} IR1 block 25 start c587 IR2 block 24 start c587 0: SIMPLE-ARRAY-SINGLE-FLOAT-P t161[EDX] {# NIL} IR1 block 26 start c594 IR2 block 23 start c594 0: SIMPLE-ARRAY-DOUBLE-FLOAT-P t161[EDX] {# NIL} IR1 block 27 start c601 IR2 block 22 start c601 0: SIMPLE-BIT-VECTOR-P t161[EDX] {# NIL} IR1 block 28 start c608 IR2 block 21 start c608 0: SIMPLE-ARRAY-UNSIGNED-BYTE-2-P t161[EDX] {# NIL} IR1 block 29 start c615 IR2 block 20 start c615 0: SIMPLE-ARRAY-UNSIGNED-BYTE-4-P t161[EDX] {# NIL} IR1 block 30 start c622 IR2 block 19 start c622 0: SIMPLE-ARRAY-UNSIGNED-BYTE-7-P t161[EDX] {# NIL} IR1 block 31 start c629 IR2 block 18 start c629 0: SIMPLE-ARRAY-UNSIGNED-BYTE-8-P t161[EDX] {# NIL} IR1 block 32 start c636 IR2 block 17 start c636 0: SIMPLE-ARRAY-UNSIGNED-BYTE-15-P t161[EDX] {# NIL} IR1 block 33 start c643 IR2 block 16 start c643 0: SIMPLE-ARRAY-UNSIGNED-BYTE-16-P t161[EDX] {# NIL} IR1 block 34 start c650 IR2 block 15 start c650 0: SIMPLE-ARRAY-UNSIGNED-BYTE-29-P t161[EDX] {# NIL} IR1 block 35 start c657 IR2 block 14 start c657 0: SIMPLE-ARRAY-UNSIGNED-BYTE-31-P t161[EDX] {# NIL} IR1 block 36 start c664 IR2 block 13 start c664 0: SIMPLE-ARRAY-UNSIGNED-BYTE-32-P t161[EDX] {# NIL} IR1 block 37 start c671 IR2 block 12 start c671 0: SIMPLE-ARRAY-SIGNED-BYTE-8-P t161[EDX] {# NIL} IR1 block 38 start c678 IR2 block 11 start c678 0: SIMPLE-ARRAY-SIGNED-BYTE-16-P t161[EDX] {# NIL} IR1 block 39 start c685 IR2 block 10 start c685 0: SIMPLE-ARRAY-SIGNED-BYTE-30-P t161[EDX] {# NIL} IR1 block 40 start c692 IR2 block 9 start c692 0: SIMPLE-ARRAY-SIGNED-BYTE-32-P t161[EDX] {# NIL} IR1 block 41 start c699 IR2 block 8 start c699 0: SIMPLE-ARRAY-COMPLEX-SINGLE-FLOAT-P t161[EDX] {# NIL} IR1 block 42 start c706 IR2 block 7 start c706 0: SIMPLE-ARRAY-COMPLEX-DOUBLE-FLOAT-P t161[EDX] {# NIL} IR1 block 43 start c713 IR2 block 6 start c713 0: TYPE-CHECK-ERROR t161[EDX] '(OR (SIMPLE-ARRAY NIL (*)) SIMPLE-BASE-STRING (SIMPLE-ARRAY CHARACTER (*)) (SIMPLE-ARRAY SINGLE-FLOAT (*)) (SIMPLE-ARRAY DOUBLE-FLOAT (*)) SIMPLE-BIT-VECTOR (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 29) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)) (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)) (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)) (SIMPLE-ARRAY FIXNUM (*)) (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)) (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) (*)) (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) (*)))!188[Const16]>t189[EAX] IR1 block 44 start c371 IR2 block 49 start c371 L9: 0: SIMPLE-BASE-STRING-P t117[EDX] {# NIL} IR1 block 45 start c378 IR2 block 48 start c378 0: SIMPLE-CHARACTER-STRING-P t117[EDX] {# NIL} IR1 block 46 start c385 IR2 block 47 start c385 0: SIMPLE-ARRAY-SINGLE-FLOAT-P t117[EDX] {# NIL} IR1 block 47 start c392 IR2 block 46 start c392 0: SIMPLE-ARRAY-DOUBLE-FLOAT-P t117[EDX] {# NIL} IR1 block 48 start c399 IR2 block 45 start c399 0: SIMPLE-BIT-VECTOR-P t117[EDX] {# NIL} IR1 block 49 start c406 IR2 block 44 start c406 0: SIMPLE-ARRAY-UNSIGNED-BYTE-2-P t117[EDX] {# NIL} IR1 block 50 start c413 IR2 block 43 start c413 0: SIMPLE-ARRAY-UNSIGNED-BYTE-4-P t117[EDX] {# NIL} IR1 block 51 start c420 IR2 block 42 start c420 0: SIMPLE-ARRAY-UNSIGNED-BYTE-7-P t117[EDX] {# NIL} IR1 block 52 start c427 IR2 block 41 start c427 0: SIMPLE-ARRAY-UNSIGNED-BYTE-8-P t117[EDX] {# NIL} IR1 block 53 start c434 IR2 block 40 start c434 0: SIMPLE-ARRAY-UNSIGNED-BYTE-15-P t117[EDX] {# NIL} IR1 block 54 start c441 IR2 block 39 start c441 0: SIMPLE-ARRAY-UNSIGNED-BYTE-16-P t117[EDX] {# NIL} IR1 block 55 start c448 IR2 block 38 start c448 0: SIMPLE-ARRAY-UNSIGNED-BYTE-29-P t117[EDX] {# NIL} IR1 block 56 start c455 IR2 block 37 start c455 0: SIMPLE-ARRAY-UNSIGNED-BYTE-31-P t117[EDX] {# NIL} IR1 block 57 start c462 IR2 block 36 start c462 0: SIMPLE-ARRAY-UNSIGNED-BYTE-32-P t117[EDX] {# NIL} IR1 block 58 start c469 IR2 block 35 start c469 0: SIMPLE-ARRAY-SIGNED-BYTE-8-P t117[EDX] {# NIL} IR1 block 59 start c476 IR2 block 34 start c476 0: SIMPLE-ARRAY-SIGNED-BYTE-16-P t117[EDX] {# NIL} IR1 block 60 start c483 IR2 block 33 start c483 0: SIMPLE-ARRAY-SIGNED-BYTE-30-P t117[EDX] {# NIL} IR1 block 61 start c490 IR2 block 32 start c490 0: SIMPLE-ARRAY-SIGNED-BYTE-32-P t117[EDX] {# NIL} IR1 block 62 start c497 IR2 block 31 start c497 0: SIMPLE-ARRAY-COMPLEX-SINGLE-FLOAT-P t117[EDX] {# NIL} IR1 block 63 start c504 IR2 block 30 start c504 0: SIMPLE-ARRAY-COMPLEX-DOUBLE-FLOAT-P t117[EDX] {# NIL} IR1 block 64 start c511 IR2 block 29 start c511 0: TYPE-CHECK-ERROR t117[EDX] '(OR (SIMPLE-ARRAY NIL (*)) SIMPLE-BASE-STRING (SIMPLE-ARRAY CHARACTER (*)) (SIMPLE-ARRAY SINGLE-FLOAT (*)) (SIMPLE-ARRAY DOUBLE-FLOAT (*)) SIMPLE-BIT-VECTOR (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 29) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)) (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)) (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)) (SIMPLE-ARRAY FIXNUM (*)) (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)) (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) (*)) (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) (*)))!190[Const17]>t191[EAX] IR1 block 65 start c321 IR2 block 53 start c321 L10: 0: ALLOCATE-FULL-CALL-FRAME {1} => t192[ESI] 1: MOVE-ARG t78[EBX] t192[ESI] => t193[EDX] 2: CALL-NAMED t192[ESI] t194[Const9]>t195[EAX] t193[EDX] {# 1 1 NIL} => t196[EDX] 3: MOVE-TO-SAP t196[EDX] => t82[EAX] 4: BRANCH {#} IR1 block 66 start c307 IR2 block 55 start c307 L11: 0: INT-SAP '0!186>t197[EAX] => t82[EAX] 1: BRANCH {#} IR1 block 67 start c274 IR2 block 59 start c274 L12: 0: SYSTEM-AREA-POINTER-P t78[EBX] {# NIL} IR1 block 68 start c282 IR2 block 58 start c282 0: ALLOCATE-FULL-CALL-FRAME {2} => t198[ESI] 1: MOVE-ARG t78[EBX] t198[ESI] => t199[EDX] 2: MOVE-ARG '(ALIEN (* (SIGNED 8)))!200[Const18]>t201[EDI] t198[ESI] => t202[EDI] 3: CALL-NAMED t198[ESI] t203[Const19]>t204[EAX] t199[EDX] t202[EDI] {# 2 1 NIL} => t205[EDX] 4: MOVE-OPERAND t79[S2] {SB-VM::LOAD-STACK} => t78[EBX] 5: MOVE t205[EDX] => t206[EDX] 6: IF-EQ t206[EDX] 'NIL!45 {# T} IR1 block 69 start c291 IR2 block 57 start c291 0: TYPE-CHECK-ERROR t78[EBX] '(OR NULL SYSTEM-AREA-POINTER (ALIEN (* (SIGNED 8))))!207[Const20]>t208[EAX] IR1 block 70 start c201 IR2 block 66 start c201 L13: 0: ALLOCATE-FULL-CALL-FRAME {1} => t209[ESI] 1: MOVE-ARG t41[EBX] t209[ESI] => t210[EDX] 2: CALL-NAMED t209[ESI] t211[Const9]>t212[EAX] t210[EDX] {# 1 1 NIL} => t213[EDX] 3: MOVE-TO-SAP t213[EDX] => t46[EAX] 4: BRANCH {#} IR1 block 71 start c187 IR2 block 68 start c187 L14: 0: INT-SAP '0!186>t214[EAX] => t46[EAX] 1: BRANCH {#} IR1 block 72 start c154 IR2 block 72 start c154 L15: 0: SYSTEM-AREA-POINTER-P t41[EBX] {# NIL} IR1 block 73 start c162 IR2 block 71 start c162 0: ALLOCATE-FULL-CALL-FRAME {2} => t215[ESI] 1: MOVE-ARG t41[EBX] t215[ESI] => t216[EDX] 2: MOVE-ARG '(ALIEN (* (SIGNED 8)))!217[Const21]>t218[EDI] t215[ESI] => t219[EDI] 3: CALL-NAMED t215[ESI] t220[Const19]>t221[EAX] t216[EDX] t219[EDI] {# 2 1 NIL} => t222[EDX] 4: MOVE-OPERAND t42[S2] {SB-VM::LOAD-STACK} => t41[EBX] 5: MOVE t222[EDX] => t223[EDX] 6: IF-EQ t223[EDX] 'NIL!45 {# T} IR1 block 74 start c171 IR2 block 70 start c171 0: TYPE-CHECK-ERROR t41[EBX] '(OR NULL SYSTEM-AREA-POINTER (ALIEN (* (SIGNED 8))))!224[Const22]>t225[EAX] IR1 block 75 start c241 IR2 block 1 start c241 0: UWP-ENTRY {#} => t226[EDX] t227[EBX] t228[ECX] 1: MOVE t226[EDX] => t229[S2] t231[S3] t233[S4]t235[EAX] t4[S19]>t236[ECX] 5: UNBIND-TO-HERE t2[S21]>t237[EBX] IR1 block 76 start c240 IR2 block 0 start c240 0: CURRENT-FP => t238[EDX] 1: ALLOCATE-FRAME {#} => t239[EAX] t240[IGNORE-ME] 2: MOVE-SAP-ARG #:G7!33[S18]>t241[ECX] t239[EAX] => t181[S5] 3: MOVE-ARG WINDOW!17[S9]>t242[ECX] t239[EAX] => t183[ECX] 4: MOVE-ARG t238[EDX] t239[EAX] => t184[S0] 5: KNOWN-CALL-LOCAL t239[EAX] t240[IGNORE-ME] t181[S5] t183[ECX] t184[S0] {# # #} => t185[EAX] 6: CONTINUE-UNWIND t229[S2]>t243[EAX] t231[S3]>t244[EBX] t233[S4]>t245[ECX] IR1 block 77 start c1 IR2 block 90 start c1 L16: 0: SAP-MOVE t246[S1]>t247[EAX] => t248[S1] t250[EBX] 1: MOVE-ARG t183[ECX] t250[EBX] => t251[EDX] 2: CALL-NAMED t250[EBX] t252[Const6]>t253[EAX] t251[EDX] {# 1 1 NIL} => t254[EDX] 3: MOVE t254[EDX] => t255[EBX] 4: MOVE-OPERAND t255[EBX] {SB-VM::STORE-STACK} => t256[S2] IR1 block 79 start c9 IR2 block 88 start c9 0: FOREIGN-SYMBOL-SAP {"EndPaint"} => t257[S3] t259[EAX] IR1 block 83 start c69 IR2 block 79 start c69 L18: 0: SET-FPU-WORD-FOR-C 1: CURRENT-STACK-POINTER => t260[S2] 2: ALLOC-NUMBER-STACK-SPACE {8} => t261[ESP] 3: MOVE-SAP-ARG t259[EAX] t261[ESP] => t262[S0] 4: MOVE-SAP-ARG t181[S5]>t263[EAX] t261[ESP] => t264[S1] 5: CALL-OUT t257[S3]>t265[EAX] t262[S0] t264[S1] => t266[EAX] 6: RESET-STACK-POINTER t260[S2]>t267[EAX] 7: SET-FPU-WORD-FOR-LISP IR1 block 84 start c84 IR2 block 78 start c84 IR1 block 85 start c86 IR2 block 77 start c86 0: MOVE-ARG 'NIL!268 t184[S0]>t269[EAX] => t185[EAX] 1: KNOWN-RETURN t184[S0] t248[S1] t185[EAX] {#} IR1 block 86 start c77 IR2 block 81 start c77 L19: 0: ALLOCATE-FULL-CALL-FRAME {1} => t270[ESI] 1: MOVE-ARG t255[EBX] t270[ESI] => t271[EDX] 2: CALL-NAMED t270[ESI] t272[Const9]>t273[EAX] t271[EDX] {# 1 1 NIL} => t274[EDX] 3: MOVE-TO-SAP t274[EDX] => t259[EAX] 4: BRANCH {#} IR1 block 87 start c63 IR2 block 83 start c63 L20: 0: INT-SAP '0!186>t275[EAX] => t259[EAX] 1: BRANCH {#} IR1 block 88 start c29 IR2 block 87 start c29 L21: 0: SYSTEM-AREA-POINTER-P t255[EBX] {# NIL} IR1 block 89 start c37 IR2 block 86 start c37 0: ALLOCATE-FULL-CALL-FRAME {2} => t276[ESI] 1: MOVE-ARG t255[EBX] t276[ESI] => t277[EDX] 2: MOVE-ARG '(ALIEN (* (SIGNED 8)))!278[Const23]>t279[EDI] t276[ESI] => t280[EDI] 3: CALL-NAMED t276[ESI] t281[Const19]>t282[EAX] t277[EDX] t280[EDI] {# 2 1 NIL} => t283[EDX] 4: MOVE-OPERAND t256[S2] {SB-VM::LOAD-STACK} => t255[EBX] 5: MOVE t283[EDX] => t284[EDX] 6: IF-EQ t284[EDX] 'NIL!45 {# T} IR1 block 90 start c46 IR2 block 85 start c46 0: TYPE-CHECK-ERROR t255[EBX] '(OR NULL SYSTEM-AREA-POINTER (ALIEN (* (SIGNED 8))))!285[Const24]>t286[EAX] IR1 block 1 start c53 IR2 block NIL start c53 assembly code for # in the elsewhere segment: L22: in the regular segment: L23: in the elsewhere segment: L24: in the regular segment: VOP XEP-ALLOCATE-FRAME {# NIL} .align 3 L25: L1: SIMPLE-FUN-HEADER-WORD DWORD 0 DWORD 0 DWORD 0 DWORD 0 DWORD 0 DWORD 0 POP DWORD PTR [EBP-8] LEA #, DWORD PTR [EBP-96] L26: VOP NOTE-ENVIRONMENT-START {#} L27: in the elsewhere segment: VOP VERIFY-ARG-COUNT #:G17!6[ECX] {6} L28: INT 3 L29: BYTE 10 BYTE 2 BYTE 24 BYTE 77 in the regular segment: CMP #, 24 JMP NE, L28 VOP MOVE #:G20!8[ESI] => WINDOW!17[S9], # L30: in the elsewhere segment: L31: in the regular segment: VOP NOTE-ENVIRONMENT-START {#} L32: L33: VOP ALLOC-ALIEN-STACK-SPACE {16} => t28[S8], DWORD PTR [+83886884] MOV #, # VOP ALLOC-ALIEN-STACK-SPACE {64} => t30[S4], DWORD PTR [+83886884] MOV #, # VOP SAP-MOVE t30[S4]>t32[EAX] => #:G7!33[S18], # MOV #, # VOP ALLOCATE-FULL-CALL-FRAME {1} => t35[EBX] MOV #, # SUB #, 12 VOP MOVE-ARG WINDOW!17[S9]>t36[EDX] t35[EBX] => t37[EDX] MOV #, # VOP CALL-NAMED t35[EBX] t38[Const6]>t39[EAX] t37[EDX] {# 1 1 NIL} => t40[EDX] MOV #, # L34: MOV #, 4 MOV DWORD PTR [EBX-4], # MOV #, # L35: L36: CALL DWORD PTR [EAX+5] L37: JMP NC, L38 MOV #, # L38: L39: VOP MOVE t40[EDX] => t41[EBX] MOV #, # VOP MOVE-OPERAND t41[EBX] {SB-VM::STORE-STACK} => t42[S2] MOV #, # L40: VOP FOREIGN-SYMBOL-SAP {"BeginPaint"} => t43[S3], #S(SB-C:FIXUP :NAME BeginPaint :FLAVOR FOREIGN :OFFSET NIL) MOV #, # VOP IF-EQ t41[EBX] 'NIL!45 {# T} CMP #, 83886091 JMP NE, L15 L2: VOP IF-EQ t41[EBX] 'NIL!45 {# NIL} CMP #, 83886091 JMP E, L14 L41: VOP SYSTEM-AREA-POINTER-P t41[EBX] {# T} MOV #, # AND #, 7 CMP #, 7 JMP NE, L13 CMP BYTE PTR [EBX-7], 70 JMP NE, L13 L42: L43: VOP MOVE-TO-SAP t41[EBX] => t46[EAX] MOV #, DWORD PTR [EBX-3] L3: VOP SET-FPU-WORD-FOR-C SUB #, 4 FNSTCW WORD PTR [ESP+0] WAIT OR WORD PTR [ESP+0], 768 FLDCW WORD PTR [ESP+0] WAIT VOP CURRENT-STACK-POINTER => t47[S2] MOV #, # VOP ALLOC-NUMBER-STACK-SPACE {8} => t48[ESP] SUB #, 8 VOP MOVE-SAP-ARG t46[EAX] t48[ESP] => t49[S0] MOV DWORD PTR [ESP+0], # VOP MOVE-SAP-ARG t30[S4]>t50[EAX] t48[ESP] => t51[S1] MOV #, # MOV DWORD PTR [ESP+4], # VOP CALL-OUT t43[S3]>t52[EAX] t49[S0] t51[S1] => t53[EAX] MOV #, # FSTP # FSTP # FSTP # FSTP # FSTP # FSTP # FSTP # FSTP # CLD CALL # L44: FLDZ FLDZ FLDZ FLDZ FLDZ FLDZ FLDZ FLDZ VOP RESET-STACK-POINTER t47[S2]>t54[ECX] MOV #, # MOV #, # VOP SET-FPU-WORD-FOR-LISP FNSTCW WORD PTR [ESP+0] WAIT AND WORD PTR [ESP+0], 65279 FLDCW WORD PTR [ESP+0] WAIT ADD #, 4 VOP ALLOCATE-FULL-CALL-FRAME {2} => t56[EBX] MOV #, # SUB #, 12 VOP MOVE-FROM-SAP t55[EAX] => t57[EDX] OR BYTE PTR [+83886908], 4 MOV #, 8 ADD #, DWORD PTR [+#S(SB-C:FIXUP :NAME boxed_region :FLAVOR FOREIGN :OFFSET NIL)] CMP #, DWORD PTR [+#S(SB-C:FIXUP :NAME boxed_region :FLAVOR FOREIGN :OFFSET 4)] JMP BE, L45 CALL #S(SB-C:FIXUP :NAME alloc_overflow_edx :FLAVOR FOREIGN :OFFSET NIL) JMP-SHORT L46 L45: MOV DWORD PTR [+#S(SB-C:FIXUP :NAME boxed_region :FLAVOR FOREIGN :OFFSET NIL)], # SUB #, 8 L46: MOV DWORD PTR [EDX+0], 326 LEA #, BYTE PTR [EDX+7] MOV DWORD PTR [EDX-3], # XOR BYTE PTR [+83886908], 4 JMP Z, L47 BREAK 9 L47: VOP MOVE-ARG '#!59[Const7]>t60[EDI] t56[EBX] => t61[EDI] MOV #, #!59[Const7]> VOP CALL-NAMED t56[EBX] t62[Const8]>t63[EAX] t58[EDX] t61[EDI] {# 2 1 NIL} => t64[EDX] MOV #, # L48: MOV #, 8 MOV DWORD PTR [EBX-4], # MOV #, # L49: L50: CALL DWORD PTR [EAX+5] L51: JMP NC, L52 MOV #, # L52: L53: VOP MOVE t64[EDX] => t65[S7], # L54: L55: L56: VOP CURRENT-BINDING-POINTER => t2[S21], DWORD PTR [+83886956] MOV #, # VOP SAVE-DYNAMIC-STATE => t3[S20], DWORD PTR [+83886236] MOV #, DWORD PTR [+83886884] MOV #, # MOV #, # VOP CURRENT-STACK-POINTER => t1[S22] MOV #, # VOP MAKE-UNWIND-BLOCK t70[S10] {#} => t71[ECX] LEA #, DWORD PTR [EBP-72] MOV #, DWORD PTR [+83886260] MOV DWORD PTR [ECX+0], # MOV DWORD PTR [ECX+4], # MOV DWORD PTR [ECX+8], #S(SB-C:FIXUP :NAME NIL :FLAVOR CODE-OBJECT :OFFSET L57) FS-SEGMENT-PREFIX MOV #, DWORD PTR [+0] MOV DWORD PTR [ECX+12], # VOP SET-UNWIND-PROTECT t70[S10] LEA #, DWORD PTR [EBP-72] MOV DWORD PTR [EAX+16], #S(SB-C:FIXUP :NAME UWP-SEH-HANDLER :FLAVOR ASSEMBLY-ROUTINE :OFFSET NIL) LEA #, DWORD PTR [EAX+12] FS-SEGMENT-PREFIX MOV DWORD PTR [+0], # MOV DWORD PTR [+83886260], # VOP ALLOCATE-FULL-CALL-FRAME {1} => t72[EBX] MOV #, # SUB #, 12 VOP MOVE-ARG WINDOW!17[S9]>t73[EDX] t72[EBX] => t74[EDX] MOV #, # VOP CALL-NAMED t72[EBX] t75[Const6]>t76[EAX] t74[EDX] {# 1 1 NIL} => t77[EDX] MOV #, # L58: MOV #, 4 MOV DWORD PTR [EBX-4], # MOV #, # L59: L60: CALL DWORD PTR [EAX+5] L61: JMP NC, L62 MOV #, # L62: L63: VOP MOVE t77[EDX] => t78[EBX] MOV #, # VOP MOVE-OPERAND t78[EBX] {SB-VM::STORE-STACK} => t79[S2] MOV #, # L64: VOP FOREIGN-SYMBOL-SAP {"GetClientRect"} => t80[S3], #S(SB-C:FIXUP :NAME GetClientRect :FLAVOR FOREIGN :OFFSET NIL) MOV #, # VOP IF-EQ t78[EBX] 'NIL!45 {# T} CMP #, 83886091 JMP NE, L12 L4: VOP IF-EQ t78[EBX] 'NIL!45 {# NIL} CMP #, 83886091 JMP E, L11 L65: VOP SYSTEM-AREA-POINTER-P t78[EBX] {# T} MOV #, # AND #, 7 CMP #, 7 JMP NE, L10 CMP BYTE PTR [EBX-7], 70 JMP NE, L10 L66: L67: VOP MOVE-TO-SAP t78[EBX] => t82[EAX] MOV #, DWORD PTR [EBX-3] L5: VOP SET-FPU-WORD-FOR-C SUB #, 4 FNSTCW WORD PTR [ESP+0] WAIT OR WORD PTR [ESP+0], 768 FLDCW WORD PTR [ESP+0] WAIT VOP CURRENT-STACK-POINTER => t83[S2] MOV #, # VOP ALLOC-NUMBER-STACK-SPACE {8} => t84[ESP] SUB #, 8 VOP MOVE-SAP-ARG t82[EAX] t84[ESP] => t85[S0] MOV DWORD PTR [ESP+0], # VOP MOVE-SAP-ARG t28[S8]>t86[EAX] t84[ESP] => t87[S1] MOV #, # MOV DWORD PTR [ESP+4], # VOP CALL-OUT t80[S3]>t88[EAX] t85[S0] t87[S1] => t89[EAX] MOV #, # FSTP # FSTP # FSTP # FSTP # FSTP # FSTP # FSTP # FSTP # CLD CALL # L68: FLDZ FLDZ FLDZ FLDZ FLDZ FLDZ FLDZ FLDZ VOP RESET-STACK-POINTER t83[S2]>t90[EAX] MOV #, # MOV #, # VOP SET-FPU-WORD-FOR-LISP FNSTCW WORD PTR [ESP+0] WAIT AND WORD PTR [ESP+0], 65279 FLDCW WORD PTR [ESP+0] WAIT ADD #, 4 L69: VOP FOREIGN-SYMBOL-SAP {"DrawTextA"} => t91[S6], #S(SB-C:FIXUP :NAME DrawTextA :FLAVOR FOREIGN :OFFSET NIL) MOV #, # VOP ALLOCATE-FULL-CALL-FRAME {1} => t93[EBX] MOV #, # SUB #, 12 VOP MOVE-ARG t65[S7]>t94[EDX] t93[EBX] => t95[EDX] MOV #, # VOP CALL-NAMED t93[EBX] t96[Const9]>t97[EAX] t95[EDX] {# 1 1 NIL} => t98[EDX] MOV #, # L70: MOV #, 4 MOV DWORD PTR [EBX-4], # MOV #, # L71: L72: CALL DWORD PTR [EAX+5] L73: JMP NC, L74 MOV #, # L74: L75: VOP MOVE-TO-SAP t98[EDX] => t99[S2], DWORD PTR [EDX-3] MOV #, # VOP ALLOCATE-FULL-CALL-FRAME {1} => t101[EBX] MOV #, # SUB #, 12 VOP MOVE-ARG '#!102[Const10]>t103[EDX] t101[EBX] => t104[EDX] MOV #, #!102[Const10]> VOP CALL-NAMED t101[EBX] t105[Const11]>t106[EAX] t104[EDX] {# 1 1 NIL} => t107[EDX] MOV #, # L76: MOV #, 4 MOV DWORD PTR [EBX-4], # MOV #, # L77: L78: CALL DWORD PTR [EAX+5] L79: JMP NC, L80 MOV #, # L80: L81: VOP MOVE t107[EDX] => t108[EDI] MOV #, # VOP ALLOCATE-FULL-CALL-FRAME {2} => t109[EBX] MOV #, # SUB #, 12 VOP MOVE-ARG '"Hello Lisp World!"!110[Const12]>t111[EDX] t109[EBX] => t112[EDX] MOV #, # VOP CALL-NAMED t109[EBX] t114[Const13]>t115[EAX] t112[EDX] t113[EDI] {# 2 1 NIL} => t116[EDX] MOV #, # L82: MOV #, 8 MOV DWORD PTR [EBX-4], # MOV #, # L83: L84: CALL DWORD PTR [EAX+5] L85: JMP NC, L86 MOV #, # L86: L87: VOP SIMPLE-ARRAY-NIL-P t117[EDX] {# T} MOV #, # AND #, 7 CMP #, 7 JMP NE, L9 CMP BYTE PTR [EDX-7], 162 JMP NE, L9 L88: L6: VOP VECTOR-SAP t117[EDX] => t118[EDX] ADD #, 1 VOP SET-FPU-WORD-FOR-C SUB #, 4 FNSTCW WORD PTR [ESP+0] WAIT OR WORD PTR [ESP+0], 768 FLDCW WORD PTR [ESP+0] WAIT VOP CURRENT-STACK-POINTER => t119[S5] MOV #, # VOP ALLOC-NUMBER-STACK-SPACE {20} => t120[ESP] SUB #, 20 VOP MOVE-SAP-ARG t99[S2]>t121[EAX] t120[ESP] => t122[S0] MOV #, # MOV DWORD PTR [ESP+0], # VOP MOVE-SAP-ARG t118[EDX] t120[ESP] => t123[S1] MOV DWORD PTR [ESP+4], # VOP MOVE-WORD-ARG '-1!124>t125[EAX] t120[ESP] => t126[S2] MOV #, -1 MOV DWORD PTR [ESP+8], # VOP MOVE-SAP-ARG t28[S8]>t127[EAX] t120[ESP] => t128[S3] MOV #, # MOV DWORD PTR [ESP+12], # VOP MOVE-WORD-ARG '37!129>t130[EAX] t120[ESP] => t131[S4] MOV #, 37 MOV DWORD PTR [ESP+16], # VOP CALL-OUT t91[S6]>t132[EAX] t122[S0] t123[S1] t126[S2] t128[S3] t131[S4] => t133[EAX] MOV #, # FSTP # FSTP # FSTP # FSTP # FSTP # FSTP # FSTP # FSTP # CLD CALL # L89: FLDZ FLDZ FLDZ FLDZ FLDZ FLDZ FLDZ FLDZ VOP RESET-STACK-POINTER t119[S5]>t134[EAX] MOV #, # MOV #, # VOP SET-FPU-WORD-FOR-LISP FNSTCW WORD PTR [ESP+0] WAIT AND WORD PTR [ESP+0], 65279 FLDCW WORD PTR [ESP+0] WAIT ADD #, 4 L90: VOP FOREIGN-SYMBOL-SAP {"DrawTextA"} => t135[S6], #S(SB-C:FIXUP :NAME DrawTextA :FLAVOR FOREIGN :OFFSET NIL) MOV #, # VOP ALLOCATE-FULL-CALL-FRAME {1} => t137[EBX] MOV #, # SUB #, 12 VOP MOVE-ARG t65[S7]>t138[EDX] t137[EBX] => t139[EDX] MOV #, # VOP CALL-NAMED t137[EBX] t140[Const9]>t141[EAX] t139[EDX] {# 1 1 NIL} => t142[EDX] MOV #, # L91: MOV #, 4 MOV DWORD PTR [EBX-4], # MOV #, # L92: L93: CALL DWORD PTR [EAX+5] L94: JMP NC, L95 MOV #, # L95: L96: VOP MOVE-TO-SAP t142[EDX] => t143[S2], DWORD PTR [EDX-3] MOV #, # VOP ALLOCATE-FULL-CALL-FRAME {1} => t145[EBX] MOV #, # SUB #, 12 VOP MOVE-ARG '#!146[Const14]>t147[EDX] t145[EBX] => t148[EDX] MOV #, #!146[Const14]> VOP CALL-NAMED t145[EBX] t149[Const11]>t150[EAX] t148[EDX] {# 1 1 NIL} => t151[EDX] MOV #, # L97: MOV #, 4 MOV DWORD PTR [EBX-4], # MOV #, # L98: L99: CALL DWORD PTR [EAX+5] L100: JMP NC, L101 MOV #, # L101: L102: VOP MOVE t151[EDX] => t152[EDI] MOV #, # VOP ALLOCATE-FULL-CALL-FRAME {2} => t153[EBX] MOV #, # SUB #, 12 VOP MOVE-ARG '"Hello Lisp World!"!154[Const15]>t155[EDX] t153[EBX] => t156[EDX] MOV #, # VOP CALL-NAMED t153[EBX] t158[Const13]>t159[EAX] t156[EDX] t157[EDI] {# 2 1 NIL} => t160[EDX] MOV #, # L103: MOV #, 8 MOV DWORD PTR [EBX-4], # MOV #, # L104: L105: CALL DWORD PTR [EAX+5] L106: JMP NC, L107 MOV #, # L107: L108: VOP SIMPLE-ARRAY-NIL-P t161[EDX] {# T} MOV #, # AND #, 7 CMP #, 7 JMP NE, L8 CMP BYTE PTR [EDX-7], 162 JMP NE, L8 L109: L7: VOP VECTOR-SAP t161[EDX] => t162[EDX] ADD #, 1 VOP SET-FPU-WORD-FOR-C SUB #, 4 FNSTCW WORD PTR [ESP+0] WAIT OR WORD PTR [ESP+0], 768 FLDCW WORD PTR [ESP+0] WAIT VOP CURRENT-STACK-POINTER => t163[S5] MOV #, # VOP ALLOC-NUMBER-STACK-SPACE {20} => t164[ESP] SUB #, 20 VOP MOVE-SAP-ARG t143[S2]>t165[EAX] t164[ESP] => t166[S0] MOV #, # MOV DWORD PTR [ESP+0], # VOP MOVE-SAP-ARG t162[EDX] t164[ESP] => t167[S1] MOV DWORD PTR [ESP+4], # VOP MOVE-WORD-ARG '-1!124>t168[EAX] t164[ESP] => t169[S2] MOV #, -1 MOV DWORD PTR [ESP+8], # VOP MOVE-SAP-ARG t28[S8]>t170[EAX] t164[ESP] => t171[S3] MOV #, # MOV DWORD PTR [ESP+12], # VOP MOVE-WORD-ARG '37!129>t172[EAX] t164[ESP] => t173[S4] MOV #, 37 MOV DWORD PTR [ESP+16], # VOP CALL-OUT t135[S6]>t174[EAX] t166[S0] t167[S1] t169[S2] t171[S3] t173[S4] => t175[EAX] MOV #, # FSTP # FSTP # FSTP # FSTP # FSTP # FSTP # FSTP # FSTP # CLD CALL # L110: FLDZ FLDZ FLDZ FLDZ FLDZ FLDZ FLDZ FLDZ VOP RESET-STACK-POINTER t163[S5]>t176[EAX] MOV #, # MOV #, # VOP SET-FPU-WORD-FOR-LISP FNSTCW WORD PTR [ESP+0] WAIT AND WORD PTR [ESP+0], 65279 FLDCW WORD PTR [ESP+0] WAIT ADD #, 4 L111: VOP UNLINK-UNWIND-PROTECT MOV #, DWORD PTR [+83886260] MOV #, DWORD PTR [EAX+12] FS-SEGMENT-PREFIX MOV DWORD PTR [+0], # MOV #, DWORD PTR [EAX+0] MOV DWORD PTR [+83886260], # VOP CURRENT-FP => t177[EDX] MOV #, # VOP ALLOCATE-FRAME {#} => t178[EAX] t179[IGNORE-ME] MOV #, # SUB #, 96 VOP MOVE-SAP-ARG #:G7!33[S18]>t180[ECX] t178[EAX] => t181[S5] MOV #, # MOV DWORD PTR [EAX-24], # VOP MOVE-ARG WINDOW!17[S9]>t182[ECX] t178[EAX] => t183[ECX] MOV #, # VOP MOVE-ARG t177[EDX] t178[EAX] => t184[S0] MOV DWORD PTR [EAX-4], # VOP KNOWN-CALL-LOCAL t178[EAX] t179[IGNORE-ME] t181[S5] t183[ECX] t184[S0] {# # #} => t185[EAX] L112: MOV #, # MOV DWORD PTR [EBP-8], #S(SB-C:FIXUP :NAME NIL :FLAVOR CODE-OBJECT :OFFSET L113) L114: JMP L16 L113: L115: L116: L117: VOP DEALLOC-ALIEN-STACK-SPACE {64} ADD DWORD PTR [+83886884], 64 VOP DEALLOC-ALIEN-STACK-SPACE {16} ADD DWORD PTR [+83886884], 16 L118: VOP MOVE '0!186 => t187[EDX] XOR #, # VOP RETURN-SINGLE t20[S0] t26[S1] t187[EDX] L119: LEA #, DWORD PTR [EBP-8] CLC MOV #, # RET 4 L8: VOP SIMPLE-BASE-STRING-P t161[EDX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L120 CMP BYTE PTR [EDX-7], 166 JMP E, L7 L120: L121: VOP SIMPLE-CHARACTER-STRING-P t161[EDX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L122 CMP BYTE PTR [EDX-7], 170 JMP E, L7 L122: L123: VOP SIMPLE-ARRAY-SINGLE-FLOAT-P t161[EDX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L124 CMP BYTE PTR [EDX-7], 210 JMP E, L7 L124: L125: VOP SIMPLE-ARRAY-DOUBLE-FLOAT-P t161[EDX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L126 CMP BYTE PTR [EDX-7], 214 JMP E, L7 L126: L127: VOP SIMPLE-BIT-VECTOR-P t161[EDX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L128 CMP BYTE PTR [EDX-7], 174 JMP E, L7 L128: L129: VOP SIMPLE-ARRAY-UNSIGNED-BYTE-2-P t161[EDX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L130 CMP BYTE PTR [EDX-7], 138 JMP E, L7 L130: L131: VOP SIMPLE-ARRAY-UNSIGNED-BYTE-4-P t161[EDX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L132 CMP BYTE PTR [EDX-7], 142 JMP E, L7 L132: L133: VOP SIMPLE-ARRAY-UNSIGNED-BYTE-7-P t161[EDX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L134 CMP BYTE PTR [EDX-7], 146 JMP E, L7 L134: L135: VOP SIMPLE-ARRAY-UNSIGNED-BYTE-8-P t161[EDX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L136 CMP BYTE PTR [EDX-7], 150 JMP E, L7 L136: L137: VOP SIMPLE-ARRAY-UNSIGNED-BYTE-15-P t161[EDX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L138 CMP BYTE PTR [EDX-7], 154 JMP E, L7 L138: L139: VOP SIMPLE-ARRAY-UNSIGNED-BYTE-16-P t161[EDX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L140 CMP BYTE PTR [EDX-7], 158 JMP E, L7 L140: L141: VOP SIMPLE-ARRAY-UNSIGNED-BYTE-29-P t161[EDX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L142 CMP BYTE PTR [EDX-7], 182 JMP E, L7 L142: L143: VOP SIMPLE-ARRAY-UNSIGNED-BYTE-31-P t161[EDX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L144 CMP BYTE PTR [EDX-7], 186 JMP E, L7 L144: L145: VOP SIMPLE-ARRAY-UNSIGNED-BYTE-32-P t161[EDX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L146 CMP BYTE PTR [EDX-7], 190 JMP E, L7 L146: L147: VOP SIMPLE-ARRAY-SIGNED-BYTE-8-P t161[EDX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L148 CMP BYTE PTR [EDX-7], 194 JMP E, L7 L148: L149: VOP SIMPLE-ARRAY-SIGNED-BYTE-16-P t161[EDX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L150 CMP BYTE PTR [EDX-7], 198 JMP E, L7 L150: L151: VOP SIMPLE-ARRAY-SIGNED-BYTE-30-P t161[EDX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L152 CMP BYTE PTR [EDX-7], 202 JMP E, L7 L152: L153: VOP SIMPLE-ARRAY-SIGNED-BYTE-32-P t161[EDX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L154 CMP BYTE PTR [EDX-7], 206 JMP E, L7 L154: L155: VOP SIMPLE-ARRAY-COMPLEX-SINGLE-FLOAT-P t161[EDX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L156 CMP BYTE PTR [EDX-7], 218 JMP E, L7 L156: L157: VOP SIMPLE-ARRAY-COMPLEX-DOUBLE-FLOAT-P t161[EDX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L158 CMP BYTE PTR [EDX-7], 222 JMP E, L7 L158: L159: VOP TYPE-CHECK-ERROR t161[EDX] '(OR (SIMPLE-ARRAY NIL (*)) SIMPLE-BASE-STRING (SIMPLE-ARRAY CHARACTER (*)) (SIMPLE-ARRAY SINGLE-FLOAT (*)) (SIMPLE-ARRAY DOUBLE-FLOAT (*)) SIMPLE-BIT-VECTOR (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 29) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)) (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)) (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)) (SIMPLE-ARRAY FIXNUM (*)) (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)) (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) (*)) (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) (*)))!188[Const16]>t189[EAX] MOV #, # INT 3 L160: BYTE 10 BYTE 3 BYTE 31 BYTE 142 BYTE 14 L9: VOP SIMPLE-BASE-STRING-P t117[EDX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L161 CMP BYTE PTR [EDX-7], 166 JMP E, L6 L161: L162: VOP SIMPLE-CHARACTER-STRING-P t117[EDX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L163 CMP BYTE PTR [EDX-7], 170 JMP E, L6 L163: L164: VOP SIMPLE-ARRAY-SINGLE-FLOAT-P t117[EDX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L165 CMP BYTE PTR [EDX-7], 210 JMP E, L6 L165: L166: VOP SIMPLE-ARRAY-DOUBLE-FLOAT-P t117[EDX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L167 CMP BYTE PTR [EDX-7], 214 JMP E, L6 L167: L168: VOP SIMPLE-BIT-VECTOR-P t117[EDX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L169 CMP BYTE PTR [EDX-7], 174 JMP E, L6 L169: L170: VOP SIMPLE-ARRAY-UNSIGNED-BYTE-2-P t117[EDX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L171 CMP BYTE PTR [EDX-7], 138 JMP E, L6 L171: L172: VOP SIMPLE-ARRAY-UNSIGNED-BYTE-4-P t117[EDX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L173 CMP BYTE PTR [EDX-7], 142 JMP E, L6 L173: L174: VOP SIMPLE-ARRAY-UNSIGNED-BYTE-7-P t117[EDX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L175 CMP BYTE PTR [EDX-7], 146 JMP E, L6 L175: L176: VOP SIMPLE-ARRAY-UNSIGNED-BYTE-8-P t117[EDX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L177 CMP BYTE PTR [EDX-7], 150 JMP E, L6 L177: L178: VOP SIMPLE-ARRAY-UNSIGNED-BYTE-15-P t117[EDX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L179 CMP BYTE PTR [EDX-7], 154 JMP E, L6 L179: L180: VOP SIMPLE-ARRAY-UNSIGNED-BYTE-16-P t117[EDX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L181 CMP BYTE PTR [EDX-7], 158 JMP E, L6 L181: L182: VOP SIMPLE-ARRAY-UNSIGNED-BYTE-29-P t117[EDX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L183 CMP BYTE PTR [EDX-7], 182 JMP E, L6 L183: L184: VOP SIMPLE-ARRAY-UNSIGNED-BYTE-31-P t117[EDX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L185 CMP BYTE PTR [EDX-7], 186 JMP E, L6 L185: L186: VOP SIMPLE-ARRAY-UNSIGNED-BYTE-32-P t117[EDX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L187 CMP BYTE PTR [EDX-7], 190 JMP E, L6 L187: L188: VOP SIMPLE-ARRAY-SIGNED-BYTE-8-P t117[EDX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L189 CMP BYTE PTR [EDX-7], 194 JMP E, L6 L189: L190: VOP SIMPLE-ARRAY-SIGNED-BYTE-16-P t117[EDX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L191 CMP BYTE PTR [EDX-7], 198 JMP E, L6 L191: L192: VOP SIMPLE-ARRAY-SIGNED-BYTE-30-P t117[EDX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L193 CMP BYTE PTR [EDX-7], 202 JMP E, L6 L193: L194: VOP SIMPLE-ARRAY-SIGNED-BYTE-32-P t117[EDX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L195 CMP BYTE PTR [EDX-7], 206 JMP E, L6 L195: L196: VOP SIMPLE-ARRAY-COMPLEX-SINGLE-FLOAT-P t117[EDX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L197 CMP BYTE PTR [EDX-7], 218 JMP E, L6 L197: L198: VOP SIMPLE-ARRAY-COMPLEX-DOUBLE-FLOAT-P t117[EDX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L199 CMP BYTE PTR [EDX-7], 222 JMP E, L6 L199: L200: VOP TYPE-CHECK-ERROR t117[EDX] '(OR (SIMPLE-ARRAY NIL (*)) SIMPLE-BASE-STRING (SIMPLE-ARRAY CHARACTER (*)) (SIMPLE-ARRAY SINGLE-FLOAT (*)) (SIMPLE-ARRAY DOUBLE-FLOAT (*)) SIMPLE-BIT-VECTOR (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 29) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*)) (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)) (SIMPLE-ARRAY (SIGNED-BYTE 8) (*)) (SIMPLE-ARRAY (SIGNED-BYTE 16) (*)) (SIMPLE-ARRAY FIXNUM (*)) (SIMPLE-ARRAY (SIGNED-BYTE 32) (*)) (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) (*)) (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT) (*)))!190[Const17]>t191[EAX] MOV #, # INT 3 L201: BYTE 10 BYTE 3 BYTE 31 BYTE 142 BYTE 14 L10: VOP ALLOCATE-FULL-CALL-FRAME {1} => t192[ESI] MOV #, # SUB #, 12 VOP MOVE-ARG t78[EBX] t192[ESI] => t193[EDX] MOV #, # VOP CALL-NAMED t192[ESI] t194[Const9]>t195[EAX] t193[EDX] {# 1 1 NIL} => t196[EDX] MOV #, # L202: MOV #, 4 MOV DWORD PTR [ESI-4], # MOV #, # L203: L204: CALL DWORD PTR [EAX+5] L205: JMP NC, L206 MOV #, # L206: L207: VOP MOVE-TO-SAP t196[EDX] => t82[EAX] MOV #, DWORD PTR [EDX-3] VOP BRANCH {#} JMP L5 L11: VOP INT-SAP '0!186>t197[EAX] => t82[EAX] XOR #, # VOP BRANCH {#} JMP L5 L12: VOP SYSTEM-AREA-POINTER-P t78[EBX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L208 CMP BYTE PTR [EBX-7], 70 JMP E, L4 L208: L209: VOP ALLOCATE-FULL-CALL-FRAME {2} => t198[ESI] MOV #, # SUB #, 12 VOP MOVE-ARG t78[EBX] t198[ESI] => t199[EDX] MOV #, # VOP MOVE-ARG '(ALIEN (* (SIGNED 8)))!200[Const18]>t201[EDI] t198[ESI] => t202[EDI] MOV #, # VOP CALL-NAMED t198[ESI] t203[Const19]>t204[EAX] t199[EDX] t202[EDI] {# 2 1 NIL} => t205[EDX] MOV #, # L210: MOV #, 8 MOV DWORD PTR [ESI-4], # MOV #, # L211: L212: CALL DWORD PTR [EAX+5] L213: JMP NC, L214 MOV #, # L214: L215: VOP MOVE-OPERAND t79[S2] {SB-VM::LOAD-STACK} => t78[EBX] MOV #, # VOP IF-EQ t206[EDX] 'NIL!45 {# T} CMP #, 83886091 JMP NE, L4 L216: VOP TYPE-CHECK-ERROR t78[EBX] '(OR NULL SYSTEM-AREA-POINTER (ALIEN (* (SIGNED 8))))!207[Const20]>t208[EAX] MOV #, # INT 3 L217: BYTE 10 BYTE 3 BYTE 31 BYTE 206 BYTE 14 L13: VOP ALLOCATE-FULL-CALL-FRAME {1} => t209[ESI] MOV #, # SUB #, 12 VOP MOVE-ARG t41[EBX] t209[ESI] => t210[EDX] MOV #, # VOP CALL-NAMED t209[ESI] t211[Const9]>t212[EAX] t210[EDX] {# 1 1 NIL} => t213[EDX] MOV #, # L218: MOV #, 4 MOV DWORD PTR [ESI-4], # MOV #, # L219: L220: CALL DWORD PTR [EAX+5] L221: JMP NC, L222 MOV #, # L222: L223: VOP MOVE-TO-SAP t213[EDX] => t46[EAX] MOV #, DWORD PTR [EDX-3] VOP BRANCH {#} JMP L3 L14: VOP INT-SAP '0!186>t214[EAX] => t46[EAX] XOR #, # VOP BRANCH {#} JMP L3 L15: VOP SYSTEM-AREA-POINTER-P t41[EBX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L224 CMP BYTE PTR [EBX-7], 70 JMP E, L2 L224: L225: VOP ALLOCATE-FULL-CALL-FRAME {2} => t215[ESI] MOV #, # SUB #, 12 VOP MOVE-ARG t41[EBX] t215[ESI] => t216[EDX] MOV #, # VOP MOVE-ARG '(ALIEN (* (SIGNED 8)))!217[Const21]>t218[EDI] t215[ESI] => t219[EDI] MOV #, # VOP CALL-NAMED t215[ESI] t220[Const19]>t221[EAX] t216[EDX] t219[EDI] {# 2 1 NIL} => t222[EDX] MOV #, # L226: MOV #, 8 MOV DWORD PTR [ESI-4], # MOV #, # L227: L228: CALL DWORD PTR [EAX+5] L229: JMP NC, L230 MOV #, # L230: L231: VOP MOVE-OPERAND t42[S2] {SB-VM::LOAD-STACK} => t41[EBX] MOV #, # VOP IF-EQ t223[EDX] 'NIL!45 {# T} CMP #, 83886091 JMP NE, L2 L232: VOP TYPE-CHECK-ERROR t41[EBX] '(OR NULL SYSTEM-AREA-POINTER (ALIEN (* (SIGNED 8))))!224[Const22]>t225[EAX] MOV #, # INT 3 L233: BYTE 10 BYTE 3 BYTE 31 BYTE 206 BYTE 14 L234: VOP UWP-ENTRY {#} => t226[EDX] t227[EBX] t228[ECX] L57: L235: VOP MOVE t226[EDX] => t229[S2], # VOP MOVE t227[EBX] => t231[S3], # VOP MOVE t228[ECX] => t233[S4], # VOP RESTORE-DYNAMIC-STATE t3[S20]>t235[EAX] t4[S19]>t236[ECX] MOV #, # MOV #, # MOV DWORD PTR [+83886236], # MOV DWORD PTR [+83886884], # VOP UNBIND-TO-HERE t2[S21]>t237[EBX] MOV #, # MOV #, DWORD PTR [+83886956] CMP #, # JMP E, L236 L237: MOV #, DWORD PTR [EDX-4] OR #, # JMP Z, L238 MOV #, DWORD PTR [EDX-8] MOV DWORD PTR [EAX-3], # MOV DWORD PTR [EDX-4], 0 L238: MOV DWORD PTR [EDX-8], 0 SUB #, 8 CMP #, # JMP NE, L237 MOV DWORD PTR [+83886956], # L236: L239: VOP CURRENT-FP => t238[EDX] MOV #, # VOP ALLOCATE-FRAME {#} => t239[EAX] t240[IGNORE-ME] MOV #, # SUB #, 96 VOP MOVE-SAP-ARG #:G7!33[S18]>t241[ECX] t239[EAX] => t181[S5] MOV #, # MOV DWORD PTR [EAX-24], # VOP MOVE-ARG WINDOW!17[S9]>t242[ECX] t239[EAX] => t183[ECX] MOV #, # VOP MOVE-ARG t238[EDX] t239[EAX] => t184[S0] MOV DWORD PTR [EAX-4], # VOP KNOWN-CALL-LOCAL t239[EAX] t240[IGNORE-ME] t181[S5] t183[ECX] t184[S0] {# # #} => t185[EAX] L240: MOV #, # MOV DWORD PTR [EBP-8], #S(SB-C:FIXUP :NAME NIL :FLAVOR CODE-OBJECT :OFFSET L241) L242: JMP L16 L241: L243: L244: VOP CONTINUE-UNWIND t229[S2]>t243[EAX] t231[S3]>t244[EBX] t233[S4]>t245[ECX] MOV #, # MOV #, # MOV #, # CALL #S(SB-C:FIXUP :NAME CONTINUE-UNWIND :FLAVOR ASSEMBLY-ROUTINE :OFFSET NIL) L16: in the elsewhere segment: L245: in the regular segment: VOP NOTE-ENVIRONMENT-START {#} L246: L247: VOP ALLOCATE-FULL-CALL-FRAME {1} => t250[EBX] MOV #, # SUB #, 12 VOP MOVE-ARG t183[ECX] t250[EBX] => t251[EDX] MOV #, # VOP CALL-NAMED t250[EBX] t252[Const6]>t253[EAX] t251[EDX] {# 1 1 NIL} => t254[EDX] MOV #, # L248: MOV #, 4 MOV DWORD PTR [EBX-4], # MOV #, # L249: L250: CALL DWORD PTR [EAX+5] L251: JMP NC, L252 MOV #, # L252: L253: VOP MOVE t254[EDX] => t255[EBX] MOV #, # VOP MOVE-OPERAND t255[EBX] {SB-VM::STORE-STACK} => t256[S2] MOV #, # L254: VOP FOREIGN-SYMBOL-SAP {"EndPaint"} => t257[S3], #S(SB-C:FIXUP :NAME EndPaint :FLAVOR FOREIGN :OFFSET NIL) MOV #, # VOP IF-EQ t255[EBX] 'NIL!45 {# T} CMP #, 83886091 JMP NE, L21 L17: VOP IF-EQ t255[EBX] 'NIL!45 {# NIL} CMP #, 83886091 JMP E, L20 L255: VOP SYSTEM-AREA-POINTER-P t255[EBX] {# T} MOV #, # AND #, 7 CMP #, 7 JMP NE, L19 CMP BYTE PTR [EBX-7], 70 JMP NE, L19 L256: L257: VOP MOVE-TO-SAP t255[EBX] => t259[EAX] MOV #, DWORD PTR [EBX-3] L18: VOP SET-FPU-WORD-FOR-C SUB #, 4 FNSTCW WORD PTR [ESP+0] WAIT OR WORD PTR [ESP+0], 768 FLDCW WORD PTR [ESP+0] WAIT VOP CURRENT-STACK-POINTER => t260[S2] MOV #, # VOP ALLOC-NUMBER-STACK-SPACE {8} => t261[ESP] SUB #, 8 VOP MOVE-SAP-ARG t259[EAX] t261[ESP] => t262[S0] MOV DWORD PTR [ESP+0], # VOP MOVE-SAP-ARG t181[S5]>t263[EAX] t261[ESP] => t264[S1] MOV #, # MOV DWORD PTR [ESP+4], # VOP CALL-OUT t257[S3]>t265[EAX] t262[S0] t264[S1] => t266[EAX] MOV #, # FSTP # FSTP # FSTP # FSTP # FSTP # FSTP # FSTP # FSTP # CLD CALL # L258: FLDZ FLDZ FLDZ FLDZ FLDZ FLDZ FLDZ FLDZ VOP RESET-STACK-POINTER t260[S2]>t267[EAX] MOV #, # MOV #, # VOP SET-FPU-WORD-FOR-LISP FNSTCW WORD PTR [ESP+0] WAIT AND WORD PTR [ESP+0], 65279 FLDCW WORD PTR [ESP+0] WAIT ADD #, 4 L259: L260: VOP MOVE-ARG 'NIL!268 t184[S0]>t269[EAX] => t185[EAX] MOV #, 83886091 VOP KNOWN-RETURN t184[S0] t248[S1] t185[EAX] {#} L261: LEA #, DWORD PTR [EBP-8] MOV #, # RET 4 L262: L19: VOP ALLOCATE-FULL-CALL-FRAME {1} => t270[ESI] MOV #, # SUB #, 12 VOP MOVE-ARG t255[EBX] t270[ESI] => t271[EDX] MOV #, # VOP CALL-NAMED t270[ESI] t272[Const9]>t273[EAX] t271[EDX] {# 1 1 NIL} => t274[EDX] MOV #, # L263: MOV #, 4 MOV DWORD PTR [ESI-4], # MOV #, # L264: L265: CALL DWORD PTR [EAX+5] L266: JMP NC, L267 MOV #, # L267: L268: VOP MOVE-TO-SAP t274[EDX] => t259[EAX] MOV #, DWORD PTR [EDX-3] VOP BRANCH {#} JMP L18 L20: VOP INT-SAP '0!186>t275[EAX] => t259[EAX] XOR #, # VOP BRANCH {#} JMP L18 L21: VOP SYSTEM-AREA-POINTER-P t255[EBX] {# NIL} MOV #, # AND #, 7 CMP #, 7 JMP NE, L269 CMP BYTE PTR [EBX-7], 70 JMP E, L17 L269: L270: VOP ALLOCATE-FULL-CALL-FRAME {2} => t276[ESI] MOV #, # SUB #, 12 VOP MOVE-ARG t255[EBX] t276[ESI] => t277[EDX] MOV #, # VOP MOVE-ARG '(ALIEN (* (SIGNED 8)))!278[Const23]>t279[EDI] t276[ESI] => t280[EDI] MOV #, # VOP CALL-NAMED t276[ESI] t281[Const19]>t282[EAX] t277[EDX] t280[EDI] {# 2 1 NIL} => t283[EDX] MOV #, # L271: MOV #, 8 MOV DWORD PTR [ESI-4], # MOV #, # L272: L273: CALL DWORD PTR [EAX+5] L274: JMP NC, L275 MOV #, # L275: L276: VOP MOVE-OPERAND t256[S2] {SB-VM::LOAD-STACK} => t255[EBX] MOV #, # VOP IF-EQ t284[EDX] 'NIL!45 {# T} CMP #, 83886091 JMP NE, L17 L277: VOP TYPE-CHECK-ERROR t255[EBX] '(OR NULL SYSTEM-AREA-POINTER (ALIEN (* (SIGNED 8))))!285[Const24]>t286[EAX] MOV #, # INT 3 L278: BYTE 10 BYTE 3 BYTE 31 BYTE 206 BYTE 14 .align 3 disassembly of code for # ; 00000000: 2A1A SUB BL, [EDX] ; 002: 0000 ADD [EAX], AL ; 004: 0000 ADD [EAX], AL ; 006: 0000 ADD [EAX], AL ; 008: 0000 ADD [EAX], AL ; 00A: 0000 ADD [EAX], AL ; 00C: 0000 ADD [EAX], AL ; 00E: 0000 ADD [EAX], AL ; 010: 0000 ADD [EAX], AL ; 012: 0000 ADD [EAX], AL ; 014: 0000 ADD [EAX], AL ; 016: 0000 ADD [EAX], AL ; 018: 0000 ADD [EAX], AL ; 01A: 0000 ADD [EAX], AL ; 01C: 8F45F8 POP DWORD PTR [EBP-8] ; 01F: 8D65A0 LEA ESP, [EBP-96] ; 022: 83F918 CMP ECX, 24 ; 025: 0F85550A0000 JNE L86 ; 02B: 8975D8 MOV [EBP-40], ESI ; 02E: 832D2403000510 SUB DWORD PTR [#x5000324], 16 ; 035: 8B0524030005 MOV EAX, [#x5000324] ; 03B: 8945DC MOV [EBP-36], EAX ; 03E: 832D2403000540 SUB DWORD PTR [#x5000324], 64 ; 045: 8B0524030005 MOV EAX, [#x5000324] ; 04B: 8945EC MOV [EBP-20], EAX ; 04E: 8B45EC MOV EAX, [EBP-20] ; 051: 8945B4 MOV [EBP-76], EAX ; 054: 8BDC MOV EBX, ESP ; 056: 83EC0C SUB ESP, 12 ; 059: 8B55D8 MOV EDX, [EBP-40] ; 05C: 8B0511000000 MOV EAX, [#x11] ; 062: B904000000 MOV ECX, 4 ; 067: 896BFC MOV [EBX-4], EBP ; 06A: 8BEB MOV EBP, EBX ; 06C: FF5005 CALL DWORD PTR [EAX+5] ; 06F: 7302 JNB L0 ; 071: 8BE3 MOV ESP, EBX ; 073: L0: 8BDA MOV EBX, EDX ; 075: 895DF4 MOV [EBP-12], EBX ; 078: 8D0500000000 LEA EAX, [#x0] ; __dll__ ; 07E: 8945F0 MOV [EBP-16], EAX ; 081: 81FB0B000005 CMP EBX, 83886091 ; 087: 0F85E6070000 JNE L70 ; 08D: L1: 81FB0B000005 CMP EBX, 83886091 ; 093: 0F84D3070000 JEQ L69 ; 099: 8BC3 MOV EAX, EBX ; 09B: 2407 AND AL, 7 ; 09D: 3C07 CMP AL, 7 ; 09F: 0F85A1070000 JNE L67 ; 0A5: 807BF946 CMP BYTE PTR [EBX-7], 70 ; 0A9: 0F8597070000 JNE L67 ; 0AF: 8B43FD MOV EAX, [EBX-3] ; 0B2: L2: 83EC04 SUB ESP, 4 ; 0B5: D93C24 FNSTCW [ESP] ; 0B8: 9B WAIT ; 0B9: 66 BYTE #X66 ; 0BA: 810C240003D92C OR DWORD PTR [ESP], 752419584 ; 0C1: 249B AND AL, 155 ; 0C3: 8965F4 MOV [EBP-12], ESP ; 0C6: 83EC08 SUB ESP, 8 ; 0C9: 890424 MOV [ESP], EAX ; 0CC: 8B45EC MOV EAX, [EBP-20] ; 0CF: 89442404 MOV [ESP+4], EAX ; 0D3: 8B45F0 MOV EAX, [EBP-16] ; 0D6: DDD8 FSTPD FR0 ; 0D8: DDD8 FSTPD FR0 ; 0DA: DDD8 FSTPD FR0 ; 0DC: DDD8 FSTPD FR0 ; 0DE: DDD8 FSTPD FR0 ; 0E0: DDD8 FSTPD FR0 ; 0E2: DDD8 FSTPD FR0 ; 0E4: DDD8 FSTPD FR0 ; 0E6: FC CLD ; 0E7: FFD0 CALL EAX ; 0E9: D9EE FLDZ ; 0EB: D9EE FLDZ ; 0ED: D9EE FLDZ ; 0EF: D9EE FLDZ ; 0F1: D9EE FLDZ ; 0F3: D9EE FLDZ ; 0F5: D9EE FLDZ ; 0F7: D9EE FLDZ ; 0F9: 8B4DF4 MOV ECX, [EBP-12] ; 0FC: 8BE1 MOV ESP, ECX ; 0FE: D93C24 FNSTCW [ESP] ; 101: 9B WAIT ; 102: 66 BYTE #X66 ; 103: 812424FFFED92C AND DWORD PTR [ESP], 752484095 ; 10A: 249B AND AL, 155 ; 10C: 83C404 ADD ESP, 4 ; 10F: 8BDC MOV EBX, ESP ; 111: 83EC0C SUB ESP, 12 ; 114: 800D3C03000504 OR BYTE PTR [#x500033C], 4 ; 11B: BA08000000 MOV EDX, 8 ; 120: 031500000000 ADD EDX, [#x0] ; __dll__ ; 126: 3B1504000000 CMP EDX, [#x4] ; __major_os_version__ ; 12C: 7607 JBE L4 ; 12E: E800000000 CALL L3 ; 133: L3: EB09 JMP L5 ; 135: L4: 891500000000 MOV [#x0], EDX ; __dll__ ; 13B: 83EA08 SUB EDX, 8 ; 13E: L5: C70246010000 MOV DWORD PTR [EDX], 326 ; 144: 8D5207 LEA EDX, [EDX+7] ; 147: 8942FD MOV [EDX-3], EAX ; 14A: 80353C03000504 XOR BYTE PTR [#x500033C], 4 ; 151: 7402 JEQ L6 ; 153: CC09 BREAK 9 ; pending interrupt trap ; 155: L6: 8B3D15000000 MOV EDI, [#x15] ; 15B: 8B0519000000 MOV EAX, [#x19] ; 161: B908000000 MOV ECX, 8 ; 166: 896BFC MOV [EBX-4], EBP ; 169: 8BEB MOV EBP, EBX ; 16B: FF5005 CALL DWORD PTR [EAX+5] ; 16E: 7302 JNB L7 ; 170: 8BE3 MOV ESP, EBX ; 172: L7: 8955E0 MOV [EBP-32], EDX ; 175: 8B056C030005 MOV EAX, [#x500036C] ; 17B: 8945A8 MOV [EBP-88], EAX ; 17E: 8B059C000005 MOV EAX, [#x500009C] ; 184: 8B0D24030005 MOV ECX, [#x5000324] ; 18A: 8945AC MOV [EBP-84], EAX ; 18D: 894DB0 MOV [EBP-80], ECX ; 190: 8965A4 MOV [EBP-92], ESP ; 193: 8D4DB8 LEA ECX, [EBP-72] ; 196: 8B05B4000005 MOV EAX, [#x50000B4] ; 19C: 8901 MOV [ECX], EAX ; 19E: 896904 MOV [ECX+4], EBP ; 1A1: C7410825090000 MOV DWORD PTR [ECX+8], 2341 ; 1A8: 64 BYTE #X64 ; 1A9: 8B0500000000 MOV EAX, [#x0] ; __dll__ ; 1AF: 89410C MOV [ECX+12], EAX ; 1B2: 8D45B8 LEA EAX, [EBP-72] ; 1B5: C7401000000000 MOV DWORD PTR [EAX+16], 0 ; 1BC: 8D480C LEA ECX, [EAX+12] ; 1BF: 64 BYTE #X64 ; 1C0: 890D00000000 MOV [#x0], ECX ; __dll__ ; 1C6: 8905B4000005 MOV [#x50000B4], EAX ; 1CC: 8BDC MOV EBX, ESP ; 1CE: 83EC0C SUB ESP, 12 ; 1D1: 8B55D8 MOV EDX, [EBP-40] ; 1D4: 8B0511000000 MOV EAX, [#x11] ; 1DA: B904000000 MOV ECX, 4 ; 1DF: 896BFC MOV [EBX-4], EBP ; 1E2: 8BEB MOV EBP, EBX ; 1E4: FF5005 CALL DWORD PTR [EAX+5] ; 1E7: 7302 JNB L8 ; 1E9: 8BE3 MOV ESP, EBX ; 1EB: L8: 8BDA MOV EBX, EDX ; 1ED: 895DF4 MOV [EBP-12], EBX ; 1F0: 8D0500000000 LEA EAX, [#x0] ; __dll__ ; 1F6: 8945F0 MOV [EBP-16], EAX ; 1F9: 81FB0B000005 CMP EBX, 83886091 ; 1FF: 0F85F0050000 JNE L64 ; 205: L9: 81FB0B000005 CMP EBX, 83886091 ; 20B: 0F84DD050000 JEQ L63 ; 211: 8BC3 MOV EAX, EBX ; 213: 2407 AND AL, 7 ; 215: 3C07 CMP AL, 7 ; 217: 0F85AB050000 JNE L61 ; 21D: 807BF946 CMP BYTE PTR [EBX-7], 70 ; 221: 0F85A1050000 JNE L61 ; 227: 8B43FD MOV EAX, [EBX-3] ; 22A: L10: 83EC04 SUB ESP, 4 ; 22D: D93C24 FNSTCW [ESP] ; 230: 9B WAIT ; 231: 66 BYTE #X66 ; 232: 810C240003D92C OR DWORD PTR [ESP], 752419584 ; 239: 249B AND AL, 155 ; 23B: 8965F4 MOV [EBP-12], ESP ; 23E: 83EC08 SUB ESP, 8 ; 241: 890424 MOV [ESP], EAX ; 244: 8B45DC MOV EAX, [EBP-36] ; 247: 89442404 MOV [ESP+4], EAX ; 24B: 8B45F0 MOV EAX, [EBP-16] ; 24E: DDD8 FSTPD FR0 ; 250: DDD8 FSTPD FR0 ; 252: DDD8 FSTPD FR0 ; 254: DDD8 FSTPD FR0 ; 256: DDD8 FSTPD FR0 ; 258: DDD8 FSTPD FR0 ; 25A: DDD8 FSTPD FR0 ; 25C: DDD8 FSTPD FR0 ; 25E: FC CLD ; 25F: FFD0 CALL EAX ; 261: D9EE FLDZ ; 263: D9EE FLDZ ; 265: D9EE FLDZ ; 267: D9EE FLDZ ; 269: D9EE FLDZ ; 26B: D9EE FLDZ ; 26D: D9EE FLDZ ; 26F: D9EE FLDZ ; 271: 8B45F4 MOV EAX, [EBP-12] ; 274: 8BE0 MOV ESP, EAX ; 276: D93C24 FNSTCW [ESP] ; 279: 9B WAIT ; 27A: 66 BYTE #X66 ; 27B: 812424FFFED92C AND DWORD PTR [ESP], 752484095 ; 282: 249B AND AL, 155 ; 284: 83C404 ADD ESP, 4 ; 287: 8D0500000000 LEA EAX, [#x0] ; __dll__ ; 28D: 8945E4 MOV [EBP-28], EAX ; 290: 8BDC MOV EBX, ESP ; 292: 83EC0C SUB ESP, 12 ; 295: 8B55E0 MOV EDX, [EBP-32] ; 298: 8B051D000000 MOV EAX, [#x1D] ; 29E: B904000000 MOV ECX, 4 ; 2A3: 896BFC MOV [EBX-4], EBP ; 2A6: 8BEB MOV EBP, EBX ; 2A8: FF5005 CALL DWORD PTR [EAX+5] ; 2AB: 7302 JNB L11 ; 2AD: 8BE3 MOV ESP, EBX ; 2AF: L11: 8B42FD MOV EAX, [EDX-3] ; 2B2: 8945F4 MOV [EBP-12], EAX ; 2B5: 8BDC MOV EBX, ESP ; 2B7: 83EC0C SUB ESP, 12 ; 2BA: 8B1521000000 MOV EDX, [#x21] ; 2C0: 8B0525000000 MOV EAX, [#x25] ; 2C6: B904000000 MOV ECX, 4 ; 2CB: 896BFC MOV [EBX-4], EBP ; 2CE: 8BEB MOV EBP, EBX ; 2D0: FF5005 CALL DWORD PTR [EAX+5] ; 2D3: 7302 JNB L12 ; 2D5: 8BE3 MOV ESP, EBX ; 2D7: L12: 8BFA MOV EDI, EDX ; 2D9: 8BDC MOV EBX, ESP ; 2DB: 83EC0C SUB ESP, 12 ; 2DE: 8B1529000000 MOV EDX, [#x29] ; 2E4: 8B052D000000 MOV EAX, [#x2D] ; 2EA: B908000000 MOV ECX, 8 ; 2EF: 896BFC MOV [EBX-4], EBP ; 2F2: 8BEB MOV EBP, EBX ; 2F4: FF5005 CALL DWORD PTR [EAX+5] ; 2F7: 7302 JNB L13 ; 2F9: 8BE3 MOV ESP, EBX ; 2FB: L13: 8BC2 MOV EAX, EDX ; 2FD: 2407 AND AL, 7 ; 2FF: 3C07 CMP AL, 7 ; 301: 0F854D030000 JNE L40 ; 307: 807AF9A2 CMP BYTE PTR [EDX-7], 162 ; 30B: 0F8543030000 JNE L40 ; 311: L14: 83C201 ADD EDX, 1 ; 314: 83EC04 SUB ESP, 4 ; 317: D93C24 FNSTCW [ESP] ; 31A: 9B WAIT ; 31B: 66 BYTE #X66 ; 31C: 810C240003D92C OR DWORD PTR [ESP], 752419584 ; 323: 249B AND AL, 155 ; 325: 8965E8 MOV [EBP-24], ESP ; 328: 83EC14 SUB ESP, 20 ; 32B: 8B45F4 MOV EAX, [EBP-12] ; 32E: 890424 MOV [ESP], EAX ; 331: 89542404 MOV [ESP+4], EDX ; 335: B8FFFFFFFF MOV EAX, 4294967295 ; 33A: 89442408 MOV [ESP+8], EAX ; 33E: 8B45DC MOV EAX, [EBP-36] ; 341: 8944240C MOV [ESP+12], EAX ; 345: B825000000 MOV EAX, 37 ; 34A: 89442410 MOV [ESP+16], EAX ; 34E: 8B45E4 MOV EAX, [EBP-28] ; 351: DDD8 FSTPD FR0 ; 353: DDD8 FSTPD FR0 ; 355: DDD8 FSTPD FR0 ; 357: DDD8 FSTPD FR0 ; 359: DDD8 FSTPD FR0 ; 35B: DDD8 FSTPD FR0 ; 35D: DDD8 FSTPD FR0 ; 35F: DDD8 FSTPD FR0 ; 361: FC CLD ; 362: FFD0 CALL EAX ; 364: D9EE FLDZ ; 366: D9EE FLDZ ; 368: D9EE FLDZ ; 36A: D9EE FLDZ ; 36C: D9EE FLDZ ; 36E: D9EE FLDZ ; 370: D9EE FLDZ ; 372: D9EE FLDZ ; 374: 8B45E8 MOV EAX, [EBP-24] ; 377: 8BE0 MOV ESP, EAX ; 379: D93C24 FNSTCW [ESP] ; 37C: 9B WAIT ; 37D: 66 BYTE #X66 ; 37E: 812424FFFED92C AND DWORD PTR [ESP], 752484095 ; 385: 249B AND AL, 155 ; 387: 83C404 ADD ESP, 4 ; 38A: 8D0500000000 LEA EAX, [#x0] ; __dll__ ; 390: 8945E4 MOV [EBP-28], EAX ; 393: 8BDC MOV EBX, ESP ; 395: 83EC0C SUB ESP, 12 ; 398: 8B55E0 MOV EDX, [EBP-32] ; 39B: 8B051D000000 MOV EAX, [#x1D] ; 3A1: B904000000 MOV ECX, 4 ; 3A6: 896BFC MOV [EBX-4], EBP ; 3A9: 8BEB MOV EBP, EBX ; 3AB: FF5005 CALL DWORD PTR [EAX+5] ; 3AE: 7302 JNB L15 ; 3B0: 8BE3 MOV ESP, EBX ; 3B2: L15: 8B42FD MOV EAX, [EDX-3] ; 3B5: 8945F4 MOV [EBP-12], EAX ; 3B8: 8BDC MOV EBX, ESP ; 3BA: 83EC0C SUB ESP, 12 ; 3BD: 8B1531000000 MOV EDX, [#x31] ; 3C3: 8B0525000000 MOV EAX, [#x25] ; 3C9: B904000000 MOV ECX, 4 ; 3CE: 896BFC MOV [EBX-4], EBP ; 3D1: 8BEB MOV EBP, EBX ; 3D3: FF5005 CALL DWORD PTR [EAX+5] ; 3D6: 7302 JNB L16 ; 3D8: 8BE3 MOV ESP, EBX ; 3DA: L16: 8BFA MOV EDI, EDX ; 3DC: 8BDC MOV EBX, ESP ; 3DE: 83EC0C SUB ESP, 12 ; 3E1: 8B1535000000 MOV EDX, [#x35] ; 3E7: 8B052D000000 MOV EAX, [#x2D] ; 3ED: B908000000 MOV ECX, 8 ; 3F2: 896BFC MOV [EBX-4], EBP ; 3F5: 8BEB MOV EBP, EBX ; 3F7: FF5005 CALL DWORD PTR [EAX+5] ; 3FA: 7302 JNB L17 ; 3FC: 8BE3 MOV ESP, EBX ; 3FE: L17: 8BC2 MOV EAX, EDX ; 400: 2407 AND AL, 7 ; 402: 3C07 CMP AL, 7 ; 404: 0F85D6000000 JNE L19 ; 40A: 807AF9A2 CMP BYTE PTR [EDX-7], 162 ; 40E: 0F85CC000000 JNE L19 ; 414: L18: 83C201 ADD EDX, 1 ; 417: 83EC04 SUB ESP, 4 ; 41A: D93C24 FNSTCW [ESP] ; 41D: 9B WAIT ; 41E: 66 BYTE #X66 ; 41F: 810C240003D92C OR DWORD PTR [ESP], 752419584 ; 426: 249B AND AL, 155 ; 428: 8965E8 MOV [EBP-24], ESP ; 42B: 83EC14 SUB ESP, 20 ; 42E: 8B45F4 MOV EAX, [EBP-12] ; 431: 890424 MOV [ESP], EAX ; 434: 89542404 MOV [ESP+4], EDX ; 438: B8FFFFFFFF MOV EAX, 4294967295 ; 43D: 89442408 MOV [ESP+8], EAX ; 441: 8B45DC MOV EAX, [EBP-36] ; 444: 8944240C MOV [ESP+12], EAX ; 448: B825000000 MOV EAX, 37 ; 44D: 89442410 MOV [ESP+16], EAX ; 451: 8B45E4 MOV EAX, [EBP-28] ; 454: DDD8 FSTPD FR0 ; 456: DDD8 FSTPD FR0 ; 458: DDD8 FSTPD FR0 ; 45A: DDD8 FSTPD FR0 ; 45C: DDD8 FSTPD FR0 ; 45E: DDD8 FSTPD FR0 ; 460: DDD8 FSTPD FR0 ; 462: DDD8 FSTPD FR0 ; 464: FC CLD ; 465: FFD0 CALL EAX ; 467: D9EE FLDZ ; 469: D9EE FLDZ ; 46B: D9EE FLDZ ; 46D: D9EE FLDZ ; 46F: D9EE FLDZ ; 471: D9EE FLDZ ; 473: D9EE FLDZ ; 475: D9EE FLDZ ; 477: 8B45E8 MOV EAX, [EBP-24] ; 47A: 8BE0 MOV ESP, EAX ; 47C: D93C24 FNSTCW [ESP] ; 47F: 9B WAIT ; 480: 66 BYTE #X66 ; 481: 812424FFFED92C AND DWORD PTR [ESP], 752484095 ; 488: 249B AND AL, 155 ; 48A: 83C404 ADD ESP, 4 ; 48D: 8B05B4000005 MOV EAX, [#x50000B4] ; 493: 8B480C MOV ECX, [EAX+12] ; 496: 64 BYTE #X64 ; 497: 890D00000000 MOV [#x0], ECX ; __dll__ ; 49D: 8B00 MOV EAX, [EAX] ; 49F: 8905B4000005 MOV [#x50000B4], EAX ; 4A5: 8BD5 MOV EDX, EBP ; 4A7: 8BC4 MOV EAX, ESP ; 4A9: 83EC60 SUB ESP, 96 ; 4AC: 8B4DB4 MOV ECX, [EBP-76] ; 4AF: 8948E8 MOV [EAX-24], ECX ; 4B2: 8B4DD8 MOV ECX, [EBP-40] ; 4B5: 8950FC MOV [EAX-4], EDX ; 4B8: 8BE8 MOV EBP, EAX ; 4BA: C745F827050000 MOV DWORD PTR [EBP-8], 1319 ; 4C1: E97A040000 JMP L76 ; 4C6: 83052403000540 ADD DWORD PTR [#x5000324], 64 ; 4CD: 83052403000510 ADD DWORD PTR [#x5000324], 16 ; 4D4: 31D2 XOR EDX, EDX ; 4D6: 8D65F8 LEA ESP, [EBP-8] ; 4D9: F8 CLC ; 4DA: 8B6DFC MOV EBP, [EBP-4] ; 4DD: C20400 RET 4 ; 4E0: L19: 8BC2 MOV EAX, EDX ; 4E2: 2407 AND AL, 7 ; 4E4: 3C07 CMP AL, 7 ; 4E6: 750A JNE L20 ; 4E8: 807AF9A6 CMP BYTE PTR [EDX-7], 166 ; 4EC: 0F8422FFFFFF JEQ L18 ; 4F2: L20: 8BC2 MOV EAX, EDX ; 4F4: 2407 AND AL, 7 ; 4F6: 3C07 CMP AL, 7 ; 4F8: 750A JNE L21 ; 4FA: 807AF9AA CMP BYTE PTR [EDX-7], 170 ; 4FE: 0F8410FFFFFF JEQ L18 ; 504: L21: 8BC2 MOV EAX, EDX ; 506: 2407 AND AL, 7 ; 508: 3C07 CMP AL, 7 ; 50A: 750A JNE L22 ; 50C: 807AF9D2 CMP BYTE PTR [EDX-7], 210 ; 510: 0F84FEFEFFFF JEQ L18 ; 516: L22: 8BC2 MOV EAX, EDX ; 518: 2407 AND AL, 7 ; 51A: 3C07 CMP AL, 7 ; 51C: 750A JNE L23 ; 51E: 807AF9D6 CMP BYTE PTR [EDX-7], 214 ; 522: 0F84ECFEFFFF JEQ L18 ; 528: L23: 8BC2 MOV EAX, EDX ; 52A: 2407 AND AL, 7 ; 52C: 3C07 CMP AL, 7 ; 52E: 750A JNE L24 ; 530: 807AF9AE CMP BYTE PTR [EDX-7], 174 ; 534: 0F84DAFEFFFF JEQ L18 ; 53A: L24: 8BC2 MOV EAX, EDX ; 53C: 2407 AND AL, 7 ; 53E: 3C07 CMP AL, 7 ; 540: 750A JNE L25 ; 542: 807AF98A CMP BYTE PTR [EDX-7], 138 ; 546: 0F84C8FEFFFF JEQ L18 ; 54C: L25: 8BC2 MOV EAX, EDX ; 54E: 2407 AND AL, 7 ; 550: 3C07 CMP AL, 7 ; 552: 750A JNE L26 ; 554: 807AF98E CMP BYTE PTR [EDX-7], 142 ; 558: 0F84B6FEFFFF JEQ L18 ; 55E: L26: 8BC2 MOV EAX, EDX ; 560: 2407 AND AL, 7 ; 562: 3C07 CMP AL, 7 ; 564: 750A JNE L27 ; 566: 807AF992 CMP BYTE PTR [EDX-7], 146 ; 56A: 0F84A4FEFFFF JEQ L18 ; 570: L27: 8BC2 MOV EAX, EDX ; 572: 2407 AND AL, 7 ; 574: 3C07 CMP AL, 7 ; 576: 750A JNE L28 ; 578: 807AF996 CMP BYTE PTR [EDX-7], 150 ; 57C: 0F8492FEFFFF JEQ L18 ; 582: L28: 8BC2 MOV EAX, EDX ; 584: 2407 AND AL, 7 ; 586: 3C07 CMP AL, 7 ; 588: 750A JNE L29 ; 58A: 807AF99A CMP BYTE PTR [EDX-7], 154 ; 58E: 0F8480FEFFFF JEQ L18 ; 594: L29: 8BC2 MOV EAX, EDX ; 596: 2407 AND AL, 7 ; 598: 3C07 CMP AL, 7 ; 59A: 750A JNE L30 ; 59C: 807AF99E CMP BYTE PTR [EDX-7], 158 ; 5A0: 0F846EFEFFFF JEQ L18 ; 5A6: L30: 8BC2 MOV EAX, EDX ; 5A8: 2407 AND AL, 7 ; 5AA: 3C07 CMP AL, 7 ; 5AC: 750A JNE L31 ; 5AE: 807AF9B6 CMP BYTE PTR [EDX-7], 182 ; 5B2: 0F845CFEFFFF JEQ L18 ; 5B8: L31: 8BC2 MOV EAX, EDX ; 5BA: 2407 AND AL, 7 ; 5BC: 3C07 CMP AL, 7 ; 5BE: 750A JNE L32 ; 5C0: 807AF9BA CMP BYTE PTR [EDX-7], 186 ; 5C4: 0F844AFEFFFF JEQ L18 ; 5CA: L32: 8BC2 MOV EAX, EDX ; 5CC: 2407 AND AL, 7 ; 5CE: 3C07 CMP AL, 7 ; 5D0: 750A JNE L33 ; 5D2: 807AF9BE CMP BYTE PTR [EDX-7], 190 ; 5D6: 0F8438FEFFFF JEQ L18 ; 5DC: L33: 8BC2 MOV EAX, EDX ; 5DE: 2407 AND AL, 7 ; 5E0: 3C07 CMP AL, 7 ; 5E2: 750A JNE L34 ; 5E4: 807AF9C2 CMP BYTE PTR [EDX-7], 194 ; 5E8: 0F8426FEFFFF JEQ L18 ; 5EE: L34: 8BC2 MOV EAX, EDX ; 5F0: 2407 AND AL, 7 ; 5F2: 3C07 CMP AL, 7 ; 5F4: 750A JNE L35 ; 5F6: 807AF9C6 CMP BYTE PTR [EDX-7], 198 ; 5FA: 0F8414FEFFFF JEQ L18 ; 600: L35: 8BC2 MOV EAX, EDX ; 602: 2407 AND AL, 7 ; 604: 3C07 CMP AL, 7 ; 606: 750A JNE L36 ; 608: 807AF9CA CMP BYTE PTR [EDX-7], 202 ; 60C: 0F8402FEFFFF JEQ L18 ; 612: L36: 8BC2 MOV EAX, EDX ; 614: 2407 AND AL, 7 ; 616: 3C07 CMP AL, 7 ; 618: 750A JNE L37 ; 61A: 807AF9CE CMP BYTE PTR [EDX-7], 206 ; 61E: 0F84F0FDFFFF JEQ L18 ; 624: L37: 8BC2 MOV EAX, EDX ; 626: 2407 AND AL, 7 ; 628: 3C07 CMP AL, 7 ; 62A: 750A JNE L38 ; 62C: 807AF9DA CMP BYTE PTR [EDX-7], 218 ; 630: 0F84DEFDFFFF JEQ L18 ; 636: L38: 8BC2 MOV EAX, EDX ; 638: 2407 AND AL, 7 ; 63A: 3C07 CMP AL, 7 ; 63C: 750A JNE L39 ; 63E: 807AF9DE CMP BYTE PTR [EDX-7], 222 ; 642: 0F84CCFDFFFF JEQ L18 ; 648: L39: 8B0539000000 MOV EAX, [#x39] ; 64E: CC0A BREAK 10 ; error trap ; 650: 03 BYTE #X03 ; 651: 1F BYTE #X1F ; OBJECT-NOT-TYPE-ERROR ; 652: 8E BYTE #X8E ; EDX ; 653: 0E BYTE #X0E ; EAX ; 654: L40: 8BC2 MOV EAX, EDX ; 656: 2407 AND AL, 7 ; 658: 3C07 CMP AL, 7 ; 65A: 750A JNE L41 ; 65C: 807AF9A6 CMP BYTE PTR [EDX-7], 166 ; 660: 0F84ABFCFFFF JEQ L14 ; 666: L41: 8BC2 MOV EAX, EDX ; 668: 2407 AND AL, 7 ; 66A: 3C07 CMP AL, 7 ; 66C: 750A JNE L42 ; 66E: 807AF9AA CMP BYTE PTR [EDX-7], 170 ; 672: 0F8499FCFFFF JEQ L14 ; 678: L42: 8BC2 MOV EAX, EDX ; 67A: 2407 AND AL, 7 ; 67C: 3C07 CMP AL, 7 ; 67E: 750A JNE L43 ; 680: 807AF9D2 CMP BYTE PTR [EDX-7], 210 ; 684: 0F8487FCFFFF JEQ L14 ; 68A: L43: 8BC2 MOV EAX, EDX ; 68C: 2407 AND AL, 7 ; 68E: 3C07 CMP AL, 7 ; 690: 750A JNE L44 ; 692: 807AF9D6 CMP BYTE PTR [EDX-7], 214 ; 696: 0F8475FCFFFF JEQ L14 ; 69C: L44: 8BC2 MOV EAX, EDX ; 69E: 2407 AND AL, 7 ; 6A0: 3C07 CMP AL, 7 ; 6A2: 750A JNE L45 ; 6A4: 807AF9AE CMP BYTE PTR [EDX-7], 174 ; 6A8: 0F8463FCFFFF JEQ L14 ; 6AE: L45: 8BC2 MOV EAX, EDX ; 6B0: 2407 AND AL, 7 ; 6B2: 3C07 CMP AL, 7 ; 6B4: 750A JNE L46 ; 6B6: 807AF98A CMP BYTE PTR [EDX-7], 138 ; 6BA: 0F8451FCFFFF JEQ L14 ; 6C0: L46: 8BC2 MOV EAX, EDX ; 6C2: 2407 AND AL, 7 ; 6C4: 3C07 CMP AL, 7 ; 6C6: 750A JNE L47 ; 6C8: 807AF98E CMP BYTE PTR [EDX-7], 142 ; 6CC: 0F843FFCFFFF JEQ L14 ; 6D2: L47: 8BC2 MOV EAX, EDX ; 6D4: 2407 AND AL, 7 ; 6D6: 3C07 CMP AL, 7 ; 6D8: 750A JNE L48 ; 6DA: 807AF992 CMP BYTE PTR [EDX-7], 146 ; 6DE: 0F842DFCFFFF JEQ L14 ; 6E4: L48: 8BC2 MOV EAX, EDX ; 6E6: 2407 AND AL, 7 ; 6E8: 3C07 CMP AL, 7 ; 6EA: 750A JNE L49 ; 6EC: 807AF996 CMP BYTE PTR [EDX-7], 150 ; 6F0: 0F841BFCFFFF JEQ L14 ; 6F6: L49: 8BC2 MOV EAX, EDX ; 6F8: 2407 AND AL, 7 ; 6FA: 3C07 CMP AL, 7 ; 6FC: 750A JNE L50 ; 6FE: 807AF99A CMP BYTE PTR [EDX-7], 154 ; 702: 0F8409FCFFFF JEQ L14 ; 708: L50: 8BC2 MOV EAX, EDX ; 70A: 2407 AND AL, 7 ; 70C: 3C07 CMP AL, 7 ; 70E: 750A JNE L51 ; 710: 807AF99E CMP BYTE PTR [EDX-7], 158 ; 714: 0F84F7FBFFFF JEQ L14 ; 71A: L51: 8BC2 MOV EAX, EDX ; 71C: 2407 AND AL, 7 ; 71E: 3C07 CMP AL, 7 ; 720: 750A JNE L52 ; 722: 807AF9B6 CMP BYTE PTR [EDX-7], 182 ; 726: 0F84E5FBFFFF JEQ L14 ; 72C: L52: 8BC2 MOV EAX, EDX ; 72E: 2407 AND AL, 7 ; 730: 3C07 CMP AL, 7 ; 732: 750A JNE L53 ; 734: 807AF9BA CMP BYTE PTR [EDX-7], 186 ; 738: 0F84D3FBFFFF JEQ L14 ; 73E: L53: 8BC2 MOV EAX, EDX ; 740: 2407 AND AL, 7 ; 742: 3C07 CMP AL, 7 ; 744: 750A JNE L54 ; 746: 807AF9BE CMP BYTE PTR [EDX-7], 190 ; 74A: 0F84C1FBFFFF JEQ L14 ; 750: L54: 8BC2 MOV EAX, EDX ; 752: 2407 AND AL, 7 ; 754: 3C07 CMP AL, 7 ; 756: 750A JNE L55 ; 758: 807AF9C2 CMP BYTE PTR [EDX-7], 194 ; 75C: 0F84AFFBFFFF JEQ L14 ; 762: L55: 8BC2 MOV EAX, EDX ; 764: 2407 AND AL, 7 ; 766: 3C07 CMP AL, 7 ; 768: 750A JNE L56 ; 76A: 807AF9C6 CMP BYTE PTR [EDX-7], 198 ; 76E: 0F849DFBFFFF JEQ L14 ; 774: L56: 8BC2 MOV EAX, EDX ; 776: 2407 AND AL, 7 ; 778: 3C07 CMP AL, 7 ; 77A: 750A JNE L57 ; 77C: 807AF9CA CMP BYTE PTR [EDX-7], 202 ; 780: 0F848BFBFFFF JEQ L14 ; 786: L57: 8BC2 MOV EAX, EDX ; 788: 2407 AND AL, 7 ; 78A: 3C07 CMP AL, 7 ; 78C: 750A JNE L58 ; 78E: 807AF9CE CMP BYTE PTR [EDX-7], 206 ; 792: 0F8479FBFFFF JEQ L14 ; 798: L58: 8BC2 MOV EAX, EDX ; 79A: 2407 AND AL, 7 ; 79C: 3C07 CMP AL, 7 ; 79E: 750A JNE L59 ; 7A0: 807AF9DA CMP BYTE PTR [EDX-7], 218 ; 7A4: 0F8467FBFFFF JEQ L14 ; 7AA: L59: 8BC2 MOV EAX, EDX ; 7AC: 2407 AND AL, 7 ; 7AE: 3C07 CMP AL, 7 ; 7B0: 750A JNE L60 ; 7B2: 807AF9DE CMP BYTE PTR [EDX-7], 222 ; 7B6: 0F8455FBFFFF JEQ L14 ; 7BC: L60: 8B053D000000 MOV EAX, [#x3D] ; 7C2: CC0A BREAK 10 ; error trap ; 7C4: 03 BYTE #X03 ; 7C5: 1F BYTE #X1F ; OBJECT-NOT-TYPE-ERROR ; 7C6: 8E BYTE #X8E ; EDX ; 7C7: 0E BYTE #X0E ; EAX ; 7C8: L61: 8BF4 MOV ESI, ESP ; 7CA: 83EC0C SUB ESP, 12 ; 7CD: 8BD3 MOV EDX, EBX ; 7CF: 8B051D000000 MOV EAX, [#x1D] ; 7D5: B904000000 MOV ECX, 4 ; 7DA: 896EFC MOV [ESI-4], EBP ; 7DD: 8BEE MOV EBP, ESI ; 7DF: FF5005 CALL DWORD PTR [EAX+5] ; 7E2: 7302 JNB L62 ; 7E4: 8BE3 MOV ESP, EBX ; 7E6: L62: 8B42FD MOV EAX, [EDX-3] ; 7E9: E93CFAFFFF JMP L10 ; 7EE: L63: 31C0 XOR EAX, EAX ; 7F0: E935FAFFFF JMP L10 ; 7F5: L64: 8BC3 MOV EAX, EBX ; 7F7: 2407 AND AL, 7 ; 7F9: 3C07 CMP AL, 7 ; 7FB: 750A JNE L65 ; 7FD: 807BF946 CMP BYTE PTR [EBX-7], 70 ; 801: 0F84FEF9FFFF JEQ L9 ; 807: L65: 8BF4 MOV ESI, ESP ; 809: 83EC0C SUB ESP, 12 ; 80C: 8BD3 MOV EDX, EBX ; 80E: 8B3D41000000 MOV EDI, [#x41] ; 814: 8B0545000000 MOV EAX, [#x45] ; 81A: B908000000 MOV ECX, 8 ; 81F: 896EFC MOV [ESI-4], EBP ; 822: 8BEE MOV EBP, ESI ; 824: FF5005 CALL DWORD PTR [EAX+5] ; 827: 7302 JNB L66 ; 829: 8BE3 MOV ESP, EBX ; 82B: L66: 8B5DF4 MOV EBX, [EBP-12] ; 82E: 81FA0B000005 CMP EDX, 83886091 ; 834: 0F85CBF9FFFF JNE L9 ; 83A: 8B0549000000 MOV EAX, [#x49] ; 840: CC0A BREAK 10 ; error trap ; 842: 03 BYTE #X03 ; 843: 1F BYTE #X1F ; OBJECT-NOT-TYPE-ERROR ; 844: CE BYTE #XCE ; EBX ; 845: 0E BYTE #X0E ; EAX ; 846: L67: 8BF4 MOV ESI, ESP ; 848: 83EC0C SUB ESP, 12 ; 84B: 8BD3 MOV EDX, EBX ; 84D: 8B051D000000 MOV EAX, [#x1D] ; 853: B904000000 MOV ECX, 4 ; 858: 896EFC MOV [ESI-4], EBP ; 85B: 8BEE MOV EBP, ESI ; 85D: FF5005 CALL DWORD PTR [EAX+5] ; 860: 7302 JNB L68 ; 862: 8BE3 MOV ESP, EBX ; 864: L68: 8B42FD MOV EAX, [EDX-3] ; 867: E946F8FFFF JMP L2 ; 86C: L69: 31C0 XOR EAX, EAX ; 86E: E93FF8FFFF JMP L2 ; 873: L70: 8BC3 MOV EAX, EBX ; 875: 2407 AND AL, 7 ; 877: 3C07 CMP AL, 7 ; 879: 750A JNE L71 ; 87B: 807BF946 CMP BYTE PTR [EBX-7], 70 ; 87F: 0F8408F8FFFF JEQ L1 ; 885: L71: 8BF4 MOV ESI, ESP ; 887: 83EC0C SUB ESP, 12 ; 88A: 8BD3 MOV EDX, EBX ; 88C: 8B3D4D000000 MOV EDI, [#x4D] ; 892: 8B0545000000 MOV EAX, [#x45] ; 898: B908000000 MOV ECX, 8 ; 89D: 896EFC MOV [ESI-4], EBP ; 8A0: 8BEE MOV EBP, ESI ; 8A2: FF5005 CALL DWORD PTR [EAX+5] ; 8A5: 7302 JNB L72 ; 8A7: 8BE3 MOV ESP, EBX ; 8A9: L72: 8B5DF4 MOV EBX, [EBP-12] ; 8AC: 81FA0B000005 CMP EDX, 83886091 ; 8B2: 0F85D5F7FFFF JNE L1 ; 8B8: 8B0551000000 MOV EAX, [#x51] ; 8BE: CC0A BREAK 10 ; error trap ; 8C0: 03 BYTE #X03 ; 8C1: 1F BYTE #X1F ; OBJECT-NOT-TYPE-ERROR ; 8C2: CE BYTE #XCE ; EBX ; 8C3: 0E BYTE #X0E ; EAX ; 8C4: 8955F4 MOV [EBP-12], EDX ; 8C7: 895DF0 MOV [EBP-16], EBX ; 8CA: 894DEC MOV [EBP-20], ECX ; 8CD: 8B45AC MOV EAX, [EBP-84] ; 8D0: 8B4DB0 MOV ECX, [EBP-80] ; 8D3: 89059C000005 MOV [#x500009C], EAX ; 8D9: 890D24030005 MOV [#x5000324], ECX ; 8DF: 8B5DA8 MOV EBX, [EBP-88] ; 8E2: 8B156C030005 MOV EDX, [#x500036C] ; 8E8: 39D3 CMP EBX, EDX ; 8EA: 7428 JEQ L75 ; 8EC: L73: 8B42FC MOV EAX, [EDX-4] ; 8EF: 09C0 OR EAX, EAX ; 8F1: 740D JEQ L74 ; 8F3: 8B4AF8 MOV ECX, [EDX-8] ; 8F6: 8948FD MOV [EAX-3], ECX ; 8F9: C742FC00000000 MOV DWORD PTR [EDX-4], 0 ; 900: L74: C742F800000000 MOV DWORD PTR [EDX-8], 0 ; 907: 83EA08 SUB EDX, 8 ; 90A: 39D3 CMP EBX, EDX ; 90C: 75DE JNE L73 ; 90E: 89156C030005 MOV [#x500036C], EDX ; 914: L75: 8BD5 MOV EDX, EBP ; 916: 8BC4 MOV EAX, ESP ; 918: 83EC60 SUB ESP, 96 ; 91B: 8B4DB4 MOV ECX, [EBP-76] ; 91E: 8948E8 MOV [EAX-24], ECX ; 921: 8B4DD8 MOV ECX, [EBP-40] ; 924: 8950FC MOV [EAX-4], EDX ; 927: 8BE8 MOV EBP, EAX ; 929: C745F893090000 MOV DWORD PTR [EBP-8], 2451 ; 930: EB0E JMP L76 ; 932: 8B45F4 MOV EAX, [EBP-12] ; 935: 8B5DF0 MOV EBX, [EBP-16] ; 938: 8B4DEC MOV ECX, [EBP-20] ; 93B: E800000000 CALL L76 ; 940: L76: 8BDC MOV EBX, ESP ; 942: 83EC0C SUB ESP, 12 ; 945: 8BD1 MOV EDX, ECX ; 947: 8B0511000000 MOV EAX, [#x11] ; 94D: B904000000 MOV ECX, 4 ; 952: 896BFC MOV [EBX-4], EBP ; 955: 8BEB MOV EBP, EBX ; 957: FF5005 CALL DWORD PTR [EAX+5] ; 95A: 7302 JNB L77 ; 95C: 8BE3 MOV ESP, EBX ; 95E: L77: 8BDA MOV EBX, EDX ; 960: 895DF4 MOV [EBP-12], EBX ; 963: 8D0500000000 LEA EAX, [#x0] ; __dll__ ; 969: 8945F0 MOV [EBP-16], EAX ; 96C: 81FB0B000005 CMP EBX, 83886091 ; 972: 0F85B5000000 JNE L83 ; 978: L78: 81FB0B000005 CMP EBX, 83886091 ; 97E: 0F84A2000000 JEQ L82 ; 984: 8BC3 MOV EAX, EBX ; 986: 2407 AND AL, 7 ; 988: 3C07 CMP AL, 7 ; 98A: 7574 JNE L80 ; 98C: 807BF946 CMP BYTE PTR [EBX-7], 70 ; 990: 756E JNE L80 ; 992: 8B43FD MOV EAX, [EBX-3] ; 995: L79: 83EC04 SUB ESP, 4 ; 998: D93C24 FNSTCW [ESP] ; 99B: 9B WAIT ; 99C: 66 BYTE #X66 ; 99D: 810C240003D92C OR DWORD PTR [ESP], 752419584 ; 9A4: 249B AND AL, 155 ; 9A6: 8965F4 MOV [EBP-12], ESP ; 9A9: 83EC08 SUB ESP, 8 ; 9AC: 890424 MOV [ESP], EAX ; 9AF: 8B45E8 MOV EAX, [EBP-24] ; 9B2: 89442404 MOV [ESP+4], EAX ; 9B6: 8B45F0 MOV EAX, [EBP-16] ; 9B9: DDD8 FSTPD FR0 ; 9BB: DDD8 FSTPD FR0 ; 9BD: DDD8 FSTPD FR0 ; 9BF: DDD8 FSTPD FR0 ; 9C1: DDD8 FSTPD FR0 ; 9C3: DDD8 FSTPD FR0 ; 9C5: DDD8 FSTPD FR0 ; 9C7: DDD8 FSTPD FR0 ; 9C9: FC CLD ; 9CA: FFD0 CALL EAX ; 9CC: D9EE FLDZ ; 9CE: D9EE FLDZ ; 9D0: D9EE FLDZ ; 9D2: D9EE FLDZ ; 9D4: D9EE FLDZ ; 9D6: D9EE FLDZ ; 9D8: D9EE FLDZ ; 9DA: D9EE FLDZ ; 9DC: 8B45F4 MOV EAX, [EBP-12] ; 9DF: 8BE0 MOV ESP, EAX ; 9E1: D93C24 FNSTCW [ESP] ; 9E4: 9B WAIT ; 9E5: 66 BYTE #X66 ; 9E6: 812424FFFED92C AND DWORD PTR [ESP], 752484095 ; 9ED: 249B AND AL, 155 ; 9EF: 83C404 ADD ESP, 4 ; 9F2: B80B000005 MOV EAX, 83886091 ; 9F7: 8D65F8 LEA ESP, [EBP-8] ; 9FA: 8B6DFC MOV EBP, [EBP-4] ; 9FD: C20400 RET 4 ; A00: L80: 8BF4 MOV ESI, ESP ; A02: 83EC0C SUB ESP, 12 ; A05: 8BD3 MOV EDX, EBX ; A07: 8B051D000000 MOV EAX, [#x1D] ; A0D: B904000000 MOV ECX, 4 ; A12: 896EFC MOV [ESI-4], EBP ; A15: 8BEE MOV EBP, ESI ; A17: FF5005 CALL DWORD PTR [EAX+5] ; A1A: 7302 JNB L81 ; A1C: 8BE3 MOV ESP, EBX ; A1E: L81: 8B42FD MOV EAX, [EDX-3] ; A21: E96FFFFFFF JMP L79 ; A26: L82: 31C0 XOR EAX, EAX ; A28: E968FFFFFF JMP L79 ; A2D: L83: 8BC3 MOV EAX, EBX ; A2F: 2407 AND AL, 7 ; A31: 3C07 CMP AL, 7 ; A33: 750A JNE L84 ; A35: 807BF946 CMP BYTE PTR [EBX-7], 70 ; A39: 0F8439FFFFFF JEQ L78 ; A3F: L84: 8BF4 MOV ESI, ESP ; A41: 83EC0C SUB ESP, 12 ; A44: 8BD3 MOV EDX, EBX ; A46: 8B3D55000000 MOV EDI, [#x55] ; A4C: 8B0545000000 MOV EAX, [#x45] ; A52: B908000000 MOV ECX, 8 ; A57: 896EFC MOV [ESI-4], EBP ; A5A: 8BEE MOV EBP, ESI ; A5C: FF5005 CALL DWORD PTR [EAX+5] ; A5F: 7302 JNB L85 ; A61: 8BE3 MOV ESP, EBX ; A63: L85: 8B5DF4 MOV EBX, [EBP-12] ; A66: 81FA0B000005 CMP EDX, 83886091 ; A6C: 0F8506FFFFFF JNE L78 ; A72: 8B0559000000 MOV EAX, [#x59] ; A78: CC0A BREAK 10 ; error trap ; A7A: 03 BYTE #X03 ; A7B: 1F BYTE #X1F ; OBJECT-NOT-TYPE-ERROR ; A7C: CE BYTE #XCE ; EBX ; A7D: 0E BYTE #X0E ; EAX ; A7E: 90 NOP ; A7F: 90 NOP ; A80: L86: CC0A BREAK 10 ; error trap ; A82: 02 BYTE #X02 ; A83: 18 BYTE #X18 ; INVALID-ARG-COUNT-ERROR ; A84: 4D BYTE #X4D ; ECX