|
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_05d8fd
└─⟦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 0260 | ` | .CONST 0x0260 ; 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 0022 | " | .CONST 0x0022 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0014 | | .CONST 0x0014 ; Number of locals
000b INIT_0008:
000b 029a 002b | +| Declare_Subprogram INIT_0028,For_Outer_Call,Visible,Unelaborated
000d 029a 0063 | c| Declare_Subprogram INIT_0060,For_Outer_Call,Visible,Unelaborated
000f 029a 007b | {| Declare_Subprogram INIT_0078,For_Outer_Call,Visible,Unelaborated
0011 00bf | | Action Accept_Activation
0012 e001 | | Load 0x0,0x1
0013 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0014 029d 00b3 | | Declare_Subprogram INIT_00b0,For_Outer_Call
0016 029d 010b | | Declare_Subprogram INIT_0108,For_Outer_Call
0018 029d 0123 | #| Declare_Subprogram INIT_0120,For_Outer_Call
001a 029d 0133 | 3| Declare_Subprogram INIT_0130,For_Outer_Call
001c 1d0d | | Execute_Immediate Reference_Lex_1,0xd
001d 00c7 | | Action Elaborate_Subprogram
001e 1d0e | | Execute_Immediate Reference_Lex_1,0xe
001f 00c7 | | Action Elaborate_Subprogram
0020 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0021 00c7 | | Action Elaborate_Subprogram
0022 BODY_0008:
0022 00bc | | Action Signal_Activated
0023 00bb | | Action Signal_Completion
0024 0000 0000 | | .BLANK 0000[0x4]
0028 ; --------------------------------------------------------------------------------------
0028 ; SUBPROGRAM
0028 ; --------------------------------------------------------------------------------------
0028 0038 | 8 | .CONST 0x0038 ; Address of begin
0029 0004 | | .CONST 0x0004 ; Address of exception handler
002a 0004 | | .CONST 0x0004 ; Number of locals
002b INIT_0028:
002b e002 | | Load 0x0,0x2
002c e003 | | Load 0x0,0x3
002d 4803 |H | Short_Literal 0x3
002e 0092 0230 | 0| Action Push_String_Extended,0x230 ; "+"
0030 e004 | | Load 0x0,0x4
0031 0387 | | Declare_Variable Package
0032 00d8 | | Load_Top At_Offset_0
0033 020f | | Execute Module,Activate
0034 029f 0163 | c| Declare_Subprogram INIT_0160,For_Call
0036 029f 01c3 | | Declare_Subprogram INIT_01c0,For_Call
0038 BODY_0028:
0038 4800 |H | Short_Literal 0x0
0039 0092 0231 | 1| Action Push_String_Extended,0x231 ; "Internet"
003b e402 | | Load 0x2,0x2
003c 1812 | | Execute Package,Field_Execute,Field_Number 0x12
003d 4800 |H | Short_Literal 0x0
003e 0092 0232 | 2| Action Push_String_Extended,0x232 ; "Ethernet"
0040 e402 | | Load 0x2,0x2
0041 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0042 4800 |H | Short_Literal 0x0
0043 0092 0233 | 3| Action Push_String_Extended,0x233 ; "flags"
0045 e402 | | Load 0x2,0x2
0046 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0047 e5ff | | Load 0x2,-0x1
0048 e005 | | Load 0x0,0x5
0049 1b0d | | Execute Package,Field_Read,Field_Number 0xd
004a 01df | | Execute Vector,Equal
004b 6802 |h | Jump_Zero 0x4e
004c 8404 | | Call 0x2,0x4
004d 7807 |x | Jump 0x55
004e e5ff | | Load 0x2,-0x1
004f 8006 | | Call 0x0,0x6
0050 e007 | | Load 0x0,0x7
0051 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0052 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0053 01c7 | | Execute Vector,Convert
0054 8403 | | Call 0x2,0x3
0055 4801 |H | Short_Literal 0x1
0056 00db | | Load_Top At_Offset_3
0057 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0058 4801 |H | Short_Literal 0x1
0059 e008 | | Load 0x0,0x8
005a 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
005b e008 | | Load 0x0,0x8
005c 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
005d 00db | | Load_Top At_Offset_3
005e 1816 | | Execute Package,Field_Execute,Field_Number 0x16
005f 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0060 ; --------------------------------------------------------------------------------------
0060 ; SUBPROGRAM
0060 ; --------------------------------------------------------------------------------------
0060 0065 | e | .CONST 0x0065 ; Address of begin
0061 0004 | | .CONST 0x0004 ; Address of exception handler
0062 0002 | | .CONST 0x0002 ; Number of locals
0063 INIT_0060:
0063 029f 01db | | Declare_Subprogram INIT_01d8,For_Call
0065 BODY_0060:
0065 00db | | Load_Top At_Offset_3
0066 e005 | | Load 0x0,0x5
0067 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0068 01df | | Execute Vector,Equal
0069 6802 |h | Jump_Zero 0x6c
006a 8402 | | Call 0x2,0x2
006b 4502 |E | Exit_Suprogram New_Top_Offset 0x2
006c 00db | | Load_Top At_Offset_3
006d 8006 | | Call 0x0,0x6
006e e007 | | Load 0x0,0x7
006f 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0070 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0071 01c7 | | Execute Vector,Convert
0072 e007 | | Load 0x0,0x7
0073 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0074 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0075 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0076 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0077 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0078 ; --------------------------------------------------------------------------------------
0078 ; SUBPROGRAM
0078 ; --------------------------------------------------------------------------------------
0078 007d | } | .CONST 0x007d ; Address of begin
0079 0004 | | .CONST 0x0004 ; Address of exception handler
007a 0002 | | .CONST 0x0002 ; Number of locals
007b INIT_0078:
007b 00e3 | | Load_Encached Natural_Cache
007c 0602 | | Execute_Immediate Set_Value_Unchecked,0x2
007d BODY_0078:
007d e5fd | | Load 0x2,-0x3
007e 6803 |h | Jump_Zero 0x82
007f 00d8 | | Load_Top At_Offset_0
0080 0a08 | | Execute_Immediate Plus,0x8
0081 0059 | Y | Store_Top Discrete,At_Offset_1
0082 e5fc | | Load 0x2,-0x4
0083 6803 |h | Jump_Zero 0x87
0084 00d8 | | Load_Top At_Offset_0
0085 0a04 | | Execute_Immediate Plus,0x4
0086 0059 | Y | Store_Top Discrete,At_Offset_1
0087 e007 | | Load 0x0,0x7
0088 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0089 1b18 | | Execute Package,Field_Read,Field_Number 0x18
008a 1b12 | | Execute Package,Field_Read,Field_Number 0x12
008b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
008c 0322 | " | Declare_Variable Record
008d e5fe | | Load 0x2,-0x2
008e e007 | | Load 0x0,0x7
008f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0090 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0091 01c7 | | Execute Vector,Convert
0092 e007 | | Load 0x0,0x7
0093 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0094 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0095 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0096 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0097 3000 |0 | Execute Record,Field_Type,Field_Number 0x0
0098 0119 | | Execute Any,Check_In_Formal_Type
0099 00d9 | | Load_Top At_Offset_1
009a 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
009b 00d9 | | Load_Top At_Offset_1
009c 00d9 | | Load_Top At_Offset_1
009d 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
009e e5ff | | Load 0x2,-0x1
009f e007 | | Load 0x0,0x7
00a0 1b10 | | Execute Package,Field_Read,Field_Number 0x10
00a1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00a2 01c7 | | Execute Vector,Convert
00a3 e007 | | Load 0x0,0x7
00a4 1b10 | | Execute Package,Field_Read,Field_Number 0x10
00a5 1b18 | | Execute Package,Field_Read,Field_Number 0x18
00a6 1b12 | | Execute Package,Field_Read,Field_Number 0x12
00a7 180f | | Execute Package,Field_Execute,Field_Number 0xf
00a8 4505 |E | Exit_Suprogram New_Top_Offset 0x5
00a9 0000 0000 | | .BLANK 0000[0x7]
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00bc | | .CONST 0x00bc ; Address of begin
00b1 0004 | | .CONST 0x0004 ; Address of exception handler
00b2 0004 | | .CONST 0x0004 ; Number of locals
00b3 INIT_00b0:
00b3 e009 | | Load 0x0,0x9
00b4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00b5 02c7 | | Declare_Variable Any
00b6 00d8 | | Load_Top At_Offset_0
00b7 1c00 | | Execute_Immediate Run_Utility,0x0
00b8 e00a | | Load 0x0,0xa
00b9 1b19 | | Execute Package,Field_Read,Field_Number 0x19
00ba 029f 01fb | | Declare_Subprogram INIT_01f8,For_Call
00bc BODY_00b0:
00bc e00a | | Load 0x0,0xa
00bd 1b19 | | Execute Package,Field_Read,Field_Number 0x19
00be 00db | | Load_Top At_Offset_3
00bf 0120 | | Execute Any,Is_Value
00c0 6803 |h | Jump_Zero 0xc4
00c1 e009 | | Load 0x0,0x9
00c2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00c3 7801 |x | Jump 0xc5
00c4 00db | | Load_Top At_Offset_3
00c5 e00a | | Load 0x0,0xa
00c6 1b16 | | Execute Package,Field_Read,Field_Number 0x16
00c7 4801 |H | Short_Literal 0x1
00c8 4806 |H | Short_Literal 0x6
00c9 00e9 | | Load_Encached String_Cache
00ca 0334 | 4 | Declare_Variable Array,With_Constraint
00cb 5034 |P4 | Indirect_Literal Any,0x100,{0x5544502f, 0x49502020}
00cc e009 | | Load 0x0,0x9
00cd 181a | | Execute Package,Field_Execute,Field_Number 0x1a
00ce c402 | | Store 0x2,0x2
00cf 005a | Z | Store_Top Discrete,At_Offset_2
00d0 00d9 | | Load_Top At_Offset_1
00d1 701e |p | Jump_Nonzero 0xf0
00d2 e00a | | Load 0x0,0xa
00d3 1b19 | | Execute Package,Field_Read,Field_Number 0x19
00d4 6027 |`' | Indirect_Literal Discrete,0xfc,{0x00007fff, 0xffffffff}
00d5 e00b | | Load 0x0,0xb
00d6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00d7 4800 |H | Short_Literal 0x0
00d8 4803 |H | Short_Literal 0x3
00d9 e00c | | Load 0x0,0xc
00da 1b12 | | Execute Package,Field_Read,Field_Number 0x12
00db 0334 | 4 | Declare_Variable Array,With_Constraint
00dc 487f |H | Short_Literal 0x7f
00dd 4800 |H | Short_Literal 0x0
00de 00da | | Load_Top At_Offset_2
00df 01d6 | | Execute Vector,Field_Write
00e0 4800 |H | Short_Literal 0x0
00e1 4801 |H | Short_Literal 0x1
00e2 00da | | Load_Top At_Offset_2
00e3 01d6 | | Execute Vector,Field_Write
00e4 4800 |H | Short_Literal 0x0
00e5 4802 |H | Short_Literal 0x2
00e6 00da | | Load_Top At_Offset_2
00e7 01d6 | | Execute Vector,Field_Write
00e8 4801 |H | Short_Literal 0x1
00e9 4803 |H | Short_Literal 0x3
00ea 00da | | Load_Top At_Offset_2
00eb 01d6 | | Execute Vector,Field_Write
00ec e402 | | Load 0x2,0x2
00ed e009 | | Load 0x0,0x9
00ee 181c | | Execute Package,Field_Execute,Field_Number 0x1c
00ef 005a | Z | Store_Top Discrete,At_Offset_2
00f0 00d9 | | Load_Top At_Offset_1
00f1 7002 |p | Jump_Nonzero 0xf4
00f2 8404 | | Call 0x2,0x4
00f3 4501 |E | Exit_Suprogram New_Top_Offset 0x1
00f4 e001 | | Load 0x0,0x1
00f5 1b16 | | Execute Package,Field_Read,Field_Number 0x16
00f6 e5ff | | Load 0x2,-0x1
00f7 017d | } | Execute Record,Structure_Write
00f8 4501 |E | Exit_Suprogram New_Top_Offset 0x1
00f9 0000 0000 | | .XXX[0x3]
00fb 0000 | |
00fc 0000 7fff | | .LITERAL {0x00007fff, 0xffffffff}
0100 5544 502f |UDP/| .LITERAL {0x5544502f, 0x49502020}
0104 0000 0000 | | .BLANK 0000[0x4]
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 0113 | | .CONST 0x0113 ; Address of begin
0109 0004 | | .CONST 0x0004 ; Address of exception handler
010a 0002 | | .CONST 0x0002 ; Number of locals
010b INIT_0108:
010b e210 | | Load 0x1,0x10
010c 0322 | " | Declare_Variable Record
010d e00d | | Load 0x0,0xd
010e 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
010f e001 | | Load 0x0,0x1
0110 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0111 00d9 | | Load_Top At_Offset_1
0112 017d | } | Execute Record,Structure_Write
0113 BODY_0108:
0113 00d8 | | Load_Top At_Offset_0
0114 8211 | | Call 0x1,0x11
0115 00d1 | | Pop_Control Pop_Count_1
0116 00d8 | | Load_Top At_Offset_0
0117 e5ff | | Load 0x2,-0x1
0118 017d | } | Execute Record,Structure_Write
0119 4501 |E | Exit_Suprogram New_Top_Offset 0x1
011a 0000 0000 | | .BLANK 0000[0x6]
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 0123 | # | .CONST 0x0123 ; Address of begin
0121 0004 | | .CONST 0x0004 ; Address of exception handler
0122 0001 | | .CONST 0x0001 ; Number of locals
0123 BODY_0120:
0123 INIT_0120:
0123 00da | | Load_Top At_Offset_2
0124 e001 | | Load 0x0,0x1
0125 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0126 e00d | | Load 0x0,0xd
0127 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
0128 e00e | | Load 0x0,0xe
0129 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
012a 0f00 | | Execute_Immediate Equal,0x0
012b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
012c 0000 0000 | | .BLANK 0000[0x4]
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0143 | C | .CONST 0x0143 ; Address of begin
0131 0004 | | .CONST 0x0004 ; Address of exception handler
0132 0004 | | .CONST 0x0004 ; Number of locals
0133 INIT_0130:
0133 00da | | Load_Top At_Offset_2
0134 e001 | | Load 0x0,0x1
0135 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0136 00d8 | | Load_Top At_Offset_0
0137 01dd | | Execute Vector,First
0138 e00d | | Load 0x0,0xd
0139 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
013a 01db | | Execute Vector,Length
013b 0273 | s | Execute Discrete,Plus
013c 0a02 | | Execute_Immediate Plus,0x2
013d 00e2 | | Load_Encached Integer_Cache
013e 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
013f e007 | | Load 0x0,0x7
0140 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0141 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0142 0337 | 7 | Declare_Variable Array
0143 BODY_0130:
0143 00cf | | Action Mark_Auxiliary
0144 00d9 | | Load_Top At_Offset_1
0145 01d9 | | Execute Vector,Reverse_Bounds
0146 0007 | | Action Break_Optional
0147 e403 | | Load 0x2,0x3
0148 e402 | | Load 0x2,0x2
0149 01d7 | | Execute Vector,Field_Read
014a 00d8 | | Load_Top At_Offset_0
014b e00c | | Load 0x0,0xc
014c 1b11 | | Execute Package,Field_Read,Field_Number 0x11
014d 0260 | ` | Execute Discrete,In_Type
014e 7001 |p | Jump_Nonzero 0x150
014f 0801 | | Execute_Immediate Raise,0x1
0150 00d9 | | Load_Top At_Offset_1
0151 e404 | | Load 0x2,0x4
0152 01d6 | | Execute Vector,Field_Write
0153 e403 | | Load 0x2,0x3
0154 0a01 | | Execute_Immediate Plus,0x1
0155 c403 | | Store 0x2,0x3
0156 00c8 | | Action Pop_Auxiliary_Range
0157 3fef |? | Loop_Increasing 0x147
0158 00ce | | Action Pop_Auxiliary
0159 00d8 | | Load_Top At_Offset_0
015a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
015b 0000 0000 | | .BLANK 0000[0x5]
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 016d | m | .CONST 0x016d ; Address of begin
0161 0004 | | .CONST 0x0004 ; Address of exception handler
0162 0003 | | .CONST 0x0003 ; Number of locals
0163 INIT_0160:
0163 00da | | Load_Top At_Offset_2
0164 e007 | | Load 0x0,0x7
0165 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0166 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0167 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0168 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0169 00d8 | | Load_Top At_Offset_0
016a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
016b 00e3 | | Load_Encached Natural_Cache
016c 03f1 | | Declare_Variable Discrete,With_Value
016d BODY_0160:
016d e7ff | | Load 0x3,-0x1
016e e00f | | Load 0x0,0xf
016f 180f | | Execute Package,Field_Execute,Field_Number 0xf
0170 e402 | | Load 0x2,0x2
0171 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0172 00d9 | | Load_Top At_Offset_1
0173 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0174 e010 | | Load 0x0,0x10
0175 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
0176 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0177 01c7 | | Execute Vector,Convert
0178 8011 | | Call 0x0,0x11
0179 e402 | | Load 0x2,0x2
017a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
017b 00d8 | | Load_Top At_Offset_0
017c 7004 |p | Jump_Nonzero 0x181
017d 00ea | | Load_Encached Null_String_Cache
017e e402 | | Load 0x2,0x2
017f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0180 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0181 00d8 | | Load_Top At_Offset_0
0182 09ff | | Execute_Immediate Binary_Scale,-0x1
0183 4801 |H | Short_Literal 0x1
0184 0279 | y | Execute Discrete,And
0185 7005 |p | Jump_Nonzero 0x18b
0186 0092 0234 | 4| Action Push_String_Extended,0x234 ; "incomplete"
0188 e402 | | Load 0x2,0x2
0189 1814 | | Execute Package,Field_Execute,Field_Number 0x14
018a 7803 |x | Jump 0x18e
018b 00d8 | | Load_Top At_Offset_0
018c 0afe | | Execute_Immediate Plus,-0x2
018d 0059 | Y | Store_Top Discrete,At_Offset_1
018e 00d8 | | Load_Top At_Offset_0
018f 09fe | | Execute_Immediate Binary_Scale,-0x2
0190 4801 |H | Short_Literal 0x1
0191 0279 | y | Execute Discrete,And
0192 6807 |h | Jump_Zero 0x19a
0193 0092 0235 | 5| Action Push_String_Extended,0x235 ; "permanent"
0195 e402 | | Load 0x2,0x2
0196 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0197 00d8 | | Load_Top At_Offset_0
0198 0afc | | Execute_Immediate Plus,-0x4
0199 0059 | Y | Store_Top Discrete,At_Offset_1
019a 00d8 | | Load_Top At_Offset_0
019b 09fd | | Execute_Immediate Binary_Scale,-0x3
019c 4801 |H | Short_Literal 0x1
019d 0279 | y | Execute Discrete,And
019e 6807 |h | Jump_Zero 0x1a6
019f 0092 0236 | 6| Action Push_String_Extended,0x236 ; "published"
01a1 e402 | | Load 0x2,0x2
01a2 1814 | | Execute Package,Field_Execute,Field_Number 0x14
01a3 00d8 | | Load_Top At_Offset_0
01a4 0af8 | | Execute_Immediate Plus,-0x8
01a5 0059 | Y | Store_Top Discrete,At_Offset_1
01a6 00d8 | | Load_Top At_Offset_0
01a7 09fc | | Execute_Immediate Binary_Scale,-0x4
01a8 4801 |H | Short_Literal 0x1
01a9 0279 | y | Execute Discrete,And
01aa 6807 |h | Jump_Zero 0x1b2
01ab 0092 0237 | 7| Action Push_String_Extended,0x237 ; "useTrailers"
01ad e402 | | Load 0x2,0x2
01ae 1814 | | Execute Package,Field_Execute,Field_Number 0x14
01af 00d8 | | Load_Top At_Offset_0
01b0 0af0 | | Execute_Immediate Plus,-0x10
01b1 0059 | Y | Store_Top Discrete,At_Offset_1
01b2 00d8 | | Load_Top At_Offset_0
01b3 4800 |H | Short_Literal 0x0
01b4 4801 |H | Short_Literal 0x1
01b5 0262 | b | Execute Discrete,In_Range
01b6 7005 |p | Jump_Nonzero 0x1bc
01b7 00d8 | | Load_Top At_Offset_0
01b8 00e0 | | Load_Encached Standard_Cache
01b9 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01ba e402 | | Load 0x2,0x2
01bb 1814 | | Execute Package,Field_Execute,Field_Number 0x14
01bc e402 | | Load 0x2,0x2
01bd 1815 | | Execute Package,Field_Execute,Field_Number 0x15
01be 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01bf 0000 | | .XXX[0x1]
01c0 ; --------------------------------------------------------------------------------------
01c0 ; SUBPROGRAM
01c0 ; --------------------------------------------------------------------------------------
01c0 01c5 | | .CONST 0x01c5 ; Address of begin
01c1 0004 | | .CONST 0x0004 ; Address of exception handler
01c2 0002 | | .CONST 0x0002 ; Number of locals
01c3 INIT_01c0:
01c3 e210 | | Load 0x1,0x10
01c4 0322 | " | Declare_Variable Record
01c5 BODY_01c0:
01c5 00d8 | | Load_Top At_Offset_0
01c6 8212 | | Call 0x1,0x12
01c7 00d1 | | Pop_Control Pop_Count_1
01c8 00cf | | Action Mark_Auxiliary
01c9 7807 |x | Jump 0x1d1
01ca 00d9 | | Load_Top At_Offset_1
01cb 8214 | | Call 0x1,0x14
01cc 8403 | | Call 0x2,0x3
01cd 00d9 | | Load_Top At_Offset_1
01ce 8211 | | Call 0x1,0x11
01cf 00d1 | | Pop_Control Pop_Count_1
01d0 00c9 | | Action Pop_Auxiliary_Loop
01d1 00d9 | | Load_Top At_Offset_1
01d2 8213 | | Call 0x1,0x13
01d3 6ff6 |o | Jump_Zero 0x1ca
01d4 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01d5 0000 0000 | | .XXX[0x3]
01d7 0000 | |
01d8 ; --------------------------------------------------------------------------------------
01d8 ; SUBPROGRAM
01d8 ; --------------------------------------------------------------------------------------
01d8 01dd | | .CONST 0x01dd ; Address of begin
01d9 0004 | | .CONST 0x0004 ; Address of exception handler
01da 0002 | | .CONST 0x0002 ; Number of locals
01db INIT_01d8:
01db e210 | | Load 0x1,0x10
01dc 0322 | " | Declare_Variable Record
01dd BODY_01d8:
01dd 00d8 | | Load_Top At_Offset_0
01de 8212 | | Call 0x1,0x12
01df 00d1 | | Pop_Control Pop_Count_1
01e0 00cf | | Action Mark_Auxiliary
01e1 780b |x | Jump 0x1ed
01e2 00d9 | | Load_Top At_Offset_1
01e3 8214 | | Call 0x1,0x14
01e4 e007 | | Load 0x0,0x7
01e5 1b10 | | Execute Package,Field_Read,Field_Number 0x10
01e6 1b18 | | Execute Package,Field_Read,Field_Number 0x18
01e7 1b12 | | Execute Package,Field_Read,Field_Number 0x12
01e8 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01e9 00d9 | | Load_Top At_Offset_1
01ea 8211 | | Call 0x1,0x11
01eb 00d1 | | Pop_Control Pop_Count_1
01ec 00c9 | | Action Pop_Auxiliary_Loop
01ed 00d9 | | Load_Top At_Offset_1
01ee 8213 | | Call 0x1,0x13
01ef 6ff2 |o | Jump_Zero 0x1e2
01f0 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01f1 0000 0000 | | .BLANK 0000[0x7]
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 0216 | | .CONST 0x0216 ; Address of begin
01f9 0004 | | .CONST 0x0004 ; Address of exception handler
01fa 0002 | | .CONST 0x0002 ; Number of locals
01fb INIT_01f8:
01fb 6030 |`0 | Indirect_Literal Discrete,0x22c,{0x00000000, 0x00028000}
01fc 602b |`+ | Indirect_Literal Discrete,0x228,{0x00000000, 0x00000800}
01fd 0092 0238 | 8| Action Push_String_Extended,0x238 ; "public"
01ff e001 | | Load 0x0,0x1
0200 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
0201 e402 | | Load 0x2,0x2
0202 4801 |H | Short_Literal 0x1
0203 4801 |H | Short_Literal 0x1
0204 e001 | | Load 0x0,0x1
0205 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
0206 0334 | 4 | Declare_Variable Array,With_Constraint
0207 e001 | | Load 0x0,0x1
0208 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
0209 0322 | " | Declare_Variable Record
020a e5ff | | Load 0x2,-0x1
020b 00d9 | | Load_Top At_Offset_1
020c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
020d e001 | | Load 0x0,0x1
020e 1b12 | | Execute Package,Field_Read,Field_Number 0x12
020f 00d9 | | Load_Top At_Offset_1
0210 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0211 4801 |H | Short_Literal 0x1
0212 00da | | Load_Top At_Offset_2
0213 01d6 | | Execute Vector,Field_Write
0214 e00b | | Load 0x0,0xb
0215 180e | | Execute Package,Field_Execute,Field_Number 0xe
0216 BODY_01f8:
0216 00d8 | | Load_Top At_Offset_0
0217 01db | | Execute Vector,Length
0218 0f01 | | Execute_Immediate Equal,0x1
0219 6808 |h | Jump_Zero 0x222
021a 00d8 | | Load_Top At_Offset_0
021b 01dd | | Execute Vector,First
021c 00d9 | | Load_Top At_Offset_1
021d 01d5 | | Execute Vector,Field_Reference
021e 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
021f e5ff | | Load 0x2,-0x1
0220 017d | } | Execute Record,Structure_Write
0221 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0222 e001 | | Load 0x0,0x1
0223 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0224 e5ff | | Load 0x2,-0x1
0225 017d | } | Execute Record,Structure_Write
0226 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0227 0000 | | .XXX[0x1]
0228 0000 0000 | | .LITERAL {0x00000000, 0x00000800}
022c 0000 0000 | | .LITERAL {0x00000000, 0x00028000}
0230 ; --------------------------------------------------------------------------------------
0230 ; STRING TABLE
0230 ; --------------------------------------------------------------------------------------
0230 0014 | | .STRTAB 0x0014->0x023a ; "+"
0231 0013 | | .STRTAB 0x0013->0x023a ; "Internet"
0232 0019 | | .STRTAB 0x0019->0x023e ; "Ethernet"
0233 001f | | .STRTAB 0x001f->0x0242 ; "flags"
0234 0022 | " | .STRTAB 0x0022->0x0245 ; "incomplete"
0235 002a | * | .STRTAB 0x002a->0x024a ; "permanent"
0236 0031 | 1 | .STRTAB 0x0031->0x024e ; "published"
0237 0038 | 8 | .STRTAB 0x0038->0x0253 ; "useTrailers"
0238 0041 | A | .STRTAB 0x0041->0x0258 ; "public"
0239 0045 | E | .STREND 0x0045->0x025b
023a 2b49 6e74 |+Int| .STRTAB_STRINGS
025c 0000 0000 | | .BLANK 0000[0x4]
0260 ; --------------------------------------------------------------------------------------
0260 ; Debug Table
0260 ; --------------------------------------------------------------------------------------
0260 0004 000c | | .DEBUG4 0x0004,0x000c,0xd189,0x0000,0x0001,0x0000
0266 91b0 4000 | @ | .XXX[0xe]
0268 0000 0918 | |
026a 4801 2547 |H %G|
026c c18e 400a | @ |
026e d770 0000 | p |
0270 0002 4647 | FG|
0272 0091 2400 | $ |
0274 0000 0000 | | .BLANK 0000[0x7]
027b 123e 2800 | >( | .XXX[0x13]
027d 0245 7200 | Er |
027f 0000 2762 | 'b|
0281 e012 43c8 | C |
0283 0000 0000 | |
0285 a000 0000 | |
0287 0045 9980 | E |
0289 24aa a000 |$ |
028b 0000 0248 | H|
028d 0200 | |
028e 0000 0000 | | .BLANK 0000[0x7]
0295 0012 d300 | | .XXX[0x1e]
0297 0928 c000 | ( |
0299 0000 0016 | |
029b 0000 921e | |
029d 4000 0000 |@ |
029f 0b90 0000 | |
02a1 0002 495b | I[|
02a3 8448 0049 | H I|
02a5 5540 0000 |U@ |
02a7 0004 93f6 | |
02a9 0093 9e20 | |
02ab c720 056b | k|
02ad b800 0000 | |
02af 0125 1800 | % |
02b1 490f 2000 |I |
02b3 0000 0000 | | .BLANK 0000[0x6]
02b9 0009 2eb8 | . | .XXX[0x14]
02bb 0001 24ad | $ |
02bd 8000 0013 | |
02bf b170 0931 | p 1|
02c1 8800 0000 | |
02c3 0050 0000 | P |
02c5 0000 22cc | " |
02c7 c012 7498 | t |
02c9 0000 0001 | |
02cb 25f5 8000 |% |
02cd 0000 0000 | | .BLANK 0000[0x7]
02d4 0969 8004 | i | .XXX[0x37]
02d6 9c32 0000 | 2 |
02d8 0000 6d00 | m |
02da 0049 8c40 | I @|
02dc 0000 0005 | |
02de d800 0000 | |
02e0 0126 a242 | & B|
02e2 2400 24e9 |$ $ |
02e4 3000 0000 |0 |
02e6 024d e400 | M |
02e8 4a4c 3063 |JL0c|
02ea 9002 b5dc | |
02ec 0000 0000 | |
02ee 9386 4024 | @$|
02f0 c620 0000 | |
02f2 0000 0000 | |
02f4 03cb 4800 | H |
02f6 0000 0000 | |
02f8 049f 2e00 | . |
02fa 0093 5100 | Q |
02fc 0000 09d8 | |
02fe b804 a096 | |
0300 0000 0000 | |
0302 2800 0000 |( |
0304 0011 6660 | f`|
0306 0949 f000 | I |
0308 0000 0093 | |
030a f500 | |
030b 0000 0000 | | .BLANK 0000[0x7]
0312 0004 b4c0 | | .XXX[0x38]
0314 0252 0200 | R |
0316 0000 004d | M|
0318 8000 2504 | % |
031a b000 0000 | |
031c 02f4 0000 | |
031e 0000 944b | K|
0320 6112 0012 |a |
0322 93e0 0000 | |
0324 0001 28e6 | ( |
0326 8025 64a8 | %d |
0328 31c8 015a |1 Z|
032a ee00 0000 | |
032c 004a 4040 | J@@|
032e 1282 5800 | X |
0330 0000 0000 | |
0332 0001 416a | Aj|
0334 0000 0000 | |
0336 0002 5380 | S |
0338 0000 4a25 | J%|
033a a000 0004 | |
033c ec5c 0254 | \ T|
033e 3400 0000 |4 |
0340 0014 0000 | |
0342 0000 08b3 | |
0344 3004 acca |0 |
0346 0000 0000 | |
0348 4a77 a000 |Jw |
034a 0000 0000 | | .BLANK 0000[0x7]
0351 025a 6001 | Z` | .XXX[0x37]
0353 2af5 8000 |* |
0355 0000 1540 | @|
0357 0012 a1a0 | |
0359 0000 0001 | |
035b 7e00 0000 |~ |
035d 004a a2d0 | J |
035f 8900 0959 | Y|
0361 9400 0000 | |
0363 0095 6d80 | m |
0365 12d1 9c18 | |
0367 e400 ad77 | w|
0369 0000 0000 | |
036b 255e b009 |%^ |
036d 50d0 0000 |P |
036f 0000 0000 | |
0371 00a2 a980 | |
0373 0000 0000 | |
0375 012b b480 | + |
0377 0025 5160 | %Q`|
0379 0000 0276 | v|
037b 2e01 2c0e |. , |
037d 8000 0000 | |
037f 0a00 0000 | |
0381 0004 5998 | Y |
0383 025a 4e00 | ZN |
0385 0000 0025 | %|
0387 7a60 |z` |
0388 0000 0000 | | .BLANK 0000[0x7]
038f 0001 2d30 | -0| .XXX[0x1e]
0391 0096 7500 | u |
0393 0000 000a | |
0395 e000 0960 | `|
0397 7400 0000 |t |
0399 00c1 0000 | |
039b 0000 258f | % |
039d f844 8004 | D |
039f b49c 0000 | |
03a1 0000 4b33 | K3|
03a3 e009 7872 | xr|
03a5 0c72 0056 | r V|
03a7 bb80 0000 | |
03a9 0012 cea0 | |
03ab 04b0 3a00 | : |
03ad 0000 0000 | | .BLANK 0000[0x7]
03b4 96d4 8000 | | .XXX[0x13]
03b6 12c7 f800 | |
03b8 0001 3b17 | ; |
03ba 0097 0180 | |
03bc 0000 0005 | |
03be 0000 0000 | |
03c0 022c cc01 | , |
03c2 2f1b 8000 |/ |
03c4 0000 12dc | |
03c6 7800 |x |
03c7 0000 0000 | | .BLANK 0000[0x7]
03ce 0096 9800 | | .XXX[0x32]
03d0 4bb7 a000 |K |
03d2 0000 09c0 | |
03d4 0004 b80c | |
03d6 0000 0000 | |
03d8 6180 0000 |a |
03da 0012 e744 | D|
03dc 2240 025e |"@ ^|
03de 3700 0000 |7 |
03e0 0025 d880 | % |
03e2 04c4 0b06 | |
03e4 3900 2b5d |9 +]|
03e6 c000 0000 | |
03e8 0976 f402 | v |
03ea 5c06 0000 |\ |
03ec 0000 0000 | |
03ee 0041 1aa0 | A |
03f0 0000 0000 | |
03f2 004b e760 | K `|
03f4 0009 73a0 | s |
03f6 0000 009d | |
03f8 8b80 4bfd | K |
03fa e000 0000 | |
03fc 0280 0000 | |
03fe 0001 1666 | f|