|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 2048 (0x800)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03b8fe
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0230 | 0 | .CONST 0x0230 ; 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 8001 | | .CONST 0x8001 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0010 | | .CONST 0x0010 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0001 | | .CONST 0x0001 ; Number of locals
000b INIT_0008:
000b 029a 001b | | Declare_Subprogram INIT_0018,For_Outer_Call,Visible,Unelaborated
000d 00bf | | Action Accept_Activation
000e 1d0d | | Execute_Immediate Reference_Lex_1,0xd
000f 00c7 | | Action Elaborate_Subprogram
0010 BODY_0008:
0010 00bc | | Action Signal_Activated
0011 00bb | | Action Signal_Completion
0012 0000 0000 | | .BLANK 0000[0x6]
0018 ; --------------------------------------------------------------------------------------
0018 ; SUBPROGRAM
0018 ; --------------------------------------------------------------------------------------
0018 0043 | C | .CONST 0x0043 ; Address of begin
0019 008e | | .CONST 0x008e ; Address of exception handler
001a 000b | | .CONST 0x000b ; Number of locals
001b INIT_0018:
001b e001 | | Load 0x0,0x1
001c 1810 | | Execute Package,Field_Execute,Field_Number 0x10
001d e002 | | Load 0x0,0x2
001e 1814 | | Execute Package,Field_Execute,Field_Number 0x14
001f e002 | | Load 0x0,0x2
0020 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0021 011e | | Execute Any,Convert
0022 e003 | | Load 0x0,0x3
0023 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0024 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0025 02c7 | | Declare_Variable Any
0026 00d8 | | Load_Top At_Offset_0
0027 1c00 | | Execute_Immediate Run_Utility,0x0
0028 e003 | | Load 0x0,0x3
0029 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
002a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
002b e003 | | Load 0x0,0x3
002c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
002d 02c7 | | Declare_Variable Any
002e 00d8 | | Load_Top At_Offset_0
002f 1c00 | | Execute_Immediate Run_Utility,0x0
0030 e003 | | Load 0x0,0x3
0031 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0032 e004 | | Load 0x0,0x4
0033 e005 | | Load 0x0,0x5
0034 e006 | | Load 0x0,0x6
0035 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0036 e007 | | Load 0x0,0x7
0037 1b7b | { | Execute Package,Field_Read,Field_Number 0x7b
0038 0387 | | Declare_Variable Package
0039 00d8 | | Load_Top At_Offset_0
003a 020f | | Execute Module,Activate
003b 029f 00a3 | | Declare_Subprogram INIT_00a0,For_Call
003d 029f 00c3 | | Declare_Subprogram INIT_00c0,For_Call
003f 029f 00db | | Declare_Subprogram INIT_00d8,For_Call
0041 029f 00fb | | Declare_Subprogram INIT_00f8,For_Call
0043 BODY_0018:
0043 e003 | | Load 0x0,0x3
0044 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0045 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0046 e403 | | Load 0x2,0x3
0047 6054 |`T | Indirect_Literal Discrete,0x9c,{0x00000000, 0x00004000}
0048 e402 | | Load 0x2,0x2
0049 e008 | | Load 0x0,0x8
004a 1811 | | Execute Package,Field_Execute,Field_Number 0x11
004b e009 | | Load 0x0,0x9
004c 1811 | | Execute Package,Field_Execute,Field_Number 0x11
004d 4801 |H | Short_Literal 0x1
004e 4800 |H | Short_Literal 0x0
004f e008 | | Load 0x0,0x8
0050 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0051 e003 | | Load 0x0,0x3
0052 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0053 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0054 e5ff | | Load 0x2,-0x1
0055 e003 | | Load 0x0,0x3
0056 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0057 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0058 c403 | | Store 0x2,0x3
0059 c404 | | Store 0x2,0x4
005a e404 | | Load 0x2,0x4
005b 680f |h | Jump_Zero 0x6b
005c e00a | | Load 0x0,0xa
005d 180e | | Execute Package,Field_Execute,Field_Number 0xe
005e 4807 |H | Short_Literal 0x7
005f 0092 01bb | | Action Push_String_Extended,0x1bb ; "Bad status: "
0061 e404 | | Load 0x2,0x4
0062 e003 | | Load 0x0,0x3
0063 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0064 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0065 025e | ^ | Execute Discrete,Convert
0066 1c01 | | Execute_Immediate Run_Utility,0x1
0067 01cc | | Execute Vector,Catenate
0068 e00b | | Load 0x0,0xb
0069 1813 | | Execute Package,Field_Execute,Field_Number 0x13
006a 4502 |E | Exit_Suprogram New_Top_Offset 0x2
006b 00cf | | Action Mark_Auxiliary
006c 781b |x | Jump 0x88
006d e003 | | Load 0x0,0x3
006e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
006f e405 | | Load 0x2,0x5
0070 0120 | | Execute Any,Is_Value
0071 6803 |h | Jump_Zero 0x75
0072 e003 | | Load 0x0,0x3
0073 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0074 7801 |x | Jump 0x76
0075 e405 | | Load 0x2,0x5
0076 e403 | | Load 0x2,0x3
0077 e003 | | Load 0x0,0x3
0078 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0079 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
007a c405 | | Store 0x2,0x5
007b c406 | | Store 0x2,0x6
007c e405 | | Load 0x2,0x5
007d e403 | | Load 0x2,0x3
007e e003 | | Load 0x0,0x3
007f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0080 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0081 840b | | Call 0x2,0xb
0082 e403 | | Load 0x2,0x3
0083 e003 | | Load 0x0,0x3
0084 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0085 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0086 c403 | | Store 0x2,0x3
0087 00c9 | | Action Pop_Auxiliary_Loop
0088 e403 | | Load 0x2,0x3
0089 e003 | | Load 0x0,0x3
008a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
008b 181e | | Execute Package,Field_Execute,Field_Number 0x1e
008c 6fe0 |o | Jump_Zero 0x6d
008d 4502 |E | Exit_Suprogram New_Top_Offset 0x2
008e TRAP_0018:
008e 0007 | | Action Break_Optional
008f e00a | | Load 0x0,0xa
0090 180e | | Execute Package,Field_Execute,Field_Number 0xe
0091 4808 |H | Short_Literal 0x8
0092 0092 01bc | | Action Push_String_Extended,0x1bc ; "Unhandled exception: "
0094 e00c | | Load 0x0,0xc
0095 180d | | Execute Package,Field_Execute,Field_Number 0xd
0096 01cc | | Execute Vector,Catenate
0097 e00b | | Load 0x0,0xb
0098 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0099 4502 |E | Exit_Suprogram New_Top_Offset 0x2
009a 0000 0000 | | .XXX[0x2]
009c 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00a3 | | .CONST 0x00a3 ; Address of begin
00a1 0004 | | .CONST 0x0004 ; Address of exception handler
00a2 0001 | | .CONST 0x0001 ; Number of locals
00a3 BODY_00a0:
00a3 INIT_00a0:
00a3 4804 |H | Short_Literal 0x4
00a4 e7ff | | Load 0x3,-0x1
00a5 e007 | | Load 0x0,0x7
00a6 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
00a7 e7fe | | Load 0x3,-0x2
00a8 e7ff | | Load 0x3,-0x1
00a9 e007 | | Load 0x0,0x7
00aa 185e | ^ | Execute Package,Field_Execute,Field_Number 0x5e
00ab 4819 |H | Short_Literal 0x19
00ac e7ff | | Load 0x3,-0x1
00ad e007 | | Load 0x0,0x7
00ae 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
00af e407 | | Load 0x2,0x7
00b0 1b11 | | Execute Package,Field_Read,Field_Number 0x11
00b1 e407 | | Load 0x2,0x7
00b2 1b10 | | Execute Package,Field_Read,Field_Number 0x10
00b3 e7fd | | Load 0x3,-0x3
00b4 e7ff | | Load 0x3,-0x1
00b5 e407 | | Load 0x2,0x7
00b6 1814 | | Execute Package,Field_Execute,Field_Number 0x14
00b7 4801 |H | Short_Literal 0x1
00b8 e007 | | Load 0x0,0x7
00b9 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
00ba 4504 |E | Exit_Suprogram New_Top_Offset 0x4
00bb 0000 0000 | | .BLANK 0000[0x5]
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00c3 | | .CONST 0x00c3 ; Address of begin
00c1 0004 | | .CONST 0x0004 ; Address of exception handler
00c2 0001 | | .CONST 0x0001 ; Number of locals
00c3 BODY_00c0:
00c3 INIT_00c0:
00c3 4804 |H | Short_Literal 0x4
00c4 e7ff | | Load 0x3,-0x1
00c5 e007 | | Load 0x0,0x7
00c6 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
00c7 e7fe | | Load 0x3,-0x2
00c8 e7ff | | Load 0x3,-0x1
00c9 e007 | | Load 0x0,0x7
00ca 185e | ^ | Execute Package,Field_Execute,Field_Number 0x5e
00cb 4819 |H | Short_Literal 0x19
00cc e7ff | | Load 0x3,-0x1
00cd e007 | | Load 0x0,0x7
00ce 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
00cf 4800 |H | Short_Literal 0x0
00d0 e7fd | | Load 0x3,-0x3
00d1 e7ff | | Load 0x3,-0x1
00d2 e007 | | Load 0x0,0x7
00d3 1875 | u | Execute Package,Field_Execute,Field_Number 0x75
00d4 4801 |H | Short_Literal 0x1
00d5 e007 | | Load 0x0,0x7
00d6 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
00d7 4504 |E | Exit_Suprogram New_Top_Offset 0x4
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00db | | .CONST 0x00db ; Address of begin
00d9 0004 | | .CONST 0x0004 ; Address of exception handler
00da 0001 | | .CONST 0x0001 ; Number of locals
00db BODY_00d8:
00db INIT_00d8:
00db 4804 |H | Short_Literal 0x4
00dc e7ff | | Load 0x3,-0x1
00dd e007 | | Load 0x0,0x7
00de 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
00df e7fe | | Load 0x3,-0x2
00e0 e7ff | | Load 0x3,-0x1
00e1 e007 | | Load 0x0,0x7
00e2 185e | ^ | Execute Package,Field_Execute,Field_Number 0x5e
00e3 4819 |H | Short_Literal 0x19
00e4 e7ff | | Load 0x3,-0x1
00e5 e007 | | Load 0x0,0x7
00e6 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
00e7 480a |H | Short_Literal 0xa
00e8 4804 |H | Short_Literal 0x4
00e9 e7fd | | Load 0x3,-0x3
00ea e7ff | | Load 0x3,-0x1
00eb e007 | | Load 0x0,0x7
00ec 186b | k | Execute Package,Field_Execute,Field_Number 0x6b
00ed 4801 |H | Short_Literal 0x1
00ee e007 | | Load 0x0,0x7
00ef 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
00f0 4504 |E | Exit_Suprogram New_Top_Offset 0x4
00f1 0000 0000 | | .BLANK 0000[0x7]
00f8 ; --------------------------------------------------------------------------------------
00f8 ; SUBPROGRAM
00f8 ; --------------------------------------------------------------------------------------
00f8 0114 | | .CONST 0x0114 ; Address of begin
00f9 0004 | | .CONST 0x0004 ; Address of exception handler
00fa 0008 | | .CONST 0x0008 ; Number of locals
00fb INIT_00f8:
00fb e007 | | Load 0x0,0x7
00fc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00fd 02c7 | | Declare_Variable Any
00fe e007 | | Load 0x0,0x7
00ff 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0100 a602 | | Store_Unchecked 0x3,0x2
0101 e003 | | Load 0x0,0x3
0102 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0103 e00d | | Load 0x0,0xd
0104 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0105 e003 | | Load 0x0,0x3
0106 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0107 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0108 e003 | | Load 0x0,0x3
0109 1b14 | | Execute Package,Field_Read,Field_Number 0x14
010a 02ff | | Declare_Variable Variant_Record
010b 00d8 | | Load_Top At_Offset_0
010c 1c00 | | Execute_Immediate Run_Utility,0x0
010d e00e | | Load 0x0,0xe
010e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
010f 02c7 | | Declare_Variable Any
0110 00d8 | | Load_Top At_Offset_0
0111 1c00 | | Execute_Immediate Run_Utility,0x0
0112 029f 0173 | s| Declare_Subprogram INIT_0170,For_Call
0114 BODY_00f8:
0114 e7ff | | Load 0x3,-0x1
0115 e602 | | Load 0x3,0x2
0116 e007 | | Load 0x0,0x7
0117 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0118 4801 |H | Short_Literal 0x1
0119 e602 | | Load 0x3,0x2
011a e007 | | Load 0x0,0x7
011b 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
011c e003 | | Load 0x0,0x3
011d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
011e e606 | | Load 0x3,0x6
011f 604c |`L | Indirect_Literal Discrete,0x16c,{0x00000000, 0x00004000}
0120 4800 |H | Short_Literal 0x0
0121 e402 | | Load 0x2,0x2
0122 e7fe | | Load 0x3,-0x2
0123 e003 | | Load 0x0,0x3
0124 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0125 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0126 e003 | | Load 0x0,0x3
0127 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0128 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0129 00d1 | | Pop_Control Pop_Count_1
012a c603 | | Store 0x3,0x3
012b e603 | | Load 0x3,0x3
012c 680e |h | Jump_Zero 0x13b
012d e00a | | Load 0x0,0xa
012e 180e | | Execute Package,Field_Execute,Field_Number 0xe
012f 4807 |H | Short_Literal 0x7
0130 0092 01bb | | Action Push_String_Extended,0x1bb ; "Bad status: "
0132 e603 | | Load 0x3,0x3
0133 e003 | | Load 0x0,0x3
0134 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0135 025e | ^ | Execute Discrete,Convert
0136 1c01 | | Execute_Immediate Run_Utility,0x1
0137 01cc | | Execute Vector,Catenate
0138 e00b | | Load 0x0,0xb
0139 1813 | | Execute Package,Field_Execute,Field_Number 0x13
013a 4503 |E | Exit_Suprogram New_Top_Offset 0x3
013b e00d | | Load 0x0,0xd
013c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
013d e607 | | Load 0x3,0x7
013e 0120 | | Execute Any,Is_Value
013f 6803 |h | Jump_Zero 0x143
0140 e00e | | Load 0x0,0xe
0141 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0142 7801 |x | Jump 0x144
0143 e607 | | Load 0x3,0x7
0144 4800 |H | Short_Literal 0x0
0145 e402 | | Load 0x2,0x2
0146 e008 | | Load 0x0,0x8
0147 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0148 e009 | | Load 0x0,0x9
0149 1811 | | Execute Package,Field_Execute,Field_Number 0x11
014a 4801 |H | Short_Literal 0x1
014b e606 | | Load 0x3,0x6
014c e00f | | Load 0x0,0xf
014d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
014e 0162 | b | Execute Variant_Record,Check_In_Type
014f e00e | | Load 0x0,0xe
0150 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0151 c607 | | Store 0x3,0x7
0152 c604 | | Store 0x3,0x4
0153 e604 | | Load 0x3,0x4
0154 680e |h | Jump_Zero 0x163
0155 e00a | | Load 0x0,0xa
0156 180e | | Execute Package,Field_Execute,Field_Number 0xe
0157 4807 |H | Short_Literal 0x7
0158 0092 01bb | | Action Push_String_Extended,0x1bb ; "Bad status: "
015a e604 | | Load 0x3,0x4
015b e00d | | Load 0x0,0xd
015c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
015d 025e | ^ | Execute Discrete,Convert
015e 1c01 | | Execute_Immediate Run_Utility,0x1
015f 01cc | | Execute Vector,Catenate
0160 e00b | | Load 0x0,0xb
0161 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0162 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0163 8608 | | Call 0x3,0x8
0164 4802 |H | Short_Literal 0x2
0165 e602 | | Load 0x3,0x2
0166 e007 | | Load 0x0,0x7
0167 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
0168 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0169 0000 0000 | | .XXX[0x3]
016b 0000 | |
016c 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 0178 | x | .CONST 0x0178 ; Address of begin
0171 0004 | | .CONST 0x0004 ; Address of exception handler
0172 0002 | | .CONST 0x0002 ; Number of locals
0173 INIT_0170:
0173 e607 | | Load 0x3,0x7
0174 e00e | | Load 0x0,0xe
0175 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0176 0217 | | Execute Heap_Access,All_Reference
0177 0007 | | Action Break_Optional
0178 BODY_0170:
0178 00d8 | | Load_Top At_Offset_0
0179 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
017a 0092 01bd | | Action Push_String_Extended,0x1bd ; "Id_Case"
017c e602 | | Load 0x3,0x2
017d 8408 | | Call 0x2,0x8
017e 00d8 | | Load_Top At_Offset_0
017f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0180 0092 01be | | Action Push_String_Extended,0x1be ; "Keyword_Case"
0182 e602 | | Load 0x3,0x2
0183 8408 | | Call 0x2,0x8
0184 00d8 | | Load_Top At_Offset_0
0185 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0186 0092 01bf | | Action Push_String_Extended,0x1bf ; "Number_Case"
0188 e602 | | Load 0x3,0x2
0189 8408 | | Call 0x2,0x8
018a 00d8 | | Load_Top At_Offset_0
018b 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
018c 0092 01c0 | | Action Push_String_Extended,0x1c0 ; "Line_Length"
018e e602 | | Load 0x3,0x2
018f 840a | | Call 0x2,0xa
0190 00d8 | | Load_Top At_Offset_0
0191 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0192 0092 01c1 | | Action Push_String_Extended,0x1c1 ; "Root_Indentation"
0194 e602 | | Load 0x3,0x2
0195 840a | | Call 0x2,0xa
0196 00d8 | | Load_Top At_Offset_0
0197 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0198 0092 01c2 | | Action Push_String_Extended,0x1c2 ; "Major_Indentation"
019a e602 | | Load 0x3,0x2
019b 840a | | Call 0x2,0xa
019c 00d8 | | Load_Top At_Offset_0
019d 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
019e 0092 01c3 | | Action Push_String_Extended,0x1c3 ; "Minor_Indentation"
01a0 e602 | | Load 0x3,0x2
01a1 840a | | Call 0x2,0xa
01a2 00d8 | | Load_Top At_Offset_0
01a3 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
01a4 0092 01c4 | | Action Push_String_Extended,0x1c4 ; "Statement_Length"
01a6 e602 | | Load 0x3,0x2
01a7 840a | | Call 0x2,0xa
01a8 00d8 | | Load_Top At_Offset_0
01a9 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
01aa 0092 01c5 | | Action Push_String_Extended,0x1c5 ; "Wrap_Indentation"
01ac e602 | | Load 0x3,0x2
01ad 840a | | Call 0x2,0xa
01ae 00d8 | | Load_Top At_Offset_0
01af 3c0a |< | Execute Record,Field_Read,Field_Number 0xa
01b0 0092 01c6 | | Action Push_String_Extended,0x1c6 ; "Alignment_Threshold"
01b2 e602 | | Load 0x3,0x2
01b3 840a | | Call 0x2,0xa
01b4 00d8 | | Load_Top At_Offset_0
01b5 3c0c |< | Execute Record,Field_Read,Field_Number 0xc
01b6 0092 01c7 | | Action Push_String_Extended,0x1c7 ; "Consistent_Breaking"
01b8 e602 | | Load 0x3,0x2
01b9 8409 | | Call 0x2,0x9
01ba 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01bb ; --------------------------------------------------------------------------------------
01bb ; STRING TABLE
01bb ; --------------------------------------------------------------------------------------
01bb 001c | | .STRTAB 0x001c->0x01c9 ; "Bad status: "
01bc 0026 | & | .STRTAB 0x0026->0x01cf ; "Unhandled exception: "
01bd 0039 | 9 | .STRTAB 0x0039->0x01d9 ; "Id_Case"
01be 003e | > | .STRTAB 0x003e->0x01dd ; "Keyword_Case"
01bf 0048 | H | .STRTAB 0x0048->0x01e3 ; "Number_Case"
01c0 0051 | Q | .STRTAB 0x0051->0x01e8 ; "Line_Length"
01c1 005a | Z | .STRTAB 0x005a->0x01ee ; "Root_Indentation"
01c2 0068 | h | .STRTAB 0x0068->0x01f6 ; "Major_Indentation"
01c3 0077 | w | .STRTAB 0x0077->0x01fe ; "Minor_Indentation"
01c4 0086 | | .STRTAB 0x0086->0x0207 ; "Statement_Length"
01c5 0094 | | .STRTAB 0x0094->0x020f ; "Wrap_Indentation"
01c6 00a2 | | .STRTAB 0x00a2->0x0217 ; "Alignment_Threshold"
01c7 00b3 | | .STRTAB 0x00b3->0x0220 ; "Consistent_Breaking"
01c8 00c4 | | .STREND 0x00c4->0x022a
01c9 4261 6420 |Bad | .STRTAB_STRINGS
022a 0000 0000 | | .BLANK 0000[0x6]
0230 ; --------------------------------------------------------------------------------------
0230 ; Debug Table
0230 ; --------------------------------------------------------------------------------------
0230 0004 000b | | .DEBUG4 0x0004,0x000b,0xbb60,0x0000,0x0001,0x0000
0236 01f6 8902 | | .XXX[0x13]
0238 b14c 8000 | L |
023a 0028 0000 | ( |
023c 0024 0000 | $ |
023e 0328 0000 | ( |
0240 0008 0000 | |
0242 0010 0000 | |
0244 0018 0000 | |
0246 dbd0 0079 | y|
0248 fdf0 | |
0249 0000 0000 | | .BLANK 0000[0x4]
024d 003d 1444 | = D| .XXX[0xe]
024f 0000 7961 | ya|
0251 1ee6 5485 | T |
0253 e000 0000 | |
0255 0050 316f | P1o|
0257 3f8e 6ea0 |? n |
0259 0000 8000 | |
025b 0000 0000 | | .BLANK 0000[0x4]
025f 7c40 8080 ||@ | .XXX[0x21]
0261 0000 4000 | @ |
0263 7c44 8080 ||D |
0265 0000 4000 | @ |
0267 0203 0824 | $|
0269 6008 8000 |` |
026b 0000 0000 | |
026d 1f11 2020 | |
026f 0000 1007 | |
0271 b995 2178 | !x|
0273 0000 0000 | |
0275 1000 0000 | |
0277 9000 040c | |
0279 0000 0000 | |
027b 2000 0000 | |
027d 4000 80c2 |@ |
027f 0918 | |
0280 0000 0000 | | .BLANK 0000[0x7]
0287 01ee 6548 | eH| .XXX[0x24]
0289 5e00 0000 |^ |
028b 0004 0000 | |
028d 0024 0001 | $ |
028f 0300 0000 | |
0291 0008 0000 | |
0293 0010 0000 | |
0295 0018 0001 | |
0297 b888 007a | z|
0299 2670 007a |&p z|
029b 2168 007a |!h z|
029d 7268 003d |rh =|
029f 2884 0000 |( |
02a1 2eb4 1fca |. |
02a3 9671 a000 | q |
02a5 0000 0410 | |
02a7 2b8d 218e |+ ! |
02a9 b680 0002 | |
02ab 0000 0000 | | .BLANK 0000[0x5]
02b0 4bba 8500 |K | .XXX[0x9]
02b2 0000 4000 | @ |
02b4 4bbc 8500 |K |
02b6 0000 4000 | @ |
02b8 2600 |& |
02b9 0000 0000 | | .BLANK 0000[0x5]
02be 12ef 2140 | !@| .XXX[0x8]
02c0 0000 1007 | |
02c2 f2a5 9c68 | h|
02c4 0000 0001 | |
02c6 0000 0000 | | .BLANK 0000[0x6]
02cc 2000 0000 | | .XXX[0x4]
02ce 0009 8000 | |
02d0 0000 0000 | | .BLANK 0000[0x8]
02d8 0205 719c | q | .XXX[0x5]
02da 96ab 7c00 | | |
02dc 0040 | @ |
02dd 0000 0000 | | .BLANK 0000[0x5]
02e2 0008 0000 | | .XXX[0x9]
02e4 0000 0000 | |
02e6 0018 0002 | |
02e8 36a8 007a |6 z|
02ea 4ef0 |N |
02eb 0000 0000 | | .BLANK 0000[0x4]
02ef 003d 3cc4 | =< | .XXX[0xd]
02f1 0001 48b2 | H |
02f3 a059 5c37 | Y\7|
02f5 e48b 8000 | |
02f7 0490 3648 | 6H|
02f9 2c30 7320 |,0s |
02fb 0002 | |
02fc 0000 0000 | | .BLANK 0000[0x5]
0301 7e88 8100 |~ | .XXX[0xa]
0303 0000 4000 | @ |
0305 7e8a 8100 |~ |
0307 0000 4002 | @ |
0309 1e00 e800 | |
030b 0000 0000 | | .BLANK 0000[0x4]
030f 1fa2 2040 | @| .XXX[0x12]
0311 0000 1008 | |
0313 1657 0d7a | W z|
0315 8540 0001 | @ |
0317 2000 0000 | |
0319 9000 0584 | |
031b 4000 0000 |@ |
031d 2000 0000 | |
031f 6081 8026 |` &|
0321 0000 0000 | | .BLANK 0000[0x8]
0329 0205 95c3 | | .XXX[0x25]
032b 5ea1 5000 |^ P |
032d 0048 0000 | H |
032f 0024 0001 | $ |
0331 6110 0000 |a |
0333 0008 0000 | |
0335 0018 0000 | |
0337 0018 0002 | |
0339 5630 007a |V0 z|
033b 7770 007a |wp z|
033d 49e8 007a |I z|
033f ebe8 003d | =|
0341 5104 0000 |Q |
0343 a040 2065 | @ e|
0345 dffe d522 | "|
0347 c000 0150 | P|
0349 32ef ff6f |2 o|
034b 5640 0000 |V@ |
034d a000 | |
034e 0000 0000 | | .BLANK 0000[0x4]
0352 6206 8580 |b | .XXX[0x1f]
0354 0000 4000 | @ |
0356 6208 8580 |b |
0358 0000 4000 | @ |
035a 0203 0802 | |
035c 2091 8000 | |
035e 0000 0000 | |
0360 1882 2160 | !`|
0362 0000 1008 | |
0364 1977 ffb7 | w |
0366 ab20 0000 | |
0368 5000 0000 |P |
036a 9000 05b0 | |
036c 0000 0000 | |
036e 2000 0001 | |
0370 4000 |@ |
0371 0000 0000 | | .BLANK 0000[0xa]
037b 041c 2000 | | .XXX[0x2]
037d 0000 0000 | | .BLANK 0000[0x7]
0384 0008 0000 | | .XXX[0x9]
0386 0000 0000 | |
0388 0018 0002 | |
038a 75b8 007a |u z|
038c 9ff0 | |
038d 0000 0000 | | .BLANK 0000[0x4]
0391 003d 6544 | =eD| .XXX[0xe]
0393 0000 bb36 | 6|
0395 a065 e362 | e b|
0397 2475 0000 |$u |
0399 0150 32f4 | P2 |
039b 5d0f 8aa0 |] |
039d 0000 a400 | |
039f 0000 0000 | | .BLANK 0000[0x4]
03a3 a53e 8500 | > | .XXX[0x21]
03a5 0000 4000 | @ |
03a7 a542 8500 | B |
03a9 0000 4000 | @ |
03ab 0203 0802 | |
03ad 2091 8000 | |
03af 0000 0000 | |
03b1 2950 a140 |)P @|
03b3 0000 1008 | |
03b5 1978 d88c | x |
03b7 80f0 0000 | |
03b9 5000 0000 |P |
03bb 9000 066d | m|
03bd 8000 0000 | |
03bf 2000 0000 | |
03c1 4001 80c6 |@ |
03c3 0088 | |
03c4 0000 0000 | | .BLANK 0000[0x7]
03cb 0206 5e36 | ^6| .XXX[0x35]
03cd 2320 3c00 |# < |
03cf 0014 0000 | |
03d1 0024 0001 | $ |
03d3 9b60 0000 | ` |
03d5 0008 0000 | |
03d7 0010 0000 | |
03d9 0018 0002 | |
03db b4c8 007a | z|
03dd c870 007a | p z|
03df c368 007b | h {|
03e1 1468 003d | h =|
03e3 7984 0001 |y |
03e5 a550 a05b | P [|
03e7 98fc 0000 | |
03e9 0000 08d0 | |
03eb 3808 fd81 |8 |
03ed f980 0000 | |
03ef 2400 0000 |$ |
03f1 0000 0000 | |
03f3 0001 c534 | 4|
03f5 8000 0000 | |
03f7 4001 c538 |@ 8|
03f9 8000 0000 | |
03fb 4000 2600 |@ & |
03fd 0000 0000 | |
03ff 0000 | |