|
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 03b8 | | .CONST 0x03b8 ; 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 8002 | | .CONST 0x8002 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 001c | | .CONST 0x001c ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0012 | | .CONST 0x0012 ; Number of locals
000b INIT_0008:
000b 029a 0023 | #| Declare_Subprogram INIT_0020,For_Outer_Call,Visible,Unelaborated
000d 029a 015b | [| Declare_Subprogram INIT_0158,For_Outer_Call,Visible,Unelaborated
000f 00bf | | Action Accept_Activation
0010 029d 0283 | | Declare_Subprogram INIT_0280,For_Outer_Call
0012 029d 02a3 | | Declare_Subprogram INIT_02a0,For_Outer_Call
0014 029d 02bb | | Declare_Subprogram INIT_02b8,For_Outer_Call
0016 029d 02e3 | | Declare_Subprogram INIT_02e0,For_Outer_Call
0018 1d0d | | Execute_Immediate Reference_Lex_1,0xd
0019 00c7 | | Action Elaborate_Subprogram
001a 1d0e | | Execute_Immediate Reference_Lex_1,0xe
001b 00c7 | | Action Elaborate_Subprogram
001c BODY_0008:
001c 00bc | | Action Signal_Activated
001d 00bb | | Action Signal_Completion
001e 0000 0000 | | .XXX[0x2]
0020 ; --------------------------------------------------------------------------------------
0020 ; SUBPROGRAM
0020 ; --------------------------------------------------------------------------------------
0020 0106 | | .CONST 0x0106 ; Address of begin
0021 014c | L | .CONST 0x014c ; Address of exception handler
0022 0007 | | .CONST 0x0007 ; Number of locals
0023 INIT_0020:
0023 00db | | Load_Top At_Offset_3
0024 e001 | | Load 0x0,0x1
0025 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
0026 e002 | | Load 0x0,0x2
0027 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0028 02c7 | | Declare_Variable Any
0029 00d8 | | Load_Top At_Offset_0
002a 1c00 | | Execute_Immediate Run_Utility,0x0
002b 4800 |H | Short_Literal 0x0
002c 4802 |H | Short_Literal 0x2
002d e003 | | Load 0x0,0x3
002e 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
002f 0334 | 4 | Declare_Variable Array,With_Constraint
0030 4800 |H | Short_Literal 0x0
0031 4800 |H | Short_Literal 0x0
0032 00da | | Load_Top At_Offset_2
0033 01d6 | | Execute Vector,Field_Write
0034 4800 |H | Short_Literal 0x0
0035 4801 |H | Short_Literal 0x1
0036 00da | | Load_Top At_Offset_2
0037 01d6 | | Execute Vector,Field_Write
0038 4800 |H | Short_Literal 0x0
0039 4802 |H | Short_Literal 0x2
003a 00da | | Load_Top At_Offset_2
003b 01d6 | | Execute Vector,Field_Write
003c 4801 |H | Short_Literal 0x1
003d 480a |H | Short_Literal 0xa
003e e001 | | Load 0x0,0x1
003f 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
0040 035b | [ | Declare_Type Array,Constrained
0041 0337 | 7 | Declare_Variable Array
0042 00d8 | | Load_Top At_Offset_0
0043 0335 | 5 | Declare_Variable Array,Duplicate
0044 00cd | | Action Spare6_Action
0045 e001 | | Load 0x0,0x1
0046 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
0047 0322 | " | Declare_Variable Record
0048 e004 | | Load 0x0,0x4
0049 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
004a e404 | | Load 0x2,0x4
004b 01cc | | Execute Vector,Catenate
004c e001 | | Load 0x0,0x1
004d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
004e 00d9 | | Load_Top At_Offset_1
004f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0050 e001 | | Load 0x0,0x1
0051 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0052 00d9 | | Load_Top At_Offset_1
0053 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0054 4801 |H | Short_Literal 0x1
0055 00da | | Load_Top At_Offset_2
0056 01d6 | | Execute Vector,Field_Write
0057 e001 | | Load 0x0,0x1
0058 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
0059 0322 | " | Declare_Variable Record
005a e004 | | Load 0x0,0x4
005b 1b22 | " | Execute Package,Field_Read,Field_Number 0x22
005c e404 | | Load 0x2,0x4
005d 01cc | | Execute Vector,Catenate
005e e001 | | Load 0x0,0x1
005f 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0060 00d9 | | Load_Top At_Offset_1
0061 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0062 e001 | | Load 0x0,0x1
0063 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0064 00d9 | | Load_Top At_Offset_1
0065 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0066 4802 |H | Short_Literal 0x2
0067 00da | | Load_Top At_Offset_2
0068 01d6 | | Execute Vector,Field_Write
0069 e001 | | Load 0x0,0x1
006a 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
006b 0322 | " | Declare_Variable Record
006c e004 | | Load 0x0,0x4
006d 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
006e e404 | | Load 0x2,0x4
006f 01cc | | Execute Vector,Catenate
0070 e001 | | Load 0x0,0x1
0071 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0072 00d9 | | Load_Top At_Offset_1
0073 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0074 e001 | | Load 0x0,0x1
0075 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0076 00d9 | | Load_Top At_Offset_1
0077 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0078 4803 |H | Short_Literal 0x3
0079 00da | | Load_Top At_Offset_2
007a 01d6 | | Execute Vector,Field_Write
007b e001 | | Load 0x0,0x1
007c 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
007d 0322 | " | Declare_Variable Record
007e e004 | | Load 0x0,0x4
007f 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
0080 e404 | | Load 0x2,0x4
0081 01cc | | Execute Vector,Catenate
0082 e001 | | Load 0x0,0x1
0083 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0084 00d9 | | Load_Top At_Offset_1
0085 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0086 e001 | | Load 0x0,0x1
0087 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0088 00d9 | | Load_Top At_Offset_1
0089 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
008a 4804 |H | Short_Literal 0x4
008b 00da | | Load_Top At_Offset_2
008c 01d6 | | Execute Vector,Field_Write
008d e001 | | Load 0x0,0x1
008e 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
008f 0322 | " | Declare_Variable Record
0090 e004 | | Load 0x0,0x4
0091 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
0092 e404 | | Load 0x2,0x4
0093 01cc | | Execute Vector,Catenate
0094 e001 | | Load 0x0,0x1
0095 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0096 00d9 | | Load_Top At_Offset_1
0097 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0098 e001 | | Load 0x0,0x1
0099 1b12 | | Execute Package,Field_Read,Field_Number 0x12
009a 00d9 | | Load_Top At_Offset_1
009b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
009c 4805 |H | Short_Literal 0x5
009d 00da | | Load_Top At_Offset_2
009e 01d6 | | Execute Vector,Field_Write
009f e001 | | Load 0x0,0x1
00a0 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
00a1 0322 | " | Declare_Variable Record
00a2 e004 | | Load 0x0,0x4
00a3 1b26 | & | Execute Package,Field_Read,Field_Number 0x26
00a4 e404 | | Load 0x2,0x4
00a5 01cc | | Execute Vector,Catenate
00a6 e001 | | Load 0x0,0x1
00a7 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00a8 00d9 | | Load_Top At_Offset_1
00a9 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
00aa e001 | | Load 0x0,0x1
00ab 1b12 | | Execute Package,Field_Read,Field_Number 0x12
00ac 00d9 | | Load_Top At_Offset_1
00ad 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
00ae 4806 |H | Short_Literal 0x6
00af 00da | | Load_Top At_Offset_2
00b0 01d6 | | Execute Vector,Field_Write
00b1 e001 | | Load 0x0,0x1
00b2 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
00b3 0322 | " | Declare_Variable Record
00b4 e004 | | Load 0x0,0x4
00b5 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
00b6 e404 | | Load 0x2,0x4
00b7 01cc | | Execute Vector,Catenate
00b8 e001 | | Load 0x0,0x1
00b9 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00ba 00d9 | | Load_Top At_Offset_1
00bb 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
00bc e001 | | Load 0x0,0x1
00bd 1b12 | | Execute Package,Field_Read,Field_Number 0x12
00be 00d9 | | Load_Top At_Offset_1
00bf 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
00c0 4807 |H | Short_Literal 0x7
00c1 00da | | Load_Top At_Offset_2
00c2 01d6 | | Execute Vector,Field_Write
00c3 e001 | | Load 0x0,0x1
00c4 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
00c5 0322 | " | Declare_Variable Record
00c6 e004 | | Load 0x0,0x4
00c7 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
00c8 e404 | | Load 0x2,0x4
00c9 01cc | | Execute Vector,Catenate
00ca e001 | | Load 0x0,0x1
00cb 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00cc 00d9 | | Load_Top At_Offset_1
00cd 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
00ce e001 | | Load 0x0,0x1
00cf 1b12 | | Execute Package,Field_Read,Field_Number 0x12
00d0 00d9 | | Load_Top At_Offset_1
00d1 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
00d2 4808 |H | Short_Literal 0x8
00d3 00da | | Load_Top At_Offset_2
00d4 01d6 | | Execute Vector,Field_Write
00d5 e001 | | Load 0x0,0x1
00d6 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
00d7 0322 | " | Declare_Variable Record
00d8 e004 | | Load 0x0,0x4
00d9 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29
00da e404 | | Load 0x2,0x4
00db 01cc | | Execute Vector,Catenate
00dc e001 | | Load 0x0,0x1
00dd 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00de 00d9 | | Load_Top At_Offset_1
00df 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
00e0 e001 | | Load 0x0,0x1
00e1 1b12 | | Execute Package,Field_Read,Field_Number 0x12
00e2 00d9 | | Load_Top At_Offset_1
00e3 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
00e4 4809 |H | Short_Literal 0x9
00e5 00da | | Load_Top At_Offset_2
00e6 01d6 | | Execute Vector,Field_Write
00e7 e001 | | Load 0x0,0x1
00e8 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
00e9 0322 | " | Declare_Variable Record
00ea e004 | | Load 0x0,0x4
00eb 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
00ec e404 | | Load 0x2,0x4
00ed 01cc | | Execute Vector,Catenate
00ee e001 | | Load 0x0,0x1
00ef 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00f0 00d9 | | Load_Top At_Offset_1
00f1 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
00f2 e001 | | Load 0x0,0x1
00f3 1b12 | | Execute Package,Field_Read,Field_Number 0x12
00f4 00d9 | | Load_Top At_Offset_1
00f5 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
00f6 480a |H | Short_Literal 0xa
00f7 00da | | Load_Top At_Offset_2
00f8 01d6 | | Execute Vector,Field_Write
00f9 00d9 | | Load_Top At_Offset_1
00fa 01d4 | | Execute Vector,Structure_Write
00fb e005 | | Load 0x0,0x5
00fc e006 | | Load 0x0,0x6
00fd 480a |H | Short_Literal 0xa
00fe 0092 0376 | v| Action Push_String_Extended,0x376 ; " "
0100 e007 | | Load 0x0,0x7
0101 0387 | | Declare_Variable Package
0102 00d8 | | Load_Top At_Offset_0
0103 020f | | Execute Module,Activate
0104 029f 02f3 | | Declare_Subprogram INIT_02f0,For_Call
0106 BODY_0020:
0106 4801 |H | Short_Literal 0x1
0107 0092 0377 | w| Action Push_String_Extended,0x377 ; "Type"
0109 00db | | Load_Top At_Offset_3
010a 1812 | | Execute Package,Field_Execute,Field_Number 0x12
010b 4800 |H | Short_Literal 0x0
010c 0092 0378 | x| Action Push_String_Extended,0x378 ; "Destination"
010e 00db | | Load_Top At_Offset_3
010f 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0110 4800 |H | Short_Literal 0x0
0111 0092 0379 | y| Action Push_String_Extended,0x379 ; "Next Hop"
0113 00db | | Load_Top At_Offset_3
0114 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0115 4801 |H | Short_Literal 0x1
0116 0092 037a | z| Action Push_String_Extended,0x37a ; "I/F"
0118 00db | | Load_Top At_Offset_3
0119 1812 | | Execute Package,Field_Execute,Field_Number 0x12
011a 4801 |H | Short_Literal 0x1
011b 0092 037b | {| Action Push_String_Extended,0x37b ; "M1"
011d 00db | | Load_Top At_Offset_3
011e 1812 | | Execute Package,Field_Execute,Field_Number 0x12
011f 4801 |H | Short_Literal 0x1
0120 0092 037c | || Action Push_String_Extended,0x37c ; "M2"
0122 00db | | Load_Top At_Offset_3
0123 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0124 4801 |H | Short_Literal 0x1
0125 0092 037d | }| Action Push_String_Extended,0x37d ; "M3"
0127 00db | | Load_Top At_Offset_3
0128 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0129 4801 |H | Short_Literal 0x1
012a 0092 037e | ~| Action Push_String_Extended,0x37e ; "M4"
012c 00db | | Load_Top At_Offset_3
012d 1812 | | Execute Package,Field_Execute,Field_Number 0x12
012e 4801 |H | Short_Literal 0x1
012f 0092 037f | | Action Push_String_Extended,0x37f ; "Proto"
0131 00db | | Load_Top At_Offset_3
0132 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0133 4801 |H | Short_Literal 0x1
0134 0092 0380 | | Action Push_String_Extended,0x380 ; "Age"
0136 00db | | Load_Top At_Offset_3
0137 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0138 e403 | | Load 0x2,0x3
0139 e5ff | | Load 0x2,-0x1
013a 8008 | | Call 0x0,0x8
013b c403 | | Store 0x2,0x3
013c 00cf | | Action Mark_Auxiliary
013d 8407 | | Call 0x2,0x7
013e 00c9 | | Action Pop_Auxiliary_Loop
013f 7ffd | | Jump 0x13d
0140 00ce | | Action Pop_Auxiliary
0141 e403 | | Load 0x2,0x3
0142 e002 | | Load 0x0,0x2
0143 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0144 4801 |H | Short_Literal 0x1
0145 e009 | | Load 0x0,0x9
0146 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
0147 e009 | | Load 0x0,0x9
0148 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0149 00da | | Load_Top At_Offset_2
014a 1816 | | Execute Package,Field_Execute,Field_Number 0x16
014b 4503 |E | Exit_Suprogram New_Top_Offset 0x3
014c TRAP_0020:
014c 0007 | | Action Break_Optional
014d e403 | | Load 0x2,0x3
014e e002 | | Load 0x0,0x2
014f 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0150 00d8 | | Load_Top At_Offset_0
0151 0101 | | Execute Exception,Reraise
0152 0000 0000 | | .BLANK 0000[0x6]
0158 ; --------------------------------------------------------------------------------------
0158 ; SUBPROGRAM
0158 ; --------------------------------------------------------------------------------------
0158 0262 | b | .CONST 0x0262 ; Address of begin
0159 0273 | s | .CONST 0x0273 ; Address of exception handler
015a 0006 | | .CONST 0x0006 ; Number of locals
015b INIT_0158:
015b e002 | | Load 0x0,0x2
015c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
015d 02c7 | | Declare_Variable Any
015e 00d8 | | Load_Top At_Offset_0
015f 1c00 | | Execute_Immediate Run_Utility,0x0
0160 e5fe | | Load 0x2,-0x2
0161 01da | | Execute Vector,Bounds
0162 e003 | | Load 0x0,0x3
0163 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
0164 035b | [ | Declare_Type Array,Constrained
0165 0337 | 7 | Declare_Variable Array
0166 00d8 | | Load_Top At_Offset_0
0167 01dd | | Execute Vector,First
0168 00d8 | | Load_Top At_Offset_0
0169 0a03 | | Execute_Immediate Plus,0x3
016a e003 | | Load 0x0,0x3
016b 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
016c 035b | [ | Declare_Type Array,Constrained
016d 0337 | 7 | Declare_Variable Array
016e 00d8 | | Load_Top At_Offset_0
016f 01dd | | Execute Vector,First
0170 4801 |H | Short_Literal 0x1
0171 e5fe | | Load 0x2,-0x2
0172 01d7 | | Execute Vector,Field_Read
0173 00d9 | | Load_Top At_Offset_1
0174 00db | | Load_Top At_Offset_3
0175 01d6 | | Execute Vector,Field_Write
0176 0a01 | | Execute_Immediate Plus,0x1
0177 4802 |H | Short_Literal 0x2
0178 e5fe | | Load 0x2,-0x2
0179 01d7 | | Execute Vector,Field_Read
017a 00d9 | | Load_Top At_Offset_1
017b 00db | | Load_Top At_Offset_3
017c 01d6 | | Execute Vector,Field_Write
017d 0a01 | | Execute_Immediate Plus,0x1
017e 4803 |H | Short_Literal 0x3
017f e5fe | | Load 0x2,-0x2
0180 01d7 | | Execute Vector,Field_Read
0181 00d9 | | Load_Top At_Offset_1
0182 00db | | Load_Top At_Offset_3
0183 01d6 | | Execute Vector,Field_Write
0184 0a01 | | Execute_Immediate Plus,0x1
0185 4804 |H | Short_Literal 0x4
0186 e5fe | | Load 0x2,-0x2
0187 01d7 | | Execute Vector,Field_Read
0188 00d9 | | Load_Top At_Offset_1
0189 00db | | Load_Top At_Offset_3
018a 01d6 | | Execute Vector,Field_Write
018b 00d1 | | Pop_Control Pop_Count_1
018c 00d9 | | Load_Top At_Offset_1
018d 01d4 | | Execute Vector,Structure_Write
018e 4800 |H | Short_Literal 0x0
018f 4807 |H | Short_Literal 0x7
0190 e001 | | Load 0x0,0x1
0191 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
0192 0334 | 4 | Declare_Variable Array,With_Constraint
0193 e001 | | Load 0x0,0x1
0194 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
0195 0322 | " | Declare_Variable Record
0196 e004 | | Load 0x0,0x4
0197 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0198 00db | | Load_Top At_Offset_3
0199 01cc | | Execute Vector,Catenate
019a e001 | | Load 0x0,0x1
019b 1818 | | Execute Package,Field_Execute,Field_Number 0x18
019c 00d9 | | Load_Top At_Offset_1
019d 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
019e e5fe | | Load 0x2,-0x2
019f e00a | | Load 0x0,0xa
01a0 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01a1 e00b | | Load 0x0,0xb
01a2 1b12 | | Execute Package,Field_Read,Field_Number 0x12
01a3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01a4 e001 | | Load 0x0,0x1
01a5 1814 | | Execute Package,Field_Execute,Field_Number 0x14
01a6 00d9 | | Load_Top At_Offset_1
01a7 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
01a8 4800 |H | Short_Literal 0x0
01a9 00da | | Load_Top At_Offset_2
01aa 01d6 | | Execute Vector,Field_Write
01ab e001 | | Load 0x0,0x1
01ac 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
01ad 0322 | " | Declare_Variable Record
01ae e004 | | Load 0x0,0x4
01af 1b22 | " | Execute Package,Field_Read,Field_Number 0x22
01b0 00db | | Load_Top At_Offset_3
01b1 01cc | | Execute Vector,Catenate
01b2 e001 | | Load 0x0,0x1
01b3 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01b4 00d9 | | Load_Top At_Offset_1
01b5 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
01b6 e5fc | | Load 0x2,-0x4
01b7 e00a | | Load 0x0,0xa
01b8 180f | | Execute Package,Field_Execute,Field_Number 0xf
01b9 e003 | | Load 0x0,0x3
01ba 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
01bb 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01bc e001 | | Load 0x0,0x1
01bd 1814 | | Execute Package,Field_Execute,Field_Number 0x14
01be 00d9 | | Load_Top At_Offset_1
01bf 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
01c0 4801 |H | Short_Literal 0x1
01c1 00da | | Load_Top At_Offset_2
01c2 01d6 | | Execute Vector,Field_Write
01c3 e001 | | Load 0x0,0x1
01c4 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
01c5 0322 | " | Declare_Variable Record
01c6 e004 | | Load 0x0,0x4
01c7 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
01c8 00db | | Load_Top At_Offset_3
01c9 01cc | | Execute Vector,Catenate
01ca e001 | | Load 0x0,0x1
01cb 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01cc 00d9 | | Load_Top At_Offset_1
01cd 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
01ce e5fb | | Load 0x2,-0x5
01cf e00a | | Load 0x0,0xa
01d0 180f | | Execute Package,Field_Execute,Field_Number 0xf
01d1 e003 | | Load 0x0,0x3
01d2 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
01d3 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01d4 e001 | | Load 0x0,0x1
01d5 1814 | | Execute Package,Field_Execute,Field_Number 0x14
01d6 00d9 | | Load_Top At_Offset_1
01d7 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
01d8 4802 |H | Short_Literal 0x2
01d9 00da | | Load_Top At_Offset_2
01da 01d6 | | Execute Vector,Field_Write
01db e001 | | Load 0x0,0x1
01dc 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
01dd 0322 | " | Declare_Variable Record
01de e004 | | Load 0x0,0x4
01df 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
01e0 00db | | Load_Top At_Offset_3
01e1 01cc | | Execute Vector,Catenate
01e2 e001 | | Load 0x0,0x1
01e3 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01e4 00d9 | | Load_Top At_Offset_1
01e5 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
01e6 e5fa | | Load 0x2,-0x6
01e7 e00a | | Load 0x0,0xa
01e8 180f | | Execute Package,Field_Execute,Field_Number 0xf
01e9 e003 | | Load 0x0,0x3
01ea 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
01eb 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01ec e001 | | Load 0x0,0x1
01ed 1814 | | Execute Package,Field_Execute,Field_Number 0x14
01ee 00d9 | | Load_Top At_Offset_1
01ef 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
01f0 4803 |H | Short_Literal 0x3
01f1 00da | | Load_Top At_Offset_2
01f2 01d6 | | Execute Vector,Field_Write
01f3 e001 | | Load 0x0,0x1
01f4 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
01f5 0322 | " | Declare_Variable Record
01f6 e004 | | Load 0x0,0x4
01f7 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
01f8 00db | | Load_Top At_Offset_3
01f9 01cc | | Execute Vector,Catenate
01fa e001 | | Load 0x0,0x1
01fb 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01fc 00d9 | | Load_Top At_Offset_1
01fd 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
01fe e5f9 | | Load 0x2,-0x7
01ff e00a | | Load 0x0,0xa
0200 180f | | Execute Package,Field_Execute,Field_Number 0xf
0201 e003 | | Load 0x0,0x3
0202 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
0203 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0204 e001 | | Load 0x0,0x1
0205 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0206 00d9 | | Load_Top At_Offset_1
0207 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0208 4804 |H | Short_Literal 0x4
0209 00da | | Load_Top At_Offset_2
020a 01d6 | | Execute Vector,Field_Write
020b e001 | | Load 0x0,0x1
020c 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
020d 0322 | " | Declare_Variable Record
020e e004 | | Load 0x0,0x4
020f 1b26 | & | Execute Package,Field_Read,Field_Number 0x26
0210 00db | | Load_Top At_Offset_3
0211 01cc | | Execute Vector,Catenate
0212 e001 | | Load 0x0,0x1
0213 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0214 00d9 | | Load_Top At_Offset_1
0215 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0216 e5f8 | | Load 0x2,-0x8
0217 e00a | | Load 0x0,0xa
0218 180f | | Execute Package,Field_Execute,Field_Number 0xf
0219 e003 | | Load 0x0,0x3
021a 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
021b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
021c e001 | | Load 0x0,0x1
021d 1814 | | Execute Package,Field_Execute,Field_Number 0x14
021e 00d9 | | Load_Top At_Offset_1
021f 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0220 4805 |H | Short_Literal 0x5
0221 00da | | Load_Top At_Offset_2
0222 01d6 | | Execute Vector,Field_Write
0223 e001 | | Load 0x0,0x1
0224 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
0225 0322 | " | Declare_Variable Record
0226 e004 | | Load 0x0,0x4
0227 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
0228 00db | | Load_Top At_Offset_3
0229 01cc | | Execute Vector,Catenate
022a e001 | | Load 0x0,0x1
022b 1818 | | Execute Package,Field_Execute,Field_Number 0x18
022c 00d9 | | Load_Top At_Offset_1
022d 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
022e e5ff | | Load 0x2,-0x1
022f e00a | | Load 0x0,0xa
0230 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0231 e00b | | Load 0x0,0xb
0232 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0233 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0234 e001 | | Load 0x0,0x1
0235 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0236 00d9 | | Load_Top At_Offset_1
0237 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0238 4806 |H | Short_Literal 0x6
0239 00da | | Load_Top At_Offset_2
023a 01d6 | | Execute Vector,Field_Write
023b e001 | | Load 0x0,0x1
023c 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
023d 0322 | " | Declare_Variable Record
023e e004 | | Load 0x0,0x4
023f 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
0240 00db | | Load_Top At_Offset_3
0241 01cc | | Execute Vector,Catenate
0242 e001 | | Load 0x0,0x1
0243 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0244 00d9 | | Load_Top At_Offset_1
0245 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0246 e5fd | | Load 0x2,-0x3
0247 e00a | | Load 0x0,0xa
0248 180f | | Execute Package,Field_Execute,Field_Number 0xf
0249 e003 | | Load 0x0,0x3
024a 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
024b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
024c e001 | | Load 0x0,0x1
024d 1814 | | Execute Package,Field_Execute,Field_Number 0x14
024e 00d9 | | Load_Top At_Offset_1
024f 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0250 4807 |H | Short_Literal 0x7
0251 00da | | Load_Top At_Offset_2
0252 01d6 | | Execute Vector,Field_Write
0253 4800 |H | Short_Literal 0x0
0254 00d9 | | Load_Top At_Offset_1
0255 4800 |H | Short_Literal 0x0
0256 4800 |H | Short_Literal 0x0
0257 800c | | Call 0x0,0xc
0258 e001 | | Load 0x0,0x1
0259 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
025a e5f6 | | Load 0x2,-0xa
025b e001 | | Load 0x0,0x1
025c 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
025d 4803 |H | Short_Literal 0x3
025e e001 | | Load 0x0,0x1
025f 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0260 029f 035b | [| Declare_Subprogram INIT_0358,For_Call
0262 BODY_0158:
0262 e402 | | Load 0x2,0x2
0263 e5f7 | | Load 0x2,-0x9
0264 8008 | | Call 0x0,0x8
0265 c402 | | Store 0x2,0x2
0266 0092 0381 | | Action Push_String_Extended,0x381 ; "Request:"
0268 e009 | | Load 0x0,0x9
0269 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
026a 00d9 | | Load_Top At_Offset_1
026b 2709 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x9
026c 2505 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x5
026d 800d | | Call 0x0,0xd
026e 8406 | | Call 0x2,0x6
026f e402 | | Load 0x2,0x2
0270 e002 | | Load 0x0,0x2
0271 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0272 450b |E | Exit_Suprogram New_Top_Offset 0xb
0273 TRAP_0158:
0273 0007 | | Action Break_Optional
0274 e402 | | Load 0x2,0x2
0275 e002 | | Load 0x0,0x2
0276 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0277 00d8 | | Load_Top At_Offset_0
0278 0101 | | Execute Exception,Reraise
0279 0000 0000 | | .BLANK 0000[0x7]
0280 ; --------------------------------------------------------------------------------------
0280 ; SUBPROGRAM
0280 ; --------------------------------------------------------------------------------------
0280 0283 | | .CONST 0x0283 ; Address of begin
0281 0004 | | .CONST 0x0004 ; Address of exception handler
0282 0001 | | .CONST 0x0001 ; Number of locals
0283 BODY_0280:
0283 INIT_0280:
0283 00cf | | Action Mark_Auxiliary
0284 00db | | Load_Top At_Offset_3
0285 01d9 | | Execute Vector,Reverse_Bounds
0286 0263 | c | Execute Discrete,Above_Bound
0287 700f |p | Jump_Nonzero 0x297
0288 00d8 | | Load_Top At_Offset_0
0289 e5ff | | Load 0x2,-0x1
028a 01d5 | | Execute Vector,Field_Reference
028b 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
028c e001 | | Load 0x0,0x1
028d 1817 | | Execute Package,Field_Execute,Field_Number 0x17
028e e004 | | Load 0x0,0x4
028f 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
0290 e003 | | Load 0x0,0x3
0291 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0292 7002 |p | Jump_Nonzero 0x295
0293 4800 |H | Short_Literal 0x0
0294 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0295 00c8 | | Action Pop_Auxiliary_Range
0296 3ff1 |? | Loop_Increasing 0x288
0297 00ce | | Action Pop_Auxiliary
0298 4801 |H | Short_Literal 0x1
0299 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
029a 0000 0000 | | .BLANK 0000[0x6]
02a0 ; --------------------------------------------------------------------------------------
02a0 ; SUBPROGRAM
02a0 ; --------------------------------------------------------------------------------------
02a0 02a9 | | .CONST 0x02a9 ; Address of begin
02a1 0004 | | .CONST 0x0004 ; Address of exception handler
02a2 0003 | | .CONST 0x0003 ; Number of locals
02a3 INIT_02a0:
02a3 00da | | Load_Top At_Offset_2
02a4 e001 | | Load 0x0,0x1
02a5 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02a6 00d8 | | Load_Top At_Offset_0
02a7 e00a | | Load 0x0,0xa
02a8 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02a9 BODY_02a0:
02a9 00d8 | | Load_Top At_Offset_0
02aa 4fff |O | Short_Literal -0x1
02ab 027f | | Execute Discrete,Equal
02ac 6802 |h | Jump_Zero 0x2af
02ad 00ea | | Load_Encached Null_String_Cache
02ae 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02af 00d8 | | Load_Top At_Offset_0
02b0 00e0 | | Load_Encached Standard_Cache
02b1 1818 | | Execute Package,Field_Execute,Field_Number 0x18
02b2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02b3 0000 0000 | | .BLANK 0000[0x5]
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02c1 | | .CONST 0x02c1 ; Address of begin
02b9 0004 | | .CONST 0x0004 ; Address of exception handler
02ba 0003 | | .CONST 0x0003 ; Number of locals
02bb INIT_02b8:
02bb 00da | | Load_Top At_Offset_2
02bc e001 | | Load 0x0,0x1
02bd 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02be 00d8 | | Load_Top At_Offset_0
02bf e00a | | Load 0x0,0xa
02c0 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02c1 BODY_02b8:
02c1 00d8 | | Load_Top At_Offset_0
02c2 0b01 | | Execute_Immediate Case_Compare,0x1
02c3 700a |p | Jump_Nonzero 0x2ce
02c4 0b02 | | Execute_Immediate Case_Compare,0x2
02c5 700c |p | Jump_Nonzero 0x2d2
02c6 0b03 | | Execute_Immediate Case_Compare,0x3
02c7 700e |p | Jump_Nonzero 0x2d6
02c8 0f04 | | Execute_Immediate Equal,0x4
02c9 7010 |p | Jump_Nonzero 0x2da
02ca 00d8 | | Load_Top At_Offset_0
02cb 00e0 | | Load_Encached Standard_Cache
02cc 1818 | | Execute Package,Field_Execute,Field_Number 0x18
02cd 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02ce 00d1 | | Pop_Control Pop_Count_1
02cf 0092 0382 | | Action Push_String_Extended,0x382 ; "other"
02d1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02d2 00d1 | | Pop_Control Pop_Count_1
02d3 0092 0383 | | Action Push_String_Extended,0x383 ; "invalid"
02d5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02d6 00d1 | | Pop_Control Pop_Count_1
02d7 0092 0384 | | Action Push_String_Extended,0x384 ; "direct"
02d9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02da 0092 0385 | | Action Push_String_Extended,0x385 ; "remote"
02dc 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02dd 0000 0000 | | .XXX[0x3]
02df 0000 | |
02e0 ; --------------------------------------------------------------------------------------
02e0 ; SUBPROGRAM
02e0 ; --------------------------------------------------------------------------------------
02e0 02e3 | | .CONST 0x02e3 ; Address of begin
02e1 0004 | | .CONST 0x0004 ; Address of exception handler
02e2 0001 | | .CONST 0x0001 ; Number of locals
02e3 BODY_02e0:
02e3 INIT_02e0:
02e3 00da | | Load_Top At_Offset_2
02e4 e001 | | Load 0x0,0x1
02e5 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02e6 e00a | | Load 0x0,0xa
02e7 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02e8 090f | | Execute_Immediate Binary_Scale,0xf
02e9 00e7 | | Load_Encached Duration_Cache
02ea 025e | ^ | Execute Discrete,Convert
02eb e00e | | Load 0x0,0xe
02ec 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
02ed 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02ee 0000 0000 | | .XXX[0x2]
02f0 ; --------------------------------------------------------------------------------------
02f0 ; SUBPROGRAM
02f0 ; --------------------------------------------------------------------------------------
02f0 02fa | | .CONST 0x02fa ; Address of begin
02f1 0004 | | .CONST 0x0004 ; Address of exception handler
02f2 0002 | | .CONST 0x0002 ; Number of locals
02f3 INIT_02f0:
02f3 6060 |`` | Indirect_Literal Discrete,0x354,{0x00000000, 0x00028000}
02f4 605b |`[ | Indirect_Literal Discrete,0x350,{0x00000000, 0x00000800}
02f5 e402 | | Load 0x2,0x2
02f6 e403 | | Load 0x2,0x3
02f7 e405 | | Load 0x2,0x5
02f8 e00f | | Load 0x0,0xf
02f9 180e | | Execute Package,Field_Execute,Field_Number 0xe
02fa BODY_02f0:
02fa 00d8 | | Load_Top At_Offset_0
02fb 820f | | Call 0x1,0xf
02fc 7002 |p | Jump_Nonzero 0x2ff
02fd 00cc | | Action Pop_Block
02fe 7e41 |~A | Jump 0x140
02ff 00d8 | | Load_Top At_Offset_0
0300 01db | | Execute Vector,Length
0301 0e0a | | Execute_Immediate Not_Equal,0xa
0302 6802 |h | Jump_Zero 0x305
0303 00cc | | Action Pop_Block
0304 7e3b |~; | Jump 0x140
0305 e004 | | Load 0x0,0x4
0306 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
0307 00d9 | | Load_Top At_Offset_1
0308 8010 | | Call 0x0,0x10
0309 8211 | | Call 0x1,0x11
030a e406 | | Load 0x2,0x6
030b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
030c e004 | | Load 0x0,0x4
030d 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
030e 00d9 | | Load_Top At_Offset_1
030f 8010 | | Call 0x0,0x10
0310 8011 | | Call 0x0,0x11
0311 e406 | | Load 0x2,0x6
0312 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0313 e004 | | Load 0x0,0x4
0314 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
0315 00d9 | | Load_Top At_Offset_1
0316 8010 | | Call 0x0,0x10
0317 8011 | | Call 0x0,0x11
0318 e406 | | Load 0x2,0x6
0319 1813 | | Execute Package,Field_Execute,Field_Number 0x13
031a e004 | | Load 0x0,0x4
031b 1b22 | " | Execute Package,Field_Read,Field_Number 0x22
031c 00d9 | | Load_Top At_Offset_1
031d 8010 | | Call 0x0,0x10
031e 8011 | | Call 0x0,0x11
031f e406 | | Load 0x2,0x6
0320 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0321 e004 | | Load 0x0,0x4
0322 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
0323 00d9 | | Load_Top At_Offset_1
0324 8010 | | Call 0x0,0x10
0325 8210 | | Call 0x1,0x10
0326 e406 | | Load 0x2,0x6
0327 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0328 e004 | | Load 0x0,0x4
0329 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
032a 00d9 | | Load_Top At_Offset_1
032b 8010 | | Call 0x0,0x10
032c 8210 | | Call 0x1,0x10
032d e406 | | Load 0x2,0x6
032e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
032f e004 | | Load 0x0,0x4
0330 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
0331 00d9 | | Load_Top At_Offset_1
0332 8010 | | Call 0x0,0x10
0333 8210 | | Call 0x1,0x10
0334 e406 | | Load 0x2,0x6
0335 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0336 e004 | | Load 0x0,0x4
0337 1b26 | & | Execute Package,Field_Read,Field_Number 0x26
0338 00d9 | | Load_Top At_Offset_1
0339 8010 | | Call 0x0,0x10
033a 8210 | | Call 0x1,0x10
033b e406 | | Load 0x2,0x6
033c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
033d e004 | | Load 0x0,0x4
033e 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29
033f 00d9 | | Load_Top At_Offset_1
0340 8010 | | Call 0x0,0x10
0341 8011 | | Call 0x0,0x11
0342 e406 | | Load 0x2,0x6
0343 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0344 e004 | | Load 0x0,0x4
0345 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
0346 00d9 | | Load_Top At_Offset_1
0347 8010 | | Call 0x0,0x10
0348 8212 | | Call 0x1,0x12
0349 e406 | | Load 0x2,0x6
034a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
034b 00d8 | | Load_Top At_Offset_0
034c e405 | | Load 0x2,0x5
034d 01d4 | | Execute Vector,Structure_Write
034e 4501 |E | Exit_Suprogram New_Top_Offset 0x1
034f 0000 | | .XXX[0x1]
0350 0000 0000 | | .LITERAL {0x00000000, 0x00000800}
0354 0000 0000 | | .LITERAL {0x00000000, 0x00028000}
0358 ; --------------------------------------------------------------------------------------
0358 ; SUBPROGRAM
0358 ; --------------------------------------------------------------------------------------
0358 0360 | ` | .CONST 0x0360 ; Address of begin
0359 0004 | | .CONST 0x0004 ; Address of exception handler
035a 0002 | | .CONST 0x0002 ; Number of locals
035b INIT_0358:
035b 67f8 |g | Indirect_Literal Discrete,0x354,{0x00000000, 0x00028000}
035c 67f3 |g | Indirect_Literal Discrete,0x350,{0x00000000, 0x00000800}
035d e405 | | Load 0x2,0x5
035e e402 | | Load 0x2,0x2
035f 8012 | | Call 0x0,0x12
0360 BODY_0358:
0360 4808 |H | Short_Literal 0x8
0361 4802 |H | Short_Literal 0x2
0362 00da | | Load_Top At_Offset_2
0363 8013 | | Call 0x0,0x13
0364 6809 |h | Jump_Zero 0x36e
0365 0092 0386 | | Action Push_String_Extended,0x386 ; "Response:"
0367 e009 | | Load 0x0,0x9
0368 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0369 00d8 | | Load_Top At_Offset_0
036a 2708 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x8
036b 2505 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x5
036c 800d | | Call 0x0,0xd
036d 4501 |E | Exit_Suprogram New_Top_Offset 0x1
036e e014 | | Load 0x0,0x14
036f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0370 4805 |H | Short_Literal 0x5
0371 0092 0387 | | Action Push_String_Extended,0x387 ; "Set failed"
0373 e015 | | Load 0x0,0x15
0374 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0375 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0376 ; --------------------------------------------------------------------------------------
0376 ; STRING TABLE
0376 ; --------------------------------------------------------------------------------------
0376 0026 | & | .STRTAB 0x0026->0x0389 ; " "
0377 0025 | % | .STRTAB 0x0025->0x0389 ; "Type"
0378 0027 | ' | .STRTAB 0x0027->0x038b ; "Destination"
0379 0030 | 0 | .STRTAB 0x0030->0x0391 ; "Next Hop"
037a 0036 | 6 | .STRTAB 0x0036->0x0395 ; "I/F"
037b 0037 | 7 | .STRTAB 0x0037->0x0396 ; "M1"
037c 0037 | 7 | .STRTAB 0x0037->0x0397 ; "M2"
037d 0037 | 7 | .STRTAB 0x0037->0x0398 ; "M3"
037e 0037 | 7 | .STRTAB 0x0037->0x0399 ; "M4"
037f 0037 | 7 | .STRTAB 0x0037->0x039a ; "Proto"
0380 003a | : | .STRTAB 0x003a->0x039d ; "Age"
0381 003b | ; | .STRTAB 0x003b->0x039e ; "Request:"
0382 0041 | A | .STRTAB 0x0041->0x03a2 ; "other"
0383 0044 | D | .STRTAB 0x0044->0x03a5 ; "invalid"
0384 0049 | I | .STRTAB 0x0049->0x03a8 ; "direct"
0385 004d | M | .STRTAB 0x004d->0x03ab ; "remote"
0386 0051 | Q | .STRTAB 0x0051->0x03ae ; "Response:"
0387 0058 | X | .STRTAB 0x0058->0x03b3 ; "Set failed"
0388 0060 | ` | .STREND 0x0060->0x03b8
0389 2054 7970 | Typ| .STRTAB_STRINGS
03b8 ; --------------------------------------------------------------------------------------
03b8 ; Debug Table
03b8 ; --------------------------------------------------------------------------------------
03b8 0004 000c | | .DEBUG4 0x0004,0x000c,0xcf2e,0x0000,0x0001,0x0000
03be 0000 0000 | | .BLANK 0000[0x42]