|
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, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0ea8df
└─⟦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 5813 |X | .CONST 0x5813 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 01c8 | | .CONST 0x01c8 ; 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 0001 | | .CONST 0x0001 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0018 | | .CONST 0x0018 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0011 | | .CONST 0x0011 ; Number of locals
000b INIT_0008:
000b 029a 0023 | #| Declare_Subprogram INIT_0020,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0 = .DEBUG 0x000b,0x020a,0x8000,0x0000,0x0059,0xf185,0x0000,0x0009
; Debug Table 0x0.0x0 = 0xb,0xffff
000d 00bf | | Action Accept_Activation
000e 029d 004b | K| Declare_Subprogram INIT_0048,For_Outer_Call ; Debug Table 0x1 = .DEBUG 0x000e,0x020e,0x8000,0x0000,0x0059,0xf785,0x0000,0x001b
; Debug Table 0x1.0x0 = 0xe,0xffff
0010 029d 006b | k| Declare_Subprogram INIT_0068,For_Outer_Call ; Debug Table 0x1.0x1 = 0x10,0xfffe
0012 029d 008b | | Declare_Subprogram INIT_0088,For_Outer_Call ; Debug Table 0x1.0x2 = 0x12,0xfffd
0014 029d 00a3 | | Declare_Subprogram INIT_00a0,For_Outer_Call ; Debug Table 0x1.0x3 = 0x14,0xfffc
0016 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x1.0x4 = 0x16,0xfffb
0017 00c7 | | Action Elaborate_Subprogram
0018 BODY_0008:
0018 00bc | | Action Signal_Activated
0019 00bb | | Action Signal_Completion
001a 0000 0000 | | .BLANK 0000[0x6]
0020 ; --------------------------------------------------------------------------------------
0020 ; SUBPROGRAM
0020 ; --------------------------------------------------------------------------------------
0020 002b | + | .CONST 0x002b ; Address of begin
0021 0004 | | .CONST 0x0004 ; Address of exception handler
0022 0004 | | .CONST 0x0004 ; Number of locals
0023 INIT_0020:
0023 00da | | Load_Top At_Offset_2 ; Debug Table 0x2 = .DEBUG 0x0023,0x021a,0x0001,0x0000,0x0059,0xf185,0x0000,0x000a
; Debug Table 0x2.0x0 = 0x23,0xffff
0024 01dd | | Execute Vector,First
0025 00e3 | | Load_Encached Natural_Cache
0026 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0027 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x2.0x1 = 0x27,0xfffe
0028 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0029 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x2.0x2 = 0x29,0xfffd
002a 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
002b BODY_0020:
002b 00da | | Load_Top At_Offset_2 ; Debug Table 0x2.0x3 = 0x2b,0x1
002c 00da | | Load_Top At_Offset_2
002d 00da | | Load_Top At_Offset_2
002e e5fc | | Load 0x2,-0x4
002f e5ff | | Load 0x2,-0x1
0030 820e | | Call 0x1,0xe
0031 005b | [ | Store_Top Discrete,At_Offset_3
0032 005b | [ | Store_Top Discrete,At_Offset_3
0033 005b | [ | Store_Top Discrete,At_Offset_3
0034 00da | | Load_Top At_Offset_2 ; Debug Table 0x2.0x4 = 0x34,0x2
0035 e5fb | | Load 0x2,-0x5
0036 0120 | | Execute Any,Is_Value
0037 6803 |h | Jump_Zero 0x3b
0038 e001 | | Load 0x0,0x1
0039 1b0f | | Execute Package,Field_Read,Field_Number 0xf
003a 7801 |x | Jump 0x3c
003b e5fb | | Load 0x2,-0x5
003c e5fc | | Load 0x2,-0x4
003d e5ff | | Load 0x2,-0x1
003e e5fd | | Load 0x2,-0x3
003f e5fe | | Load 0x2,-0x2
0040 8211 | | Call 0x1,0x11
0041 c5fb | | Store 0x2,-0x5
0042 005b | [ | Store_Top Discrete,At_Offset_3
0043 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0044 0000 0000 | | .BLANK 0000[0x4]
0048 ; --------------------------------------------------------------------------------------
0048 ; SUBPROGRAM
0048 ; --------------------------------------------------------------------------------------
0048 004b | K | .CONST 0x004b ; Address of begin
0049 0004 | | .CONST 0x0004 ; Address of exception handler
004a 0001 | | .CONST 0x0001 ; Number of locals
004b BODY_0048:
004b INIT_0048:
004b e5fb | | Load 0x2,-0x5 ; Debug Table 0x3 = .DEBUG 0x004b,0x0226,0x0001,0x0000,0x0059,0xf785,0x0000,0x001c
; Debug Table 0x3.0x0 = 0x4b,0x1
004c 00e3 | | Load_Encached Natural_Cache
004d 00e3 | | Load_Encached Natural_Cache
004e e5ff | | Load 0x2,-0x1
004f e002 | | Load 0x0,0x2
0050 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0051 c5fd | | Store 0x2,-0x3
0052 c5fc | | Store 0x2,-0x4
0053 c5fb | | Store 0x2,-0x5
0054 e5fd | | Load 0x2,-0x3 ; Debug Table 0x3.0x1 = 0x54,0x2
0055 0e02 | | Execute_Immediate Not_Equal,0x2
0056 6805 |h | Jump_Zero 0x5c
0057 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0x2 = 0x57,0x3
0058 0092 0178 | x| Action Push_String_Extended,0x178 ; "Work_Order_List is stored in an unsupported format."
005a e003 | | Load 0x0,0x3
005b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
005c e5fc | | Load 0x2,-0x4 ; Debug Table 0x3.0x3 = 0x5c,0x4
005d 0e01 | | Execute_Immediate Not_Equal,0x1
005e 6805 |h | Jump_Zero 0x64
005f 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0x4 = 0x5f,0x5
0060 0092 0179 | y| Action Push_String_Extended,0x179 ; "Work_Order_List is stored in an unsupported archive format."
0062 e003 | | Load 0x0,0x3
0063 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0064 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0065 0000 0000 | | .XXX[0x3]
0067 0000 | |
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 0079 | y | .CONST 0x0079 ; Address of begin
0069 0004 | | .CONST 0x0004 ; Address of exception handler
006a 0003 | | .CONST 0x0003 ; Number of locals
006b INIT_0068:
006b 4800 |H | Short_Literal 0x0 ; Debug Table 0x4 = .DEBUG 0x006b,0x0232,0x0002,0x0000,0x0059,0xf785,0x0000,0x0067
; Debug Table 0x4.0x0 = 0x6b,0xffff
006c 00db | | Load_Top At_Offset_3
006d 4822 |H" | Short_Literal 0x22
006e e004 | | Load 0x0,0x4
006f 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0070 00e3 | | Load_Encached Natural_Cache
0071 03f1 | | Declare_Variable Discrete,With_Value
0072 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x1 = 0x72,0xfffe
0073 e5ff | | Load 0x2,-0x1
0074 4822 |H" | Short_Literal 0x22
0075 e004 | | Load 0x0,0x4
0076 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0077 00e3 | | Load_Encached Natural_Cache
0078 03f1 | | Declare_Variable Discrete,With_Value
0079 BODY_0068:
0079 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x2 = 0x79,0x1
007a 0a01 | | Execute_Immediate Plus,0x1
007b 0248 | H | Execute Discrete,Check_In_Integer
007c 00d9 | | Load_Top At_Offset_1
007d 0aff | | Execute_Immediate Plus,-0x1
007e 0248 | H | Execute Discrete,Check_In_Integer
007f e5ff | | Load 0x2,-0x1
0080 01cf | | Execute Vector,Slice_Read
0081 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0082 0000 0000 | | .BLANK 0000[0x6]
0088 ; --------------------------------------------------------------------------------------
0088 ; SUBPROGRAM
0088 ; --------------------------------------------------------------------------------------
0088 0093 | | .CONST 0x0093 ; Address of begin
0089 0004 | | .CONST 0x0004 ; Address of exception handler
008a 0005 | | .CONST 0x0005 ; Number of locals
008b INIT_0088:
008b e005 | | Load 0x0,0x5 ; Debug Table 0x5 = .DEBUG 0x008b,0x023a,0x0001,0x0000,0x0059,0xf785,0x0000,0x009a
; Debug Table 0x5.0x0 = 0x8b,0xffff
008c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
008d e006 | | Load 0x0,0x6 ; Debug Table 0x5.0x1 = 0x8d,0xfffe
008e 1b11 | | Execute Package,Field_Read,Field_Number 0x11
008f e006 | | Load 0x0,0x6 ; Debug Table 0x5.0x2 = 0x8f,0xfffd
0090 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0091 029f 013b | ;| Declare_Subprogram INIT_0138,For_Call
0093 BODY_0088:
0093 00cf | | Action Mark_Auxiliary
0094 7802 |x | Jump 0x97
0095 8405 | | Call 0x2,0x5 ; Debug Table 0x5.0x3 = 0x95,0x2
0096 00c9 | | Action Pop_Auxiliary_Loop
0097 e5f9 | | Load 0x2,-0x7 ; Debug Table 0x5.0x4 = 0x97,0x1
0098 e5fb | | Load 0x2,-0x5
0099 01dc | | Execute Vector,Last
009a 027a | z | Execute Discrete,Less_Equal
009b 77f9 |w | Jump_Nonzero 0x95
009c 4507 |E | Exit_Suprogram New_Top_Offset 0x7
009d 0000 0000 | | .XXX[0x3]
009f 0000 | |
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00d1 | | .CONST 0x00d1 ; Address of begin
00a1 012f | / | .CONST 0x012f ; Address of exception handler
00a2 000c | | .CONST 0x000c ; Number of locals
00a3 INIT_00a0:
00a3 e007 | | Load 0x0,0x7 ; Debug Table 0x6 = .DEBUG 0x00a3,0x0246,0x0001,0x0000,0x0059,0xf785,0x0000,0x014d
; Debug Table 0x6.0x0 = 0xa3,0xffff
00a4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00a5 02c7 | | Declare_Variable Any
00a6 e007 | | Load 0x0,0x7
00a7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00a8 c402 | | Store 0x2,0x2
00a9 e005 | | Load 0x0,0x5 ; Debug Table 0x6.0x1 = 0xa9,0xfffe
00aa 1b13 | | Execute Package,Field_Read,Field_Number 0x13
00ab e005 | | Load 0x0,0x5 ; Debug Table 0x6.0x2 = 0xab,0xfffd
00ac 1b15 | | Execute Package,Field_Read,Field_Number 0x15
00ad e006 | | Load 0x0,0x6 ; Debug Table 0x6.0x3 = 0xad,0xfffc
00ae 1b11 | | Execute Package,Field_Read,Field_Number 0x11
00af e5fd | | Load 0x2,-0x3 ; Debug Table 0x6.0x4 = 0xaf,0xfffb
00b0 e5fa | | Load 0x2,-0x6
00b1 e002 | | Load 0x0,0x2
00b2 180f | | Execute Package,Field_Execute,Field_Number 0xf
00b3 e5fd | | Load 0x2,-0x3 ; Debug Table 0x6.0x5 = 0xb3,0xfffa
00b4 00d9 | | Load_Top At_Offset_1
00b5 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00b6 e002 | | Load 0x0,0x2
00b7 180f | | Execute Package,Field_Execute,Field_Number 0xf
00b8 e5fd | | Load 0x2,-0x3 ; Debug Table 0x6.0x6 = 0xb8,0xfff9
00b9 00d9 | | Load_Top At_Offset_1
00ba 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00bb e002 | | Load 0x0,0x2
00bc 180f | | Execute Package,Field_Execute,Field_Number 0xf
00bd e5fd | | Load 0x2,-0x3 ; Debug Table 0x6.0x7 = 0xbd,0xfff8
00be 00d9 | | Load_Top At_Offset_1
00bf 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00c0 e002 | | Load 0x0,0x2
00c1 180f | | Execute Package,Field_Execute,Field_Number 0xf
00c2 e5fd | | Load 0x2,-0x3 ; Debug Table 0x6.0x8 = 0xc2,0xfff7
00c3 00d9 | | Load_Top At_Offset_1
00c4 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00c5 e002 | | Load 0x0,0x2
00c6 180f | | Execute Package,Field_Execute,Field_Number 0xf
00c7 e5fd | | Load 0x2,-0x3 ; Debug Table 0x6.0x9 = 0xc7,0xfff6
00c8 00d9 | | Load_Top At_Offset_1
00c9 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00ca e002 | | Load 0x0,0x2
00cb 180f | | Execute Package,Field_Execute,Field_Number 0xf
00cc e5fd | | Load 0x2,-0x3 ; Debug Table 0x6.0xa = 0xcc,0xfff5
00cd 00d9 | | Load_Top At_Offset_1
00ce 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00cf e002 | | Load 0x0,0x2
00d0 180f | | Execute Package,Field_Execute,Field_Number 0xf
00d1 BODY_00a0:
00d1 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0xb = 0xd1,0x1
00d2 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00d3 a5fa | | Store_Unchecked 0x2,-0x6
00d4 e008 | | Load 0x0,0x8 ; Debug Table 0x6.0xc = 0xd4,0x2
00d5 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00d6 e007 | | Load 0x0,0x7
00d7 1814 | | Execute Package,Field_Execute,Field_Number 0x14
00d8 c402 | | Store 0x2,0x2
00d9 e005 | | Load 0x0,0x5 ; Debug Table 0x6.0xd = 0xd9,0x3
00da 1b13 | | Execute Package,Field_Read,Field_Number 0x13
00db 4802 |H | Short_Literal 0x2
00dc e402 | | Load 0x2,0x2
00dd e5fc | | Load 0x2,-0x4
00de e5fe | | Load 0x2,-0x2
00df e5ff | | Load 0x2,-0x1
00e0 e40a | | Load 0x2,0xa
00e1 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
00e2 e009 | | Load 0x0,0x9
00e3 180d | | Execute Package,Field_Execute,Field_Number 0xd
00e4 c403 | | Store 0x2,0x3
00e5 e005 | | Load 0x0,0x5 ; Debug Table 0x6.0xe = 0xe5,0x4
00e6 1b19 | | Execute Package,Field_Read,Field_Number 0x19
00e7 e005 | | Load 0x0,0x5
00e8 1b15 | | Execute Package,Field_Read,Field_Number 0x15
00e9 00f0 | | Load_Encached Segment_Cache
00ea e407 | | Load 0x2,0x7
00eb 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
00ec 820f | | Call 0x1,0xf
00ed e403 | | Load 0x2,0x3
00ee e5fe | | Load 0x2,-0x2
00ef e5ff | | Load 0x2,-0x1
00f0 e406 | | Load 0x2,0x6
00f1 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
00f2 e002 | | Load 0x0,0x2
00f3 180d | | Execute Package,Field_Execute,Field_Number 0xd
00f4 e005 | | Load 0x0,0x5
00f5 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29
00f6 180e | | Execute Package,Field_Execute,Field_Number 0xe
00f7 c404 | | Store 0x2,0x4
00f8 c405 | | Store 0x2,0x5
00f9 e405 | | Load 0x2,0x5 ; Debug Table 0x6.0xf = 0xf9,0x5
00fa e006 | | Load 0x0,0x6
00fb 1814 | | Execute Package,Field_Execute,Field_Number 0x14
00fc 700d |p | Jump_Nonzero 0x10a
00fd e5fc | | Load 0x2,-0x4 ; Debug Table 0x6.0x10 = 0xfd,0x6
00fe 0092 017a | z| Action Push_String_Extended,0x17a ; "creating "
0100 e5fe | | Load 0x2,-0x2
0101 e5ff | | Load 0x2,-0x1
0102 e406 | | Load 0x2,0x6
0103 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0104 e002 | | Load 0x0,0x2
0105 180d | | Execute Package,Field_Execute,Field_Number 0xd
0106 01cc | | Execute Vector,Catenate
0107 e405 | | Load 0x2,0x5
0108 e003 | | Load 0x0,0x3
0109 1812 | | Execute Package,Field_Execute,Field_Number 0x12
010a e5fa | | Load 0x2,-0x6 ; Debug Table 0x6.0x11 = 0x10a,0x7
010b e5fc | | Load 0x2,-0x4
010c e5fd | | Load 0x2,-0x3
010d e5fe | | Load 0x2,-0x2
010e e5ff | | Load 0x2,-0x1
010f e403 | | Load 0x2,0x3
0110 e404 | | Load 0x2,0x4
0111 8210 | | Call 0x1,0x10
0112 c5fa | | Store 0x2,-0x6
0113 e404 | | Load 0x2,0x4 ; Debug Table 0x6.0x12 = 0x113,0x8
0114 e005 | | Load 0x0,0x5
0115 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29
0116 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0117 c5fb | | Store 0x2,-0x5
0118 e005 | | Load 0x0,0x5 ; Debug Table 0x6.0x13 = 0x118,0x9
0119 1b19 | | Execute Package,Field_Read,Field_Number 0x19
011a e404 | | Load 0x2,0x4
011b e005 | | Load 0x0,0x5
011c 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29
011d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
011e c404 | | Store 0x2,0x4
011f c405 | | Store 0x2,0x5
0120 e005 | | Load 0x0,0x5 ; Debug Table 0x6.0x14 = 0x120,0xa
0121 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0122 e403 | | Load 0x2,0x3
0123 e005 | | Load 0x0,0x5
0124 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0125 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0126 c403 | | Store 0x2,0x3
0127 c405 | | Store 0x2,0x5
0128 e402 | | Load 0x2,0x2 ; Debug Table 0x6.0x15 = 0x128,0xb
0129 4801 |H | Short_Literal 0x1
012a 4801 |H | Short_Literal 0x1
012b e007 | | Load 0x0,0x7
012c 1818 | | Execute Package,Field_Execute,Field_Number 0x18
012d c402 | | Store 0x2,0x2
012e 4505 |E | Exit_Suprogram New_Top_Offset 0x5
012f TRAP_00a0:
012f 0007 | | Action Break_Optional
0130 e402 | | Load 0x2,0x2 ; Debug Table 0x6.0x16 = 0x130,0xc
0131 4801 |H | Short_Literal 0x1
0132 4800 |H | Short_Literal 0x0
0133 e007 | | Load 0x0,0x7
0134 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0135 c402 | | Store 0x2,0x2
0136 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x17 = 0x136,0xd
0137 0101 | | Execute Exception,Reraise
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 013f | ? | .CONST 0x013f ; Address of begin
0139 0004 | | .CONST 0x0004 ; Address of exception handler
013a 0002 | | .CONST 0x0002 ; Number of locals
013b INIT_0138:
013b e5fb | | Load 0x2,-0x5 ; Debug Table 0x7 = .DEBUG 0x013b,0x0278,0x0004,0x0000,0x0059,0xf785,0x0000,0x0146
; Debug Table 0x7.0x0 = 0x13b,0xffff
013c e5f9 | | Load 0x2,-0x7
013d e002 | | Load 0x0,0x2
013e 180f | | Execute Package,Field_Execute,Field_Number 0xf
013f BODY_0138:
013f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x1 = 0x13f,0x1
0140 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0141 a5f9 | | Store_Unchecked 0x2,-0x7
0142 e005 | | Load 0x0,0x5 ; Debug Table 0x7.0x2 = 0x142,0x2
0143 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0144 4801 |H | Short_Literal 0x1
0145 e007 | | Load 0x0,0x7
0146 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0147 e5fa | | Load 0x2,-0x6
0148 e5fc | | Load 0x2,-0x4
0149 e5fd | | Load 0x2,-0x3
014a e602 | | Load 0x3,0x2
014b 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
014c e009 | | Load 0x0,0x9
014d 180e | | Execute Package,Field_Execute,Field_Number 0xe
014e c402 | | Store 0x2,0x2
014f e005 | | Load 0x0,0x5 ; Debug Table 0x7.0x3 = 0x14f,0x3
0150 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0151 e5ff | | Load 0x2,-0x1
0152 e402 | | Load 0x2,0x2
0153 e005 | | Load 0x0,0x5
0154 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
0155 180f | | Execute Package,Field_Execute,Field_Number 0xf
0156 c403 | | Store 0x2,0x3
0157 e005 | | Load 0x0,0x5 ; Debug Table 0x7.0x4 = 0x157,0x4
0158 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0159 e402 | | Load 0x2,0x2
015a e005 | | Load 0x0,0x5
015b 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
015c 1811 | | Execute Package,Field_Execute,Field_Number 0x11
015d c402 | | Store 0x2,0x2
015e c404 | | Store 0x2,0x4
015f e403 | | Load 0x2,0x3 ; Debug Table 0x7.0x5 = 0x15f,0x5
0160 0f13 | | Execute_Immediate Equal,0x13
0161 6801 |h | Jump_Zero 0x163
0162 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x7.0x6 = 0x162,0x6
0163 e403 | | Load 0x2,0x3 ; Debug Table 0x7.0x7 = 0x163,0x7
0164 e006 | | Load 0x0,0x6
0165 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0166 6810 |h | Jump_Zero 0x177
0167 e5fa | | Load 0x2,-0x6 ; Debug Table 0x7.0x8 = 0x167,0x8
0168 0092 017b | {| Action Push_String_Extended,0x17b ; "adding "
016a e5fc | | Load 0x2,-0x4
016b e5fd | | Load 0x2,-0x3
016c e602 | | Load 0x3,0x2
016d 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
016e e002 | | Load 0x0,0x2
016f 180d | | Execute Package,Field_Execute,Field_Number 0xd
0170 01cc | | Execute Vector,Catenate
0171 0092 017c | || Action Push_String_Extended,0x17c ; " to the list"
0173 01cc | | Execute Vector,Catenate
0174 e403 | | Load 0x2,0x3
0175 e003 | | Load 0x0,0x3
0176 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0177 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0178 ; --------------------------------------------------------------------------------------
0178 ; STRING TABLE
0178 ; --------------------------------------------------------------------------------------
0178 000c | | .STRTAB 0x000c->0x017e ; "Work_Order_List is stored in an unsupported format."
0179 003d | = | .STRTAB 0x003d->0x0197 ; "Work_Order_List is stored in an unsupported archive format."
017a 0076 | v | .STRTAB 0x0076->0x01b5 ; "creating "
017b 007d | } | .STRTAB 0x007d->0x01b9 ; "adding "
017c 0082 | | .STRTAB 0x0082->0x01bd ; " to the list"
017d 008c | | .STREND 0x008c->0x01c3
017e 576f 726b |Work| .STRTAB_STRINGS
01c3 0000 0000 | | .BLANK 0000[0x5]
01c8 ; --------------------------------------------------------------------------------------
01c8 ; Debug Table
01c8 ; --------------------------------------------------------------------------------------
01c8 0003 0008 | | .CONST 0x0003,0x0008
01ca 000b 020a | | .DEBUG 0x000b,0x020a,0x8000,0x0000,0x0059,0xf185,0x0000,0x0009
01d2 000e 020e | | .DEBUG 0x000e,0x020e,0x8000,0x0000,0x0059,0xf785,0x0000,0x001b
01da 0023 021a | # | .DEBUG 0x0023,0x021a,0x0001,0x0000,0x0059,0xf185,0x0000,0x000a
01e2 004b 0226 | K &| .DEBUG 0x004b,0x0226,0x0001,0x0000,0x0059,0xf785,0x0000,0x001c
01ea 006b 0232 | k 2| .DEBUG 0x006b,0x0232,0x0002,0x0000,0x0059,0xf785,0x0000,0x0067
01f2 008b 023a | :| .DEBUG 0x008b,0x023a,0x0001,0x0000,0x0059,0xf785,0x0000,0x009a
01fa 00a3 0246 | F| .DEBUG 0x00a3,0x0246,0x0001,0x0000,0x0059,0xf785,0x0000,0x014d
0202 013b 0278 | ; x| .DEBUG 0x013b,0x0278,0x0004,0x0000,0x0059,0xf785,0x0000,0x0146
020a ; --------------------------------------------------------------------------------------
020a ; Debug3 Subtable 0x0
020a ; --------------------------------------------------------------------------------------
020a 0001 0000 | | .DBG3TAB 0x0001,0x0000
020c 000b ffff | | .CONST 0x000b,0xffff
020e ; --------------------------------------------------------------------------------------
020e ; Debug3 Subtable 0x1
020e ; --------------------------------------------------------------------------------------
020e 0005 0000 | | .DBG3TAB 0x0005,0x0000
0210 000e ffff | | .CONST 0x000e,0xffff
0212 0010 fffe | | .CONST 0x0010,0xfffe
0214 0012 fffd | | .CONST 0x0012,0xfffd
0216 0014 fffc | | .CONST 0x0014,0xfffc
0218 0016 fffb | | .CONST 0x0016,0xfffb
021a ; --------------------------------------------------------------------------------------
021a ; Debug3 Subtable 0x2
021a ; --------------------------------------------------------------------------------------
021a 0003 0002 | | .DBG3TAB 0x0003,0x0002
021c 0023 ffff | # | .CONST 0x0023,0xffff
021e 0027 fffe | ' | .CONST 0x0027,0xfffe
0220 0029 fffd | ) | .CONST 0x0029,0xfffd
0222 002b 0001 | + | .CONST 0x002b,0x0001
0224 0034 0002 | 4 | .CONST 0x0034,0x0002
0226 ; --------------------------------------------------------------------------------------
0226 ; Debug3 Subtable 0x3
0226 ; --------------------------------------------------------------------------------------
0226 0000 0005 | | .DBG3TAB 0x0000,0x0005
0228 004b 0001 | K | .CONST 0x004b,0x0001
022a 0054 0002 | T | .CONST 0x0054,0x0002
022c 0057 0003 | W | .CONST 0x0057,0x0003
022e 005c 0004 | \ | .CONST 0x005c,0x0004
0230 005f 0005 | _ | .CONST 0x005f,0x0005
0232 ; --------------------------------------------------------------------------------------
0232 ; Debug3 Subtable 0x4
0232 ; --------------------------------------------------------------------------------------
0232 0002 0001 | | .DBG3TAB 0x0002,0x0001
0234 006b ffff | k | .CONST 0x006b,0xffff
0236 0072 fffe | r | .CONST 0x0072,0xfffe
0238 0079 0001 | y | .CONST 0x0079,0x0001
023a ; --------------------------------------------------------------------------------------
023a ; Debug3 Subtable 0x5
023a ; --------------------------------------------------------------------------------------
023a 0003 0002 | | .DBG3TAB 0x0003,0x0002
023c 008b ffff | | .CONST 0x008b,0xffff
023e 008d fffe | | .CONST 0x008d,0xfffe
0240 008f fffd | | .CONST 0x008f,0xfffd
0242 0095 0002 | | .CONST 0x0095,0x0002
0244 0097 0001 | | .CONST 0x0097,0x0001
0246 ; --------------------------------------------------------------------------------------
0246 ; Debug3 Subtable 0x6
0246 ; --------------------------------------------------------------------------------------
0246 000b 000d | | .DBG3TAB 0x000b,0x000d
0248 00a3 ffff | | .CONST 0x00a3,0xffff
024a 00a9 fffe | | .CONST 0x00a9,0xfffe
024c 00ab fffd | | .CONST 0x00ab,0xfffd
024e 00ad fffc | | .CONST 0x00ad,0xfffc
0250 00af fffb | | .CONST 0x00af,0xfffb
0252 00b3 fffa | | .CONST 0x00b3,0xfffa
0254 00b8 fff9 | | .CONST 0x00b8,0xfff9
0256 00bd fff8 | | .CONST 0x00bd,0xfff8
0258 00c2 fff7 | | .CONST 0x00c2,0xfff7
025a 00c7 fff6 | | .CONST 0x00c7,0xfff6
025c 00cc fff5 | | .CONST 0x00cc,0xfff5
025e 00d1 0001 | | .CONST 0x00d1,0x0001
0260 00d4 0002 | | .CONST 0x00d4,0x0002
0262 00d9 0003 | | .CONST 0x00d9,0x0003
0264 00e5 0004 | | .CONST 0x00e5,0x0004
0266 00f9 0005 | | .CONST 0x00f9,0x0005
0268 00fd 0006 | | .CONST 0x00fd,0x0006
026a 010a 0007 | | .CONST 0x010a,0x0007
026c 0113 0008 | | .CONST 0x0113,0x0008
026e 0118 0009 | | .CONST 0x0118,0x0009
0270 0120 000a | | .CONST 0x0120,0x000a
0272 0128 000b | ( | .CONST 0x0128,0x000b
0274 0130 000c | 0 | .CONST 0x0130,0x000c
0276 0136 000d | 6 | .CONST 0x0136,0x000d
0278 ; --------------------------------------------------------------------------------------
0278 ; Debug3 Subtable 0x7
0278 ; --------------------------------------------------------------------------------------
0278 0001 0008 | | .DBG3TAB 0x0001,0x0008
027a 013b ffff | ; | .CONST 0x013b,0xffff
027c 013f 0001 | ? | .CONST 0x013f,0x0001
027e 0142 0002 | B | .CONST 0x0142,0x0002
0280 014f 0003 | O | .CONST 0x014f,0x0003
0282 0157 0004 | W | .CONST 0x0157,0x0004
0284 015f 0005 | _ | .CONST 0x015f,0x0005
0286 0162 0006 | b | .CONST 0x0162,0x0006
0288 0163 0007 | c | .CONST 0x0163,0x0007
028a 0167 0008 | g | .CONST 0x0167,0x0008
028c 0000 0000 | | .BLANK 0000[0x174]