|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 DFS Tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 DFS Tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 3072 (0xc00)
Types: SEG
Notes: 5811_R1K_CODE
Names: »786451.SEG«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─ ⟦this⟧ »786451.SEG«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─ ⟦this⟧ »786451.SEG«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »786451.SEG«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »786451.SEG«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »786451.SEG«
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5811 |X | .CONST 0x5811 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0300 | | .CONST 0x0300 ; Offset of debug table
0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction
0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion
0006 0000 | | .CONST 0x0000 ; Offset to segment table (only in elab segments)
0007 0002 | | .CONST 0x0002 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0071 | q | .CONST 0x0071 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0040 | @ | .CONST 0x0040 ; Number of locals
000b INIT_0008:
000b 0007 | | Action Break_Optional ; Debug Table 0x0 = .DEBUG 0x000b,0x03a2,0xc000,0x0000,0x0036,0xba34,0x0000,0x0005
; Debug Table 0x0.0x0 = 0xb,0xffff
000c 0007 | | Action Break_Optional ; Debug Table 0x0.0x1 = 0xc,0xfffe
000d 029a 007b | {| Declare_Subprogram INIT_0078,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2 = 0xd,0xfffd
000f 029a 008b | | Declare_Subprogram INIT_0088,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3 = 0xf,0xfffc
0011 029a 0093 | | Declare_Subprogram INIT_0090,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x4 = 0x11,0xfffb
0013 029a 009b | | Declare_Subprogram INIT_0098,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x5 = 0x13,0xfffa
0015 029a 00ab | | Declare_Subprogram INIT_00a8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x6 = 0x15,0xfff9
0017 029a 00c3 | | Declare_Subprogram INIT_00c0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x7 = 0x17,0xfff8
0019 4809 |H | Short_Literal 0x9 ; Debug Table 0x0.0x8 = 0x19,0xfff7
001a 61cd |a | Indirect_Literal Discrete,0x1e8,{0x000c0013, 0x00001f30} ; 0xc0013 = COMMAND_INTERPRETER
001b 02a0 | | Declare_Subprogram Null_Subprogram
001c 038d | | Declare_Type Package,Defined,Visible,Not_Elaborated
001d 029a 00db | | Declare_Subprogram INIT_00d8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x9 = 0x1d,0xfff6
001f 61c4 |a | Indirect_Literal Discrete,0x1e4,{0x00000000, 0x36ba3401} ; Debug Table 0x0.0xa = 0x1f,0xfff5
0020 0129 | ) | Execute Any,Make_Visible
0021 61be |a | Indirect_Literal Discrete,0x1e0,{0x00000000, 0x36ba3402} ; Debug Table 0x0.0xb = 0x21,0xfff4
0022 0129 | ) | Execute Any,Make_Visible
0023 00bf | | Action Accept_Activation
0024 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x0024,0x03bc,0xc000,0x0000,0x0036,0xbfd4,0x0000,0x0017
; Debug Table 0x1.0x0 = 0x24,0xffff
0025 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x1.0x1 = 0x25,0xfffe
0026 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0027 0092 028c | | Action Push_String_Extended,0x28c ; "Page mode"
; Debug Table 0x1.0x2 = 0x27,0xfffd
0029 0092 028d | | Action Push_String_Extended,0x28d ; "Echo mode"
; Debug Table 0x1.0x3 = 0x29,0xfffc
002b 0092 028e | | Action Push_String_Extended,0x28e ; "Number of lines"
; Debug Table 0x1.0x4 = 0x2b,0xfffb
002d 0092 028f | | Action Push_String_Extended,0x28f ; "Number of columns"
; Debug Table 0x1.0x5 = 0x2d,0xfffa
002f e001 | | Load 0x0,0x1 ; Debug Table 0x1.0x6 = 0x2f,0xfff9
0030 1912 | | Execute Package,Field_Reference,Field_Number 0x12
0031 0007 | | Action Break_Optional
0032 e002 | | Load 0x0,0x2 ; Debug Table 0x1.0x7 = 0x32,0xfff8
0033 1927 | ' | Execute Package,Field_Reference,Field_Number 0x27
0034 0007 | | Action Break_Optional
0035 029d 012b | +| Declare_Subprogram INIT_0128,For_Outer_Call ; Debug Table 0x1.0x8 = 0x35,0xfff7
0037 e003 | | Load 0x0,0x3 ; Debug Table 0x1.0x9 = 0x37,0xfff6
0038 00b6 | | Action Make_Scope
0039 1d3c | < | Execute_Immediate Reference_Lex_1,0x3c
003a 4803 |H | Short_Literal 0x3
003b e231 | 1 | Load 0x1,0x31
003c 020e | | Execute Module,Augment_Imports
003d e231 | 1 | Load 0x1,0x31
003e 020d | | Execute Module,Elaborate
003f 0007 | | Action Break_Optional
0040 619b |a | Indirect_Literal Discrete,0x1dc,{0x00000000, 0x0036bfd4} ; Debug Table 0x1.0xa = 0x40,0xfff5
0041 4957 |IW | Short_Literal 0x157
0042 e20f | | Load 0x1,0xf
0043 0092 0290 | | Action Push_String_Extended,0x290 ; "Command"
0045 4801 |H | Short_Literal 0x1
0046 6191 |a | Indirect_Literal Discrete,0x1d8,{0x00000000, 0x7fffffff}
0047 00db | | Load_Top At_Offset_3
0048 0269 | i | Execute Discrete,Last
0049 e20f | | Load 0x1,0xf
004a 025b | [ | Execute Discrete,Check_In_Type
004b e215 | | Load 0x1,0x15
004c e216 | | Load 0x1,0x16
004d e231 | 1 | Load 0x1,0x31
004e 0387 | | Declare_Variable Package
004f 00d8 | | Load_Top At_Offset_0
0050 020f | | Execute Module,Activate
0051 618a |a | Indirect_Literal Discrete,0x1dc,{0x00000000, 0x0036bfd4} ; Debug Table 0x1.0xb = 0x51,0xfff4
0052 4966 |If | Short_Literal 0x166
0053 00e1 | | Load_Encached Boolean_Cache
0054 0092 0291 | | Action Push_String_Extended,0x291 ; "Boolean"
0056 4801 |H | Short_Literal 0x1
0057 6180 |a | Indirect_Literal Discrete,0x1d8,{0x00000000, 0x7fffffff}
0058 4801 |H | Short_Literal 0x1
0059 4805 |H | Short_Literal 0x5
005a 4808 |H | Short_Literal 0x8
005b e231 | 1 | Load 0x1,0x31
005c 0387 | | Declare_Variable Package
005d 00d8 | | Load_Top At_Offset_0
005e 020f | | Execute Module,Activate
005f 029d 013b | ;| Declare_Subprogram INIT_0138,For_Outer_Call ; Debug Table 0x1.0xc = 0x5f,0xfff3
0061 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c ; Debug Table 0x1.0xd = 0x61,0xfff2
0062 00c7 | | Action Elaborate_Subprogram
0063 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d ; Debug Table 0x1.0xe = 0x63,0xfff1
0064 00c7 | | Action Elaborate_Subprogram
0065 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e ; Debug Table 0x1.0xf = 0x65,0xfff0
0066 00c7 | | Action Elaborate_Subprogram
0067 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f ; Debug Table 0x1.0x10 = 0x67,0xffef
0068 00c7 | | Action Elaborate_Subprogram
0069 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30 ; Debug Table 0x1.0x11 = 0x69,0xffee
006a 00c7 | | Action Elaborate_Subprogram
006b 029d 0143 | C| Declare_Subprogram INIT_0140,For_Outer_Call ; Debug Table 0x1.0x12 = 0x6b,0xffed
006d 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b ; Debug Table 0x1.0x13 = 0x6d,0xffec
006e 00c7 | | Action Elaborate_Subprogram
006f 1d32 | 2 | Execute_Immediate Reference_Lex_1,0x32 ; Debug Table 0x1.0x14 = 0x6f,0xffeb
0070 00c7 | | Action Elaborate_Subprogram
0071 BODY_0008:
0071 00bc | | Action Signal_Activated
0072 00bb | | Action Signal_Completion
0073 0000 0000 | | .BLANK 0000[0x5]
0078 ; --------------------------------------------------------------------------------------
0078 ; SUBPROGRAM
0078 ; --------------------------------------------------------------------------------------
0078 007b | { | .CONST 0x007b ; Address of begin
0079 0004 | | .CONST 0x0004 ; Address of exception handler
007a 0001 | | .CONST 0x0001 ; Number of locals
007b BODY_0078:
007b INIT_0078:
007b e235 | 5 | Load 0x1,0x35 ; Debug Table 0x2 = .DEBUG 0x007b,0x03e8,0x1001,0x0000,0x0036,0xba34,0x0000,0x00ee
; Debug Table 0x2.0x0 = 0x7b,0x1
007c 6802 |h | Jump_Zero 0x7f
007d e234 | 4 | Load 0x1,0x34 ; Debug Table 0x2.0x1 = 0x7d,0x2
007e 0257 | W | Execute Discrete,Raise
007f 4801 |H | Short_Literal 0x1 ; Debug Table 0x2.0x2 = 0x7f,0x3
0080 a235 | 5 | Store_Unchecked 0x1,0x35
0081 00cf | | Action Mark_Auxiliary
0082 7802 |x | Jump 0x85
0083 8240 | @ | Call 0x1,0x40 ; Debug Table 0x2.0x3 = 0x83,0x5
0084 00c9 | | Action Pop_Auxiliary_Loop
0085 e235 | 5 | Load 0x1,0x35 ; Debug Table 0x2.0x4 = 0x85,0x4
0086 77fc |w | Jump_Nonzero 0x83
0087 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0088 ; --------------------------------------------------------------------------------------
0088 ; SUBPROGRAM
0088 ; --------------------------------------------------------------------------------------
0088 008b | | .CONST 0x008b ; Address of begin
0089 0004 | | .CONST 0x0004 ; Address of exception handler
008a 0001 | | .CONST 0x0001 ; Number of locals
008b BODY_0088:
008b INIT_0088:
008b 4800 |H | Short_Literal 0x0 ; Debug Table 0x3 = .DEBUG 0x008b,0x03f4,0x1001,0x0000,0x0036,0xba34,0x0000,0x00f2
; Debug Table 0x3.0x0 = 0x8b,0x1
008c a235 | 5 | Store_Unchecked 0x1,0x35
008d 4501 |E | Exit_Suprogram New_Top_Offset 0x1
008e 0000 0000 | | .XXX[0x2]
0090 ; --------------------------------------------------------------------------------------
0090 ; SUBPROGRAM
0090 ; --------------------------------------------------------------------------------------
0090 0093 | | .CONST 0x0093 ; Address of begin
0091 0004 | | .CONST 0x0004 ; Address of exception handler
0092 0001 | | .CONST 0x0001 ; Number of locals
0093 BODY_0090:
0093 INIT_0090:
0093 00da | | Load_Top At_Offset_2 ; Debug Table 0x4 = .DEBUG 0x0093,0x03f8,0x1001,0x0000,0x0036,0xba34,0x0000,0x00f6
; Debug Table 0x4.0x0 = 0x93,0x1
0094 e23d | = | Load 0x1,0x3d
0095 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0096 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0097 0000 | | .XXX[0x1]
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 009b | | .CONST 0x009b ; Address of begin
0099 0004 | | .CONST 0x0004 ; Address of exception handler
009a 0001 | | .CONST 0x0001 ; Number of locals
009b BODY_0098:
009b INIT_0098:
009b 00da | | Load_Top At_Offset_2 ; Debug Table 0x5 = .DEBUG 0x009b,0x03fc,0x1002,0x0000,0x0036,0xba34,0x0000,0x00ff
; Debug Table 0x5.0x0 = 0x9b,0x1
009c e23d | = | Load 0x1,0x3d
009d 1816 | | Execute Package,Field_Execute,Field_Number 0x16
009e e20f | | Load 0x1,0xf
009f 025b | [ | Execute Discrete,Check_In_Type
00a0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00a1 0000 0000 | | .BLANK 0000[0x7]
00a8 ; --------------------------------------------------------------------------------------
00a8 ; SUBPROGRAM
00a8 ; --------------------------------------------------------------------------------------
00a8 00ab | | .CONST 0x00ab ; Address of begin
00a9 00b2 | | .CONST 0x00b2 ; Address of exception handler
00aa 0001 | | .CONST 0x0001 ; Number of locals
00ab BODY_00a8:
00ab INIT_00a8:
00ab 4800 |H | Short_Literal 0x0 ; Debug Table 0x6 = .DEBUG 0x00ab,0x0400,0x1002,0x0000,0x0036,0xba34,0x0000,0x010b
; Debug Table 0x6.0x0 = 0xab,0x1
00ac 00db | | Load_Top At_Offset_3
00ad 8217 | | Call 0x1,0x17
00ae 00e2 | | Load_Encached Integer_Cache
00af 00e0 | | Load_Encached Standard_Cache
00b0 1819 | | Execute Package,Field_Execute,Field_Number 0x19
00b1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00b2 TRAP_00a8:
00b2 010e | | Execute Exception,Is_Constraint_Error
00b3 6806 |h | Jump_Zero 0xba
00b4 0092 0292 | | Action Push_String_Extended,0x292 ; "Illegal integer value"
; Debug Table 0x6.0x1 = 0xb4,0x2
00b6 821a | | Call 0x1,0x1a
00b7 00db | | Load_Top At_Offset_3 ; Debug Table 0x6.0x2 = 0xb7,0x3
00b8 822f | / | Call 0x1,0x2f
00b9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00ba 0100 | | Execute Exception,Raise
00bb 0000 0000 | | .BLANK 0000[0x5]
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00c3 | | .CONST 0x00c3 ; Address of begin
00c1 00ca | | .CONST 0x00ca ; Address of exception handler
00c2 0001 | | .CONST 0x0001 ; Number of locals
00c3 BODY_00c0:
00c3 INIT_00c0:
00c3 4800 |H | Short_Literal 0x0 ; Debug Table 0x7 = .DEBUG 0x00c3,0x0408,0x1002,0x0000,0x0036,0xba34,0x0000,0x0114
; Debug Table 0x7.0x0 = 0xc3,0x1
00c4 00db | | Load_Top At_Offset_3
00c5 8217 | | Call 0x1,0x17
00c6 00e5 | | Load_Encached Long_Integer_Cache
00c7 00e0 | | Load_Encached Standard_Cache
00c8 1819 | | Execute Package,Field_Execute,Field_Number 0x19
00c9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00ca TRAP_00c0:
00ca 010e | | Execute Exception,Is_Constraint_Error
00cb 6806 |h | Jump_Zero 0xd2
00cc 0092 0293 | | Action Push_String_Extended,0x293 ; "Illegal Long_Integer value"
; Debug Table 0x7.0x1 = 0xcc,0x2
00ce 821a | | Call 0x1,0x1a
00cf 00db | | Load_Top At_Offset_3 ; Debug Table 0x7.0x2 = 0xcf,0x3
00d0 8230 | 0 | Call 0x1,0x30
00d1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00d2 0100 | | Execute Exception,Raise
00d3 0000 0000 | | .BLANK 0000[0x5]
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00ee | | .CONST 0x00ee ; Address of begin
00d9 0004 | | .CONST 0x0004 ; Address of exception handler
00da 0008 | | .CONST 0x0008 ; Number of locals
00db INIT_00d8:
00db e5fa | | Load 0x2,-0x6 ; Debug Table 0x8 = .DEBUG 0x00db,0x0410,0x3801,0x0002,0x0036,0xba34,0x0000,0x016f
; Debug Table 0x8.0x0 = 0xdb,0xffff
00dc 02c7 | | Declare_Variable Any
00dd 00d8 | | Load_Top At_Offset_0
00de 1c00 | | Execute_Immediate Run_Utility,0x0
00df 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x8.0x1 = 0xdf,0xfffe
00e0 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x8.0x2 = 0xe0,0xfffd
00e1 e5f8 | | Load 0x2,-0x8 ; Debug Table 0x8.0x3 = 0xe1,0xfffc
00e2 01dd | | Execute Vector,First
00e3 00e3 | | Load_Encached Natural_Cache
00e4 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
00e5 e5f8 | | Load 0x2,-0x8 ; Debug Table 0x8.0x4 = 0xe5,0xfffb
00e6 01dc | | Execute Vector,Last
00e7 00e3 | | Load_Encached Natural_Cache
00e8 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
00e9 0007 | | Action Break_Optional ; Debug Table 0x8.0x5 = 0xe9,0xfffa
00ea 029f 017b | {| Declare_Subprogram INIT_0178,For_Call ; Debug Table 0x8.0x6 = 0xea,0xfff9
00ec 029f 01bb | | Declare_Subprogram INIT_01b8,For_Call ; Debug Table 0x8.0x7 = 0xec,0xfff8
00ee BODY_00d8:
00ee 00be | | Action Activate_Tasks
00ef e5f8 | | Load 0x2,-0x8 ; Debug Table 0x8.0x8 = 0xef,0x1
00f0 01db | | Execute Vector,Length
00f1 7001 |p | Jump_Nonzero 0xf3
00f2 4509 |E | Exit_Suprogram New_Top_Offset 0x9 ; Debug Table 0x8.0x9 = 0xf2,0x2
00f3 e004 | | Load 0x0,0x4 ; Debug Table 0x8.0xa = 0xf3,0x3
00f4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00f5 e5f8 | | Load 0x2,-0x8
00f6 01dd | | Execute Vector,First
00f7 e5f8 | | Load 0x2,-0x8
00f8 01d7 | | Execute Vector,Field_Read
00f9 823a | : | Call 0x1,0x3a
00fa 0f02 | | Execute_Immediate Equal,0x2
00fb a403 | | Store_Unchecked 0x2,0x3
00fc e004 | | Load 0x0,0x4 ; Debug Table 0x8.0xb = 0xfc,0x4
00fd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00fe e5f8 | | Load 0x2,-0x8
00ff 01dc | | Execute Vector,Last
0100 e5f8 | | Load 0x2,-0x8
0101 01d7 | | Execute Vector,Field_Read
0102 823a | : | Call 0x1,0x3a
0103 0f02 | | Execute_Immediate Equal,0x2
0104 a404 | | Store_Unchecked 0x2,0x4
0105 e403 | | Load 0x2,0x3 ; Debug Table 0x8.0xc = 0x105,0x5
0106 e404 | | Load 0x2,0x4
0107 0278 | x | Execute Discrete,Or
0108 6817 |h | Jump_Zero 0x120
0109 e403 | | Load 0x2,0x3 ; Debug Table 0x8.0xd = 0x109,0x6
010a 6803 |h | Jump_Zero 0x10e
010b 00db | | Load_Top At_Offset_3 ; Debug Table 0x8.0xe = 0x10b,0x7
010c 0a01 | | Execute_Immediate Plus,0x1
010d c405 | | Store 0x2,0x5
010e e404 | | Load 0x2,0x4 ; Debug Table 0x8.0xf = 0x10e,0x8
010f 6803 |h | Jump_Zero 0x113
0110 00da | | Load_Top At_Offset_2 ; Debug Table 0x8.0x10 = 0x110,0x9
0111 0aff | | Execute_Immediate Plus,-0x1
0112 005b | [ | Store_Top Discrete,At_Offset_3
0113 00db | | Load_Top At_Offset_3 ; Debug Table 0x8.0x11 = 0x113,0xa
0114 00db | | Load_Top At_Offset_3
0115 027a | z | Execute Discrete,Less_Equal
0116 6806 |h | Jump_Zero 0x11d
0117 00db | | Load_Top At_Offset_3 ; Debug Table 0x8.0x12 = 0x117,0xb
0118 00db | | Load_Top At_Offset_3
0119 e5f8 | | Load 0x2,-0x8
011a 01cf | | Execute Vector,Slice_Read
011b 8408 | | Call 0x2,0x8
011c 4509 |E | Exit_Suprogram New_Top_Offset 0x9
011d 00ea | | Load_Encached Null_String_Cache ; Debug Table 0x8.0x13 = 0x11d,0xc
011e 8408 | | Call 0x2,0x8
011f 4509 |E | Exit_Suprogram New_Top_Offset 0x9
0120 e5f8 | | Load 0x2,-0x8 ; Debug Table 0x8.0x14 = 0x120,0xd
0121 85f9 | | Call 0x2,-0x7
0122 4509 |E | Exit_Suprogram New_Top_Offset 0x9
0123 0000 0000 | | .BLANK 0000[0x5]
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; --------------------------------------------------------------------------------------
0128 012b | + | .CONST 0x012b ; Address of begin
0129 0004 | | .CONST 0x0004 ; Address of exception handler
012a 0001 | | .CONST 0x0001 ; Number of locals
012b BODY_0128:
012b INIT_0128:
012b 8229 | ) | Call 0x1,0x29 ; Debug Table 0x9 = .DEBUG 0x012b,0x043c,0x1001,0x0000,0x0036,0xbfd4,0x0000,0x0069
; Debug Table 0x9.0x0 = 0x12b,0x1
012c 680a |h | Jump_Zero 0x137
012d 00da | | Load_Top At_Offset_2 ; Debug Table 0x9.0x1 = 0x12d,0x2
012e 0092 0294 | | Action Push_String_Extended,0x294 ; " = \x22"
0130 01cc | | Execute Vector,Catenate
0131 e5fe | | Load 0x2,-0x2
0132 01cc | | Execute Vector,Catenate
0133 0092 0295 | | Action Push_String_Extended,0x295 ; "\x22; "
0135 01cc | | Execute Vector,Catenate
0136 821b | | Call 0x1,0x1b
0137 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 013b | ; | .CONST 0x013b ; Address of begin
0139 0004 | | .CONST 0x0004 ; Address of exception handler
013a 0001 | | .CONST 0x0001 ; Number of locals
013b BODY_0138:
013b INIT_0138:
013b e235 | 5 | Load 0x1,0x35 ; Debug Table 0xa = .DEBUG 0x013b,0x0442,0x1001,0x0000,0x0036,0xbfd4,0x0000,0x0175
; Debug Table 0xa.0x0 = 0x13b,0x1
013c 7002 |p | Jump_Nonzero 0x13f
013d e233 | 3 | Load 0x1,0x33 ; Debug Table 0xa.0x1 = 0x13d,0x2
013e 0257 | W | Execute Discrete,Raise
013f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0140 ; --------------------------------------------------------------------------------------
0140 ; SUBPROGRAM
0140 ; --------------------------------------------------------------------------------------
0140 0143 | C | .CONST 0x0143 ; Address of begin
0141 014a | J | .CONST 0x014a ; Address of exception handler
0142 0001 | | .CONST 0x0001 ; Number of locals
0143 BODY_0140:
0143 INIT_0140:
0143 8219 | | Call 0x1,0x19 ; Debug Table 0xb = .DEBUG 0x0143,0x0448,0x1001,0x0000,0x0036,0xbfd4,0x0000,0x0201
; Debug Table 0xb.0x0 = 0x143,0x1
0144 e211 | | Load 0x1,0x11 ; Debug Table 0xb.0x1 = 0x144,0x2
0145 822e | . | Call 0x1,0x2e
0146 e20f | | Load 0x1,0xf
0147 025b | [ | Execute Discrete,Check_In_Type
0148 8210 | | Call 0x1,0x10
0149 4501 |E | Exit_Suprogram New_Top_Offset 0x1
014a TRAP_0140:
014a e004 | | Load 0x0,0x4
014b 1b11 | | Execute Package,Field_Read,Field_Number 0x11
014c 010f | | Execute Exception,Equal
014d 6801 |h | Jump_Zero 0x14f
014e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0xb.0x2 = 0x14e,0x3
014f 00d8 | | Load_Top At_Offset_0
0150 0107 | | Execute Exception,Get_Name
0151 4950 |IP | Short_Literal 0x150
0152 495f |I_ | Short_Literal 0x15f
0153 0262 | b | Execute Discrete,In_Range
0154 6803 |h | Jump_Zero 0x158
0155 e004 | | Load 0x0,0x4 ; Debug Table 0xb.0x3 = 0x155,0x4
0156 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0157 0257 | W | Execute Discrete,Raise
0158 00d8 | | Load_Top At_Offset_0
0159 0107 | | Execute Exception,Get_Name
015a 4920 |I | Short_Literal 0x120
015b 492f |I/ | Short_Literal 0x12f
015c 0262 | b | Execute Discrete,In_Range
015d 6804 |h | Jump_Zero 0x162
015e 0092 0296 | | Action Push_String_Extended,0x296 ; "Command raised IO_Exceptions.Name_Error"
; Debug Table 0xb.0x4 = 0x15e,0x5
0160 821a | | Call 0x1,0x1a
0161 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0162 e004 | | Load 0x0,0x4
0163 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0164 010f | | Execute Exception,Equal
0165 6804 |h | Jump_Zero 0x16a
0166 0092 0297 | | Action Push_String_Extended,0x297 ; "User terminated command"
; Debug Table 0xb.0x5 = 0x166,0x6
0168 821a | | Call 0x1,0x1a
0169 4501 |E | Exit_Suprogram New_Top_Offset 0x1
016a 0092 0298 | | Action Push_String_Extended,0x298 ; "Command failed due to "
; Debug Table 0xb.0x6 = 0x16a,0x7
016c e005 | | Load 0x0,0x5
016d 180d | | Execute Package,Field_Execute,Field_Number 0xd
016e 01cc | | Execute Vector,Catenate
016f 821a | | Call 0x1,0x1a
0170 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0171 0000 0000 | | .BLANK 0000[0x7]
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 017c | | | .CONST 0x017c ; Address of begin
0179 0004 | | .CONST 0x0004 ; Address of exception handler
017a 0002 | | .CONST 0x0002 ; Number of locals
017b INIT_0178:
017b 00e3 | | Load_Encached Natural_Cache ; Debug Table 0xc = .DEBUG 0x017b,0x0458,0x1801,0x0002,0x0036,0xbfd4,0x0000,0x0294
; Debug Table 0xc.0x0 = 0x17b,0xffff
017c BODY_0178:
017c e7fe | | Load 0x3,-0x2 ; Debug Table 0xc.0x1 = 0x17c,0x1
017d 01db | | Execute Vector,Length
017e 7003 |p | Jump_Nonzero 0x182
017f 00db | | Load_Top At_Offset_3 ; Debug Table 0xc.0x2 = 0x17f,0x2
0180 85f9 | | Call 0x2,-0x7
0181 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0xc.0x3 = 0x181,0x3
0182 00db | | Load_Top At_Offset_3 ; Debug Table 0xc.0x4 = 0x182,0x4
0183 01dd | | Execute Vector,First
0184 0059 | Y | Store_Top Discrete,At_Offset_1
0185 00cf | | Action Mark_Auxiliary
0186 7828 |x( | Jump 0x1af
0187 4801 |H | Short_Literal 0x1 ; Debug Table 0xc.0x5 = 0x187,0x6
0188 00da | | Load_Top At_Offset_2
0189 e7ff | | Load 0x3,-0x1
018a 01dc | | Execute Vector,Last
018b e7ff | | Load 0x3,-0x1
018c 01cf | | Execute Vector,Slice_Read
018d e7fe | | Load 0x3,-0x2
018e e006 | | Load 0x0,0x6
018f 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0190 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
0191 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xc.0x6 = 0x191,0x7
0192 6821 |h! | Jump_Zero 0x1b4
0193 e403 | | Load 0x2,0x3
0194 7005 |p | Jump_Nonzero 0x19a
0195 00d9 | | Load_Top At_Offset_1
0196 e7ff | | Load 0x3,-0x1
0197 01dd | | Execute Vector,First
0198 027e | ~ | Execute Discrete,Not_Equal
0199 7801 |x | Jump 0x19b
019a 4800 |H | Short_Literal 0x0
019b 7018 |p | Jump_Nonzero 0x1b4
019c e404 | | Load 0x2,0x4 ; Debug Table 0xc.0x7 = 0x19c,0x8
019d 6803 |h | Jump_Zero 0x1a1
019e e7ff | | Load 0x3,-0x1 ; Debug Table 0xc.0x8 = 0x19e,0x9
019f 85f9 | | Call 0x2,-0x7
01a0 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0xc.0x9 = 0x1a0,0xa
01a1 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xc.0xa = 0x1a1,0xb
01a2 e7fe | | Load 0x3,-0x2
01a3 01db | | Execute Vector,Length
01a4 0273 | s | Execute Discrete,Plus
01a5 005a | Z | Store_Top Discrete,At_Offset_2
01a6 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xc.0xb = 0x1a6,0xc
01a7 e7ff | | Load 0x3,-0x1
01a8 01dc | | Execute Vector,Last
01a9 027d | } | Execute Discrete,Greater
01aa 6803 |h | Jump_Zero 0x1ae
01ab e7ff | | Load 0x3,-0x1 ; Debug Table 0xc.0xc = 0x1ab,0xd
01ac 85f9 | | Call 0x2,-0x7
01ad 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0xc.0xd = 0x1ad,0xe
01ae 00c9 | | Action Pop_Auxiliary_Loop
01af 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xc.0xe = 0x1af,0x5
01b0 e7ff | | Load 0x3,-0x1
01b1 01dc | | Execute Vector,Last
01b2 027a | z | Execute Discrete,Less_Equal
01b3 77d3 |w | Jump_Nonzero 0x187
01b4 4503 |E | Exit_Suprogram New_Top_Offset 0x3
01b5 0000 0000 | | .XXX[0x3]
01b7 0000 | |
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01bb | | .CONST 0x01bb ; Address of begin
01b9 0004 | | .CONST 0x0004 ; Address of exception handler
01ba 0001 | | .CONST 0x0001 ; Number of locals
01bb BODY_01b8:
01bb INIT_01b8:
01bb e402 | | Load 0x2,0x2 ; Debug Table 0xd = .DEBUG 0x01bb,0x0478,0x1801,0x0002,0x0036,0xbfd4,0x0000,0x030e
; Debug Table 0xd.0x0 = 0x1bb,0x1
01bc 0120 | | Execute Any,Is_Value
01bd 6802 |h | Jump_Zero 0x1c0
01be e5fa | | Load 0x2,-0x6
01bf 7803 |x | Jump 0x1c3
01c0 e402 | | Load 0x2,0x2
01c1 e5fa | | Load 0x2,-0x6
01c2 0119 | | Execute Any,Check_In_Formal_Type
01c3 85fb | | Call 0x2,-0x5
01c4 c402 | | Store 0x2,0x2
01c5 00cf | | Action Mark_Auxiliary
01c6 780a |x | Jump 0x1d1
01c7 00db | | Load_Top At_Offset_3 ; Debug Table 0xd.0x1 = 0x1c7,0x3
01c8 e402 | | Load 0x2,0x2
01c9 e5fa | | Load 0x2,-0x6
01ca 0119 | | Execute Any,Check_In_Formal_Type
01cb 85fd | | Call 0x2,-0x3
01cc 8407 | | Call 0x2,0x7
01cd e402 | | Load 0x2,0x2 ; Debug Table 0xd.0x2 = 0x1cd,0x4
01ce 85fc | | Call 0x2,-0x4
01cf c402 | | Store 0x2,0x2
01d0 00c9 | | Action Pop_Auxiliary_Loop
01d1 e402 | | Load 0x2,0x2 ; Debug Table 0xd.0x3 = 0x1d1,0x2
01d2 e5fa | | Load 0x2,-0x6
01d3 0119 | | Execute Any,Check_In_Formal_Type
01d4 85fe | | Call 0x2,-0x2
01d5 6ff1 |o | Jump_Zero 0x1c7
01d6 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01d7 0000 | | .XXX[0x1]
01d8 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
01dc 0000 0000 | | .LITERAL {0x00000000, 0x0036bfd4}
01e0 0000 0000 | | .LITERAL {0x00000000, 0x36ba3402}
01e4 0000 0000 | | .LITERAL {0x00000000, 0x36ba3401}
01e8 000c 0013 | | .LITERAL {0x000c0013, 0x00001f30}
01ec 0000 0000 | | .BLANK 0000[0x4]
01f0 021c 0004 | | .XXX[0x3]
01f2 0021 | ! |
01f3 029a 0223 | #| Declare_Subprogram INIT_0220,For_Outer_Call,Visible,Unelaborated ; Debug Table 0xe = .DEBUG 0x01f3,0x0482,0x4000,0x0000,0x0036,0xba34,0x0000,0x011d
; Debug Table 0xe.0x0 = 0x1f3,0xffff
01f5 029a 024b | K| Declare_Subprogram INIT_0248,For_Outer_Call,Visible,Unelaborated ; Debug Table 0xe.0x1 = 0x1f5,0xfffe
01f7 029a 025b | [| Declare_Subprogram INIT_0258,For_Outer_Call,Visible,Unelaborated ; Debug Table 0xe.0x2 = 0x1f7,0xfffd
01f9 00bf | | Action Accept_Activation
01fa 00e3 | | Load_Encached Natural_Cache ; Debug Table 0xf = .DEBUG 0x01fa,0x048a,0x4000,0x0000,0x0036,0xbfd4,0x0000,0x008a
; Debug Table 0xf.0x0 = 0x1fa,0xffff
01fb 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
01fc 67df |g | Indirect_Literal Discrete,0x1dc,{0x00000000, 0x0036bfd4} ; Debug Table 0xf.0x1 = 0x1fc,0xfffe
01fd 4891 |H | Short_Literal 0x91
01fe e20f | | Load 0x1,0xf
01ff e001 | | Load 0x0,0x1
0200 0387 | | Declare_Variable Package
0201 00d8 | | Load_Top At_Offset_0
0202 020f | | Execute Module,Activate
0203 1d18 | | Execute_Immediate Reference_Lex_1,0x18 ; Debug Table 0xf.0x2 = 0x203,0xfffd
0204 00c7 | | Action Elaborate_Subprogram
0205 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0xf.0x3 = 0x205,0xfffc
0206 00c7 | | Action Elaborate_Subprogram
0207 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xf.0x4 = 0x207,0xfffb
0208 1912 | | Execute Package,Field_Reference,Field_Number 0x12
0209 00c6 | | Action Check_Subprogram_Elaborated
020a e210 | | Load 0x1,0x10
020b 0335 | 5 | Declare_Variable Array,Duplicate
020c 00d0 | | Action Swap_Control
020d 00d1 | | Pop_Control Pop_Count_1
020e e214 | | Load 0x1,0x14
020f 00e4 | | Load_Encached Positive_Cache
0210 025b | [ | Execute Discrete,Check_In_Type
0211 e215 | | Load 0x1,0x15
0212 00e4 | | Load_Encached Positive_Cache
0213 025b | [ | Execute Discrete,Check_In_Type
0214 e002 | | Load 0x0,0x2
0215 191a | | Execute Package,Field_Reference,Field_Number 0x1a
0216 67c5 |g | Indirect_Literal Discrete,0x1dc,{0x00000000, 0x0036bfd4}
0217 492b |I+ | Short_Literal 0x12b
0218 4800 |H | Short_Literal 0x0
0219 0007 | | Action Break_Optional
021a 1d17 | | Execute_Immediate Reference_Lex_1,0x17 ; Debug Table 0xf.0x5 = 0x21a,0xfffa
021b 00c7 | | Action Elaborate_Subprogram
021c 00bc | | Action Signal_Activated
021d 00bb | | Action Signal_Completion
021e 0000 0000 | | .XXX[0x2]
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 022a | * | .CONST 0x022a ; Address of begin
0221 0004 | | .CONST 0x0004 ; Address of exception handler
0222 0005 | | .CONST 0x0005 ; Number of locals
0223 INIT_0220:
0223 e213 | | Load 0x1,0x13 ; Debug Table 0x10 = .DEBUG 0x0223,0x0498,0x1002,0x0000,0x0036,0xba34,0x0000,0x0144
; Debug Table 0x10.0x0 = 0x223,0xffff
0224 e20f | | Load 0x1,0xf
0225 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0226 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x10.0x1 = 0x226,0xfffe
0227 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x10.0x2 = 0x227,0xfffd
0228 029f 026b | k| Declare_Subprogram INIT_0268,For_Call ; Debug Table 0x10.0x3 = 0x228,0xfffc
022a BODY_0220:
022a 00cf | | Action Mark_Auxiliary
022b e212 | | Load 0x1,0x12 ; Debug Table 0x10.0x4 = 0x22b,0x1
022c 4801 |H | Short_Literal 0x1
022d 0263 | c | Execute Discrete,Above_Bound
022e 700f |p | Jump_Nonzero 0x23e
022f 4800 |H | Short_Literal 0x0 ; Debug Table 0x10.0x5 = 0x22f,0x2
0230 e5ff | | Load 0x2,-0x1
0231 e002 | | Load 0x0,0x2
0232 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0233 8405 | | Call 0x2,0x5
0234 e404 | | Load 0x2,0x4 ; Debug Table 0x10.0x6 = 0x234,0x3
0235 6804 |h | Jump_Zero 0x23a
0236 e402 | | Load 0x2,0x2 ; Debug Table 0x10.0x7 = 0x236,0x4
0237 e20f | | Load 0x1,0xf
0238 025b | [ | Execute Discrete,Check_In_Type
0239 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
023a e002 | | Load 0x0,0x2 ; Debug Table 0x10.0x8 = 0x23a,0x5
023b 1819 | | Execute Package,Field_Execute,Field_Number 0x19
023c 00c8 | | Action Pop_Auxiliary_Range
023d 3ff1 |? | Loop_Increasing 0x22f
023e 00ce | | Action Pop_Auxiliary
023f e213 | | Load 0x1,0x13 ; Debug Table 0x10.0x9 = 0x23f,0x6
0240 e20f | | Load 0x1,0xf
0241 025b | [ | Execute Discrete,Check_In_Type
0242 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0243 0000 0000 | | .BLANK 0000[0x5]
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 024b | K | .CONST 0x024b ; Address of begin
0249 0004 | | .CONST 0x0004 ; Address of exception handler
024a 0001 | | .CONST 0x0001 ; Number of locals
024b BODY_0248:
024b INIT_0248:
024b e002 | | Load 0x0,0x2 ; Debug Table 0x11 = .DEBUG 0x024b,0x04ae,0x1001,0x0000,0x0036,0xba34,0x0000,0x014e
; Debug Table 0x11.0x0 = 0x24b,0x1
024c 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
024d 00db | | Load_Top At_Offset_3
024e e21b | | Load 0x1,0x1b
024f e21c | | Load 0x1,0x1c
0250 e21d | | Load 0x1,0x1d
0251 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
0252 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
0253 e21a | | Load 0x1,0x1a
0254 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0255 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0256 0000 0000 | | .XXX[0x2]
0258 ; --------------------------------------------------------------------------------------
0258 ; SUBPROGRAM
0258 ; --------------------------------------------------------------------------------------
0258 025b | [ | .CONST 0x025b ; Address of begin
0259 0004 | | .CONST 0x0004 ; Address of exception handler
025a 0001 | | .CONST 0x0001 ; Number of locals
025b BODY_0258:
025b INIT_0258:
025b 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x12 = .DEBUG 0x025b,0x04b2,0x1001,0x0000,0x0036,0xba34,0x0000,0x0157
; Debug Table 0x12.0x0 = 0x25b,0x1
025c 00e1 | | Load_Encached Boolean_Cache
025d e21a | | Load 0x1,0x1a
025e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
025f e5ff | | Load 0x2,-0x1
0260 e21a | | Load 0x1,0x1a
0261 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0262 c5fe | | Store 0x2,-0x2
0263 c5fd | | Store 0x2,-0x3
0264 c5fc | | Store 0x2,-0x4
0265 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0266 0000 0000 | | .XXX[0x2]
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 026b | k | .CONST 0x026b ; Address of begin
0269 0004 | | .CONST 0x0004 ; Address of exception handler
026a 0001 | | .CONST 0x0001 ; Number of locals
026b BODY_0268:
026b INIT_0268:
026b 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x13 = .DEBUG 0x026b,0x04b6,0x1001,0x0000,0x0036,0xbfd4,0x0000,0x00d5
; Debug Table 0x13.0x0 = 0x26b,0x1
026c 00e1 | | Load_Encached Boolean_Cache
026d e21a | | Load 0x1,0x1a
026e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
026f e7ff | | Load 0x3,-0x1
0270 e21a | | Load 0x1,0x1a
0271 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0272 c402 | | Store 0x2,0x2
0273 c403 | | Store 0x2,0x3
0274 c404 | | Store 0x2,0x4
0275 e404 | | Load 0x2,0x4 ; Debug Table 0x13.0x1 = 0x275,0x2
0276 6808 |h | Jump_Zero 0x27f
0277 e402 | | Load 0x2,0x2 ; Debug Table 0x13.0x2 = 0x277,0x3
0278 e20f | | Load 0x1,0xf
0279 0122 | " | Execute Any,Make_Root_Type
027a 025e | ^ | Execute Discrete,Convert
027b 1c01 | | Execute_Immediate Run_Utility,0x1
027c e5ff | | Load 0x2,-0x1
027d 8003 | | Call 0x0,0x3
027e 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; Debug Table 0x13.0x3 = 0x27e,0x4
027f 00da | | Load_Top At_Offset_2 ; Debug Table 0x13.0x4 = 0x27f,0x5
0280 e5ff | | Load 0x2,-0x1
0281 8003 | | Call 0x0,0x3
0282 e403 | | Load 0x2,0x3 ; Debug Table 0x13.0x5 = 0x282,0x6
0283 6803 |h | Jump_Zero 0x287
0284 00da | | Load_Top At_Offset_2 ; Debug Table 0x13.0x6 = 0x284,0x7
0285 8217 | | Call 0x1,0x17
0286 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0287 e211 | | Load 0x1,0x11 ; Debug Table 0x13.0x7 = 0x287,0x8
0288 6802 |h | Jump_Zero 0x28b
0289 00ea | | Load_Encached Null_String_Cache ; Debug Table 0x13.0x8 = 0x289,0x9
028a 8217 | | Call 0x1,0x17
028b 4502 |E | Exit_Suprogram New_Top_Offset 0x2
028c ; --------------------------------------------------------------------------------------
028c ; STRING TABLE
028c ; --------------------------------------------------------------------------------------
028c 001c | | .STRTAB 0x001c->0x029a ; "Page mode"
028d 0023 | # | .STRTAB 0x0023->0x029e ; "Echo mode"
028e 002a | * | .STRTAB 0x002a->0x02a3 ; "Number of lines"
028f 0037 | 7 | .STRTAB 0x0037->0x02aa ; "Number of columns"
0290 0046 | F | .STRTAB 0x0046->0x02b3 ; "Command"
0291 004b | K | .STRTAB 0x004b->0x02b6 ; "Boolean"
0292 0050 | P | .STRTAB 0x0050->0x02ba ; "Illegal integer value"
0293 0063 | c | .STRTAB 0x0063->0x02c4 ; "Illegal Long_Integer value"
0294 007b | { | .STRTAB 0x007b->0x02d1 ; " = \x22"
0295 007d | } | .STRTAB 0x007d->0x02d3 ; "\x22; "
0296 007f | | .STRTAB 0x007f->0x02d5 ; "Command raised IO_Exceptions.Name_Error"
0297 00a4 | | .STRTAB 0x00a4->0x02e9 ; "User terminated command"
0298 00b9 | | .STRTAB 0x00b9->0x02f4 ; "Command failed due to "
0299 00cd | | .STREND 0x00cd->0x02ff
029a 5061 6765 |Page| .STRTAB_STRINGS
0300 ; --------------------------------------------------------------------------------------
0300 ; Debug Table
0300 ; --------------------------------------------------------------------------------------
0300 0003 0014 | | .CONST 0x0003,0x0014
0302 000b 03a2 | | .DEBUG 0x000b,0x03a2,0xc000,0x0000,0x0036,0xba34,0x0000,0x0005
030a 0024 03bc | $ | .DEBUG 0x0024,0x03bc,0xc000,0x0000,0x0036,0xbfd4,0x0000,0x0017
0312 007b 03e8 | { | .DEBUG 0x007b,0x03e8,0x1001,0x0000,0x0036,0xba34,0x0000,0x00ee
031a 008b 03f4 | | .DEBUG 0x008b,0x03f4,0x1001,0x0000,0x0036,0xba34,0x0000,0x00f2
0322 0093 03f8 | | .DEBUG 0x0093,0x03f8,0x1001,0x0000,0x0036,0xba34,0x0000,0x00f6
032a 009b 03fc | | .DEBUG 0x009b,0x03fc,0x1002,0x0000,0x0036,0xba34,0x0000,0x00ff
0332 00ab 0400 | | .DEBUG 0x00ab,0x0400,0x1002,0x0000,0x0036,0xba34,0x0000,0x010b
033a 00c3 0408 | | .DEBUG 0x00c3,0x0408,0x1002,0x0000,0x0036,0xba34,0x0000,0x0114
0342 00db 0410 | | .DEBUG 0x00db,0x0410,0x3801,0x0002,0x0036,0xba34,0x0000,0x016f
034a 012b 043c | + <| .DEBUG 0x012b,0x043c,0x1001,0x0000,0x0036,0xbfd4,0x0000,0x0069
0352 013b 0442 | ; B| .DEBUG 0x013b,0x0442,0x1001,0x0000,0x0036,0xbfd4,0x0000,0x0175
035a 0143 0448 | C H| .DEBUG 0x0143,0x0448,0x1001,0x0000,0x0036,0xbfd4,0x0000,0x0201
0362 017b 0458 | { X| .DEBUG 0x017b,0x0458,0x1801,0x0002,0x0036,0xbfd4,0x0000,0x0294
036a 01bb 0478 | x| .DEBUG 0x01bb,0x0478,0x1801,0x0002,0x0036,0xbfd4,0x0000,0x030e
0372 01f3 0482 | | .DEBUG 0x01f3,0x0482,0x4000,0x0000,0x0036,0xba34,0x0000,0x011d
037a 01fa 048a | | .DEBUG 0x01fa,0x048a,0x4000,0x0000,0x0036,0xbfd4,0x0000,0x008a
0382 0223 0498 | # | .DEBUG 0x0223,0x0498,0x1002,0x0000,0x0036,0xba34,0x0000,0x0144
038a 024b 04ae | K | .DEBUG 0x024b,0x04ae,0x1001,0x0000,0x0036,0xba34,0x0000,0x014e
0392 025b 04b2 | [ | .DEBUG 0x025b,0x04b2,0x1001,0x0000,0x0036,0xba34,0x0000,0x0157
039a 026b 04b6 | k | .DEBUG 0x026b,0x04b6,0x1001,0x0000,0x0036,0xbfd4,0x0000,0x00d5
03a2 ; --------------------------------------------------------------------------------------
03a2 ; Debug3 Subtable 0x0
03a2 ; --------------------------------------------------------------------------------------
03a2 000c 0000 | | .DBG3TAB 0x000c,0x0000
03a4 000b ffff | | .CONST 0x000b,0xffff
03a6 000c fffe | | .CONST 0x000c,0xfffe
03a8 000d fffd | | .CONST 0x000d,0xfffd
03aa 000f fffc | | .CONST 0x000f,0xfffc
03ac 0011 fffb | | .CONST 0x0011,0xfffb
03ae 0013 fffa | | .CONST 0x0013,0xfffa
03b0 0015 fff9 | | .CONST 0x0015,0xfff9
03b2 0017 fff8 | | .CONST 0x0017,0xfff8
03b4 0019 fff7 | | .CONST 0x0019,0xfff7
03b6 001d fff6 | | .CONST 0x001d,0xfff6
03b8 001f fff5 | | .CONST 0x001f,0xfff5
03ba 0021 fff4 | ! | .CONST 0x0021,0xfff4
03bc ; --------------------------------------------------------------------------------------
03bc ; Debug3 Subtable 0x1
03bc ; --------------------------------------------------------------------------------------
03bc 0015 0000 | | .DBG3TAB 0x0015,0x0000
03be 0024 ffff | $ | .CONST 0x0024,0xffff
03c0 0025 fffe | % | .CONST 0x0025,0xfffe
03c2 0027 fffd | ' | .CONST 0x0027,0xfffd
03c4 0029 fffc | ) | .CONST 0x0029,0xfffc
03c6 002b fffb | + | .CONST 0x002b,0xfffb
03c8 002d fffa | - | .CONST 0x002d,0xfffa
03ca 002f fff9 | / | .CONST 0x002f,0xfff9
03cc 0032 fff8 | 2 | .CONST 0x0032,0xfff8
03ce 0035 fff7 | 5 | .CONST 0x0035,0xfff7
03d0 0037 fff6 | 7 | .CONST 0x0037,0xfff6
03d2 0040 fff5 | @ | .CONST 0x0040,0xfff5
03d4 0051 fff4 | Q | .CONST 0x0051,0xfff4
03d6 005f fff3 | _ | .CONST 0x005f,0xfff3
03d8 0061 fff2 | a | .CONST 0x0061,0xfff2
03da 0063 fff1 | c | .CONST 0x0063,0xfff1
03dc 0065 fff0 | e | .CONST 0x0065,0xfff0
03de 0067 ffef | g | .CONST 0x0067,0xffef
03e0 0069 ffee | i | .CONST 0x0069,0xffee
03e2 006b ffed | k | .CONST 0x006b,0xffed
03e4 006d ffec | m | .CONST 0x006d,0xffec
03e6 006f ffeb | o | .CONST 0x006f,0xffeb
03e8 ; --------------------------------------------------------------------------------------
03e8 ; Debug3 Subtable 0x2
03e8 ; --------------------------------------------------------------------------------------
03e8 0000 0005 | | .DBG3TAB 0x0000,0x0005
03ea 007b 0001 | { | .CONST 0x007b,0x0001
03ec 007d 0002 | } | .CONST 0x007d,0x0002
03ee 007f 0003 | | .CONST 0x007f,0x0003
03f0 0083 0005 | | .CONST 0x0083,0x0005
03f2 0085 0004 | | .CONST 0x0085,0x0004
03f4 ; --------------------------------------------------------------------------------------
03f4 ; Debug3 Subtable 0x3
03f4 ; --------------------------------------------------------------------------------------
03f4 0000 0001 | | .DBG3TAB 0x0000,0x0001
03f6 008b 0001 | | .CONST 0x008b,0x0001
03f8 ; --------------------------------------------------------------------------------------
03f8 ; Debug3 Subtable 0x4
03f8 ; --------------------------------------------------------------------------------------
03f8 0000 0001 | | .DBG3TAB 0x0000,0x0001
03fa 0093 0001 | | .CONST 0x0093,0x0001
03fc ; --------------------------------------------------------------------------------------
03fc ; Debug3 Subtable 0x5
03fc ; --------------------------------------------------------------------------------------
03fc 0000 0001 | | .DBG3TAB 0x0000,0x0001
03fe 009b 0001 | | .CONST 0x009b,0x0001
0400 ; --------------------------------------------------------------------------------------
0400 ; Debug3 Subtable 0x6
0400 ; --------------------------------------------------------------------------------------
0400 0000 0003 | | .DBG3TAB 0x0000,0x0003
0402 00ab 0001 | | .CONST 0x00ab,0x0001
0404 00b4 0002 | | .CONST 0x00b4,0x0002
0406 00b7 0003 | | .CONST 0x00b7,0x0003
0408 ; --------------------------------------------------------------------------------------
0408 ; Debug3 Subtable 0x7
0408 ; --------------------------------------------------------------------------------------
0408 0000 0003 | | .DBG3TAB 0x0000,0x0003
040a 00c3 0001 | | .CONST 0x00c3,0x0001
040c 00cc 0002 | | .CONST 0x00cc,0x0002
040e 00cf 0003 | | .CONST 0x00cf,0x0003
0410 ; --------------------------------------------------------------------------------------
0410 ; Debug3 Subtable 0x8
0410 ; --------------------------------------------------------------------------------------
0410 0008 000d | | .DBG3TAB 0x0008,0x000d
0412 00db ffff | | .CONST 0x00db,0xffff
0414 00df fffe | | .CONST 0x00df,0xfffe
0416 00e0 fffd | | .CONST 0x00e0,0xfffd
0418 00e1 fffc | | .CONST 0x00e1,0xfffc
041a 00e5 fffb | | .CONST 0x00e5,0xfffb
041c 00e9 fffa | | .CONST 0x00e9,0xfffa
041e 00ea fff9 | | .CONST 0x00ea,0xfff9
0420 00ec fff8 | | .CONST 0x00ec,0xfff8
0422 00ef 0001 | | .CONST 0x00ef,0x0001
0424 00f2 0002 | | .CONST 0x00f2,0x0002
0426 00f3 0003 | | .CONST 0x00f3,0x0003
0428 00fc 0004 | | .CONST 0x00fc,0x0004
042a 0105 0005 | | .CONST 0x0105,0x0005
042c 0109 0006 | | .CONST 0x0109,0x0006
042e 010b 0007 | | .CONST 0x010b,0x0007
0430 010e 0008 | | .CONST 0x010e,0x0008
0432 0110 0009 | | .CONST 0x0110,0x0009
0434 0113 000a | | .CONST 0x0113,0x000a
0436 0117 000b | | .CONST 0x0117,0x000b
0438 011d 000c | | .CONST 0x011d,0x000c
043a 0120 000d | | .CONST 0x0120,0x000d
043c ; --------------------------------------------------------------------------------------
043c ; Debug3 Subtable 0x9
043c ; --------------------------------------------------------------------------------------
043c 0000 0002 | | .DBG3TAB 0x0000,0x0002
043e 012b 0001 | + | .CONST 0x012b,0x0001
0440 012d 0002 | - | .CONST 0x012d,0x0002
0442 ; --------------------------------------------------------------------------------------
0442 ; Debug3 Subtable 0xa
0442 ; --------------------------------------------------------------------------------------
0442 0000 0002 | | .DBG3TAB 0x0000,0x0002
0444 013b 0001 | ; | .CONST 0x013b,0x0001
0446 013d 0002 | = | .CONST 0x013d,0x0002
0448 ; --------------------------------------------------------------------------------------
0448 ; Debug3 Subtable 0xb
0448 ; --------------------------------------------------------------------------------------
0448 0000 0007 | | .DBG3TAB 0x0000,0x0007
044a 0143 0001 | C | .CONST 0x0143,0x0001
044c 0144 0002 | D | .CONST 0x0144,0x0002
044e 014e 0003 | N | .CONST 0x014e,0x0003
0450 0155 0004 | U | .CONST 0x0155,0x0004
0452 015e 0005 | ^ | .CONST 0x015e,0x0005
0454 0166 0006 | f | .CONST 0x0166,0x0006
0456 016a 0007 | j | .CONST 0x016a,0x0007
0458 ; --------------------------------------------------------------------------------------
0458 ; Debug3 Subtable 0xc
0458 ; --------------------------------------------------------------------------------------
0458 0001 000e | | .DBG3TAB 0x0001,0x000e
045a 017b ffff | { | .CONST 0x017b,0xffff
045c 017c 0001 | | | .CONST 0x017c,0x0001
045e 017f 0002 | | .CONST 0x017f,0x0002
0460 0181 0003 | | .CONST 0x0181,0x0003
0462 0182 0004 | | .CONST 0x0182,0x0004
0464 0187 0006 | | .CONST 0x0187,0x0006
0466 0191 0007 | | .CONST 0x0191,0x0007
0468 019c 0008 | | .CONST 0x019c,0x0008
046a 019e 0009 | | .CONST 0x019e,0x0009
046c 01a0 000a | | .CONST 0x01a0,0x000a
046e 01a1 000b | | .CONST 0x01a1,0x000b
0470 01a6 000c | | .CONST 0x01a6,0x000c
0472 01ab 000d | | .CONST 0x01ab,0x000d
0474 01ad 000e | | .CONST 0x01ad,0x000e
0476 01af 0005 | | .CONST 0x01af,0x0005
0478 ; --------------------------------------------------------------------------------------
0478 ; Debug3 Subtable 0xd
0478 ; --------------------------------------------------------------------------------------
0478 0000 0004 | | .DBG3TAB 0x0000,0x0004
047a 01bb 0001 | | .CONST 0x01bb,0x0001
047c 01c7 0003 | | .CONST 0x01c7,0x0003
047e 01cd 0004 | | .CONST 0x01cd,0x0004
0480 01d1 0002 | | .CONST 0x01d1,0x0002
0482 ; --------------------------------------------------------------------------------------
0482 ; Debug3 Subtable 0xe
0482 ; --------------------------------------------------------------------------------------
0482 0003 0000 | | .DBG3TAB 0x0003,0x0000
0484 01f3 ffff | | .CONST 0x01f3,0xffff
0486 01f5 fffe | | .CONST 0x01f5,0xfffe
0488 01f7 fffd | | .CONST 0x01f7,0xfffd
048a ; --------------------------------------------------------------------------------------
048a ; Debug3 Subtable 0xf
048a ; --------------------------------------------------------------------------------------
048a 0006 0000 | | .DBG3TAB 0x0006,0x0000
048c 01fa ffff | | .CONST 0x01fa,0xffff
048e 01fc fffe | | .CONST 0x01fc,0xfffe
0490 0203 fffd | | .CONST 0x0203,0xfffd
0492 0205 fffc | | .CONST 0x0205,0xfffc
0494 0207 fffb | | .CONST 0x0207,0xfffb
0496 021a fffa | | .CONST 0x021a,0xfffa
0498 ; --------------------------------------------------------------------------------------
0498 ; Debug3 Subtable 0x10
0498 ; --------------------------------------------------------------------------------------
0498 0004 0006 | | .DBG3TAB 0x0004,0x0006
049a 0223 ffff | # | .CONST 0x0223,0xffff
049c 0226 fffe | & | .CONST 0x0226,0xfffe
049e 0227 fffd | ' | .CONST 0x0227,0xfffd
04a0 0228 fffc | ( | .CONST 0x0228,0xfffc
04a2 022b 0001 | + | .CONST 0x022b,0x0001
04a4 022f 0002 | / | .CONST 0x022f,0x0002
04a6 0234 0003 | 4 | .CONST 0x0234,0x0003
04a8 0236 0004 | 6 | .CONST 0x0236,0x0004
04aa 023a 0005 | : | .CONST 0x023a,0x0005
04ac 023f 0006 | ? | .CONST 0x023f,0x0006
04ae ; --------------------------------------------------------------------------------------
04ae ; Debug3 Subtable 0x11
04ae ; --------------------------------------------------------------------------------------
04ae 0000 0001 | | .DBG3TAB 0x0000,0x0001
04b0 024b 0001 | K | .CONST 0x024b,0x0001
04b2 ; --------------------------------------------------------------------------------------
04b2 ; Debug3 Subtable 0x12
04b2 ; --------------------------------------------------------------------------------------
04b2 0000 0001 | | .DBG3TAB 0x0000,0x0001
04b4 025b 0001 | [ | .CONST 0x025b,0x0001
04b6 ; --------------------------------------------------------------------------------------
04b6 ; Debug3 Subtable 0x13
04b6 ; --------------------------------------------------------------------------------------
04b6 0000 0009 | | .DBG3TAB 0x0000,0x0009
04b8 026b 0001 | k | .CONST 0x026b,0x0001
04ba 0275 0002 | u | .CONST 0x0275,0x0002
04bc 0277 0003 | w | .CONST 0x0277,0x0003
04be 027e 0004 | ~ | .CONST 0x027e,0x0004
04c0 027f 0005 | | .CONST 0x027f,0x0005
04c2 0282 0006 | | .CONST 0x0282,0x0006
04c4 0284 0007 | | .CONST 0x0284,0x0007
04c6 0287 0008 | | .CONST 0x0287,0x0008
04c8 0289 0009 | | .CONST 0x0289,0x0009
04ca 0000 0000 | | .BLANK 0000[0x136]