; ; Code generated by version 32016-KR/03 ; MODULE Test ; EXPORTC Test__Test IMPORTC Debug_WriteS IMPORTC Debug_WriteLn IMPORT TKCalls_1 IMPORTC TKCalls_TKCall IMPORTC Debug_WriteI IMPORTC Debug_Writeln IMPORTC Storage_ALLOCATE IMPORTC SYSTEM_M2TRAP ; Global data size 52 bytes ; AREADEF Test_data_frame, [DATA], DOUBLE AREA Test_data_frame EXPORT Test_1 Test_1 DEFSB Test_1 ADDRESS Test_4 ADDRESS Test_3 DCD #X80000000 DCD 0 ; 12 DCD 0 ; 16 DCD 0 ; 20 DCD 0 ; 24 DCD 0 ; 28 DCD 0 ; 32 DCD 0 ; 36 DCD 0 ; 40 DCD 0 ; 44 DCD 0 ; 48 Test_3 ALIGN 4 DCS 'Test of auto-repeat rate',0 ALIGN 4 DCS 'Before new: ptr = ',0 ALIGN 4 DCS 'After: ptr = ',0 ALIGN 4 DCS 'A string!!!',0 ALIGN 4 DCS 'INTEST',0 ALIGN 4 DCS 'OUTTEST',0 ALIGN 4 DCS 'Copying from INTEST to OUTTEST + TTY:**N',0 ALIGN 4 DCS '****** Stream error on !',0 ALIGN 4 DCS '****** Stream error on !',0 ALIGN 4 DCS '****** Stream error on !',0 AREADEF Test_code_frame, [CODE, READ], DOUBLE AREA Test_code_frame Test_0 ; Entry point to MODULE Test ; Locals: TTY: 12(SB) InFile: 16(SB) OutFile: 20(SB) ; X: 24(SB) Y: 28(SB) A: 32(SB) ; Char: 36(SB) Ptr: 40(SB) Str: 44(SB) ; I: 48(SB) Test__Test L0 ENTER [],0 ; 0 (@0000): 82, 0, 0 MOVZBD =23,TOS ; 3 (@0003): CE, D8, A5, 17 ADDR 0(4(SB)),TOS ; 7 (@0007): E7, 95, 4, 0 CXP Debug_WriteS ; 11 (@000B): 22, 0 CXP Debug_WriteLn ; 13 (@000D): 22, 1 MOVZBD =12,32(SB) ; 15 (@000F): CE, 98, A6, C, 20 MOVQD =2,24(SB) ; 20 (@0014): 5F, D1, 18 MOVQD =0,28(SB) ; 23 (@0017): 5F, D0, 1C MOVD TKCalls_1+12,R0 ; 26 (@001A): 17, B0, 2, C MOVQD =6,0(R0) ; 30 (@001E): 5F, 43, 0 CMPQD =0,32(SB) ; 33 (@0021): 1F, D0, 20 BLE L41 ; 36 (@0024): 7A, 5 BSR L323 ; 38 (@0026): 2, 81, 1D L41 MOVD 32(SB),4(R0) ; 41 (@0029): 17, D2, 20, 4 CMPQD =0,24(SB) ; 45 (@002D): 1F, D0, 18 BLE L53 ; 48 (@0030): 7A, 5 BSR L323 ; 50 (@0032): 2, 81, 11 L53 MOVD 24(SB),8(R0) ; 53 (@0035): 17, D2, 18, 8 CMPQD =0,28(SB) ; 57 (@0039): 1F, D0, 1C BLE L65 ; 60 (@003C): 7A, 5 BSR L323 ; 62 (@003E): 2, 81, 5 L65 MOVD 28(SB),12(R0) ; 65 (@0041): 17, D2, 1C, C CXP TKCalls_TKCall ; 69 (@0045): 22, 3 MOVZBD =17,TOS ; 71 (@0047): CE, D8, A5, 11 ADDR 28(4(SB)),TOS ; 75 (@004B): E7, 95, 4, 1C CXP Debug_WriteS ; 79 (@004F): 22, 0 MOVD 40(SB),TOS ; 81 (@0051): D7, D5, 28 CXP Debug_WriteI ; 84 (@0054): 22, 4 CXP Debug_Writeln ; 86 (@0056): 22, 5 MOVZBD =16,TOS ; 88 (@0058): CE, D8, A5, 10 ADDR 40(SB),TOS ; 92 (@005C): E7, D5, 28 CXP Storage_ALLOCATE ; 95 (@005F): 22, 6 MOVZBD =12,TOS ; 97 (@0061): CE, D8, A5, C ADDR 48(4(SB)),TOS ; 101 (@0065): E7, 95, 4, 30 CXP Debug_WriteS ; 105 (@0069): 22, 0 MOVD 40(SB),TOS ; 107 (@006B): D7, D5, 28 CXP Debug_WriteI ; 110 (@006E): 22, 4 CXP Debug_Writeln ; 112 (@0070): 22, 5 MOVZBD =10,TOS ; 114 (@0072): CE, D8, A5, A ADDR 64(4(SB)),TOS ; 118 (@0076): E7, 95, 4, 80, 40 CXP String_CopyLS ; 123 (@007B): 22, 7 MOVD R0,44(SB) ; 125 (@007D): 97, 6, 2C MOVQD =0,48(SB) ; 128 (@0080): 5F, D0, 30 L131 MOVD 48(SB),R0 ; 131 (@0083): 17, D0, 30 CMPD =1024,R0 ; 134 (@0086): 7, A0, 0, 0, 4, 0 BHS L145 ; 140 (@008C): BA, 5 BSR L327 ; 142 (@008E): 2, 80, B9 L145 CMPQB =0,0(44(SB)) [R0:B] ; 145 (@0091): 1C, E0, 90, 2C, 0 BNE L154 ; 150 (@0096): 1A, 4 BR L167 ; 152 (@0098): EA, F L154 MOVZBD 0(44(SB)) [R0:B],TOS ; 154 (@009A): CE, D8, E5, 90, 2C, 0 CXP Debug_Wrch ; 160 (@00A0): 22, 8 ADDQD =1,48(SB) ; 162 (@00A2): 8F, D0, 30 BR L131 ; 165 (@00A5): EA, 5E L167 CXP Debug_Writeln ; 167 (@00A7): 22, 5 CXP TermIO_FindInOutput ; 169 (@00A9): 22, 9 MOVD R0,12(SB) ; 171 (@00AB): 97, 6, C MOVQD =5,TOS ; 174 (@00AE): DF, BA ADDR 76(4(SB)),TOS ; 176 (@00B0): E7, 95, 4, 80, 4C CXP FileIO_FindInput ; 181 (@00B5): 22, A MOVD R0,16(SB) ; 183 (@00B7): 97, 6, 10 MOVQD =6,TOS ; 186 (@00BA): 5F, BB ADDR 84(4(SB)),TOS ; 188 (@00BC): E7, 95, 4, 80, 54 CXP FileIO_FindOutput ; 193 (@00C1): 22, B MOVD R0,20(SB) ; 195 (@00C3): 97, 6, 14 MOVZBD =38,TOS ; 198 (@00C6): CE, D8, A5, 26 ADDR 92(4(SB)),TOS ; 202 (@00CA): E7, 95, 4, 80, 5C MOVD 12(SB),TOS ; 207 (@00CF): D7, D5, C CXP FormatIO_WriteChars ; 210 (@00D2): 22, C L212 ADDR 36(SB),TOS ; 212 (@00D4): E7, D5, 24 MOVD 16(SB),TOS ; 215 (@00D7): D7, D5, 10 CXP Streams_Get ; 218 (@00DA): 22, D CMPQD =0,0(16(SB)) ; 220 (@00DC): 1F, 90, 10, 0 BEQ L241 ; 224 (@00E0): A, 11 MOVZBD =28,TOS ; 226 (@00E2): CE, D8, A5, 1C ADDR 132(4(SB)),TOS ; 230 (@00E6): E7, 95, 4, 80, 84 CXP Debug_WriteS ; 235 (@00EB): 22, 0 CXP Debug_WriteLn ; 237 (@00ED): 22, 1 BR L292 ; 239 (@00EF): EA, 35 L241 MOVZBD 36(SB),TOS ; 241 (@00F1): CE, D8, D5, 24 MOVD 20(SB),TOS ; 245 (@00F5): D7, D5, 14 CXP Streams_Put ; 248 (@00F8): 22, E CMPQD =0,0(20(SB)) ; 250 (@00FA): 1F, 90, 14, 0 BEQ L271 ; 254 (@00FE): A, 11 MOVZBD =28,TOS ; 256 (@0100): CE, D8, A5, 1C ADDR 164(4(SB)),TOS ; 260 (@0104): E7, 95, 4, 80, A4 CXP Debug_WriteS ; 265 (@0109): 22, 0 CXP Debug_WriteLn ; 267 (@010B): 22, 1 BR L309 ; 269 (@010D): EA, 28 L271 MOVZBD 36(SB),TOS ; 271 (@010F): CE, D8, D5, 24 MOVD 12(SB),TOS ; 275 (@0113): D7, D5, C CXP Streams_Put ; 278 (@0116): 22, E CMPQD =0,0(12(SB)) ; 280 (@0118): 1F, 90, C, 0 BEQ L306 ; 284 (@011C): A, 16 MOVZBD =28,TOS ; 286 (@011E): CE, D8, A5, 1C BR L295 ; 290 (@0122): EA, 5 L292 BR L309 ; 292 (@0124): EA, 80, 11 L295 ADDR 196(4(SB)),TOS ; 295 (@0127): E7, 95, 4, 80, C4 CXP Debug_WriteS ; 300 (@012C): 22, 0 CXP Debug_WriteLn ; 302 (@012E): 22, 1 BR L309 ; 304 (@0130): EA, 5 L306 BR L212 ; 306 (@0132): EA, BF, A2 L309 MOVD 20(SB),TOS ; 309 (@0135): D7, D5, 14 CXP Streams_Flush ; 312 (@0138): 22, F ADDR 20(SB),TOS ; 314 (@013A): E7, D5, 14 CXP Streams_Delete ; 317 (@013D): 22, 10 EXIT [] ; 319 (@013F): 92, 0 RXP 0 ; 321 (@0141): 32, 0 L323 MOVQD =5,TOS ; 323 (@0143): DF, BA BR L329 ; 325 (@0145): EA, 4 L327 MOVQD =6,TOS ; 327 (@0147): 5F, BB L329 CXP SYSTEM_M2TRAP ; 329 (@0149): 22, 11 Test_5 AREADEF Test_code_table, [DATA, READ], DOUBLE AREA Test_code_table EXPORT Test_2 Test_2 DCD Test_5 - Test_0 DCD 1 DCD 52 ADDRESS Test_0 Test_4 CDESC Test__Test END