|
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_0500e0
└─⟦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 01a8 | | .CONST 0x01a8 ; 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 00e4 | | .CONST 0x00e4 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0049 | I | .CONST 0x0049 ; Number of locals 000b INIT_0008: 000b 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x0 = .DEBUG 0x000b,0x01ca,0x8000,0x0000,0x0057,0x4ff5,0x0000,0x0007 ; Debug Table 0x0.0x0 = 0xb,0xffff ; Debug Table 0x0.0x1 = 0xb,0xfffe ; Debug Table 0x0.0x2 = 0xb,0xfffd ; Debug Table 0x0.0x3 = 0xb,0xfffc 000c 0129 | ) | Execute Any,Make_Visible 000d 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x0.0x4 = 0xd,0xfffb ; Debug Table 0x0.0x5 = 0xd,0xfffa 000e 0129 | ) | Execute Any,Make_Visible 000f 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x0.0x6 = 0xf,0xfff9 ; Debug Table 0x0.0x7 = 0xf,0xfff8 0010 00d9 | | Load_Top At_Offset_1 0011 029f 00eb | | Declare_Subprogram INIT_00e8,For_Call 0013 4802 |H | Short_Literal 0x2 0014 032e | . | Declare_Type Record,Defined,Visible 0015 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x0.0x8 = 0x15,0xfff7 0016 0322 | " | Declare_Variable Record 0017 4800 |H | Short_Literal 0x0 0018 00d9 | | Load_Top At_Offset_1 0019 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 001a 4800 |H | Short_Literal 0x0 001b 00d9 | | Load_Top At_Offset_1 001c 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 001d 0129 | ) | Execute Any,Make_Visible 001e 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x9 = 0x1e,0xfff6 001f 480d |H | Short_Literal 0xd 0020 029f 0103 | | Declare_Subprogram INIT_0100,For_Call 0022 03fe | | Declare_Type Discrete,Defined,Visible 0023 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0xa = 0x23,0xfff5 0024 4805 |H | Short_Literal 0x5 0025 029f 011b | | Declare_Subprogram INIT_0118,For_Call 0027 03fe | | Declare_Type Discrete,Defined,Visible 0028 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0xb = 0x28,0xfff4 0029 1b0d | | Execute Package,Field_Read,Field_Number 0xd 002a 0129 | ) | Execute Any,Make_Visible 002b e001 | | Load 0x0,0x1 ; Debug Table 0x0.0xc = 0x2b,0xfff3 002c 1b0e | | Execute Package,Field_Read,Field_Number 0xe 002d 0129 | ) | Execute Any,Make_Visible 002e e001 | | Load 0x0,0x1 ; Debug Table 0x0.0xd = 0x2e,0xfff2 002f 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0030 0129 | ) | Execute Any,Make_Visible 0031 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0xe = 0x31,0xfff1 0032 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0033 0129 | ) | Execute Any,Make_Visible 0034 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0xf = 0x34,0xfff0 0035 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0036 0129 | ) | Execute Any,Make_Visible 0037 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x10 = 0x37,0xffef 0038 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0039 0129 | ) | Execute Any,Make_Visible 003a e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x11 = 0x3a,0xffee 003b 1b13 | | Execute Package,Field_Read,Field_Number 0x13 003c 0129 | ) | Execute Any,Make_Visible 003d e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x12 = 0x3d,0xffed 003e 1b14 | | Execute Package,Field_Read,Field_Number 0x14 003f 0129 | ) | Execute Any,Make_Visible 0040 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x13 = 0x40,0xffec 0041 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0042 0129 | ) | Execute Any,Make_Visible 0043 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x14 = 0x43,0xffeb 0044 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0045 0129 | ) | Execute Any,Make_Visible 0046 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x15 = 0x46,0xffea 0047 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0048 0129 | ) | Execute Any,Make_Visible 0049 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x16 = 0x49,0xffe9 ; Debug Table 0x0.0x17 = 0x49,0xffe8 ; Debug Table 0x0.0x18 = 0x49,0xffe7 ; Debug Table 0x0.0x19 = 0x49,0xffe6 ; Debug Table 0x0.0x1a = 0x49,0xffe5 004a 1918 | | Execute Package,Field_Reference,Field_Number 0x18 004b 0129 | ) | Execute Any,Make_Visible 004c e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x1b = 0x4c,0xffe4 004d 1919 | | Execute Package,Field_Reference,Field_Number 0x19 004e 0129 | ) | Execute Any,Make_Visible 004f e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x1c = 0x4f,0xffe3 0050 191a | | Execute Package,Field_Reference,Field_Number 0x1a 0051 0129 | ) | Execute Any,Make_Visible 0052 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x1d = 0x52,0xffe2 0053 191b | | Execute Package,Field_Reference,Field_Number 0x1b 0054 0129 | ) | Execute Any,Make_Visible 0055 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x1e = 0x55,0xffe1 0056 191c | | Execute Package,Field_Reference,Field_Number 0x1c 0057 0129 | ) | Execute Any,Make_Visible 0058 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x1f = 0x58,0xffe0 0059 191d | | Execute Package,Field_Reference,Field_Number 0x1d 005a 0129 | ) | Execute Any,Make_Visible 005b e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x20 = 0x5b,0xffdf 005c 191e | | Execute Package,Field_Reference,Field_Number 0x1e 005d 0129 | ) | Execute Any,Make_Visible 005e e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x21 = 0x5e,0xffde 005f 191f | | Execute Package,Field_Reference,Field_Number 0x1f 0060 0129 | ) | Execute Any,Make_Visible 0061 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x22 = 0x61,0xffdd 0062 1920 | | Execute Package,Field_Reference,Field_Number 0x20 0063 0129 | ) | Execute Any,Make_Visible 0064 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x23 = 0x64,0xffdc 0065 1921 | ! | Execute Package,Field_Reference,Field_Number 0x21 0066 0129 | ) | Execute Any,Make_Visible 0067 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x24 = 0x67,0xffdb 0068 1922 | " | Execute Package,Field_Reference,Field_Number 0x22 0069 0129 | ) | Execute Any,Make_Visible 006a e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x25 = 0x6a,0xffda 006b 1923 | # | Execute Package,Field_Reference,Field_Number 0x23 006c 0129 | ) | Execute Any,Make_Visible 006d e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x26 = 0x6d,0xffd9 006e 1924 | $ | Execute Package,Field_Reference,Field_Number 0x24 006f 0129 | ) | Execute Any,Make_Visible 0070 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x27 = 0x70,0xffd8 0071 1925 | % | Execute Package,Field_Reference,Field_Number 0x25 0072 0129 | ) | Execute Any,Make_Visible 0073 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x28 = 0x73,0xffd7 0074 1926 | & | Execute Package,Field_Reference,Field_Number 0x26 0075 0129 | ) | Execute Any,Make_Visible 0076 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x29 = 0x76,0xffd6 0077 1927 | ' | Execute Package,Field_Reference,Field_Number 0x27 0078 0129 | ) | Execute Any,Make_Visible 0079 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x2a = 0x79,0xffd5 007a 1928 | ( | Execute Package,Field_Reference,Field_Number 0x28 007b 0129 | ) | Execute Any,Make_Visible 007c e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x2b = 0x7c,0xffd4 007d 1929 | ) | Execute Package,Field_Reference,Field_Number 0x29 007e 0129 | ) | Execute Any,Make_Visible 007f e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x2c = 0x7f,0xffd3 0080 192a | * | Execute Package,Field_Reference,Field_Number 0x2a 0081 0129 | ) | Execute Any,Make_Visible 0082 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x2d = 0x82,0xffd2 0083 192b | + | Execute Package,Field_Reference,Field_Number 0x2b 0084 0129 | ) | Execute Any,Make_Visible 0085 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x2e = 0x85,0xffd1 0086 192c | , | Execute Package,Field_Reference,Field_Number 0x2c 0087 0129 | ) | Execute Any,Make_Visible 0088 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x2f = 0x88,0xffd0 0089 192d | - | Execute Package,Field_Reference,Field_Number 0x2d 008a 0129 | ) | Execute Any,Make_Visible 008b e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x30 = 0x8b,0xffcf 008c 192e | . | Execute Package,Field_Reference,Field_Number 0x2e 008d 0129 | ) | Execute Any,Make_Visible 008e e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x31 = 0x8e,0xffce 008f 192f | / | Execute Package,Field_Reference,Field_Number 0x2f 0090 0129 | ) | Execute Any,Make_Visible 0091 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x32 = 0x91,0xffcd 0092 1930 | 0 | Execute Package,Field_Reference,Field_Number 0x30 0093 0129 | ) | Execute Any,Make_Visible 0094 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x33 = 0x94,0xffcc 0095 1931 | 1 | Execute Package,Field_Reference,Field_Number 0x31 0096 0129 | ) | Execute Any,Make_Visible 0097 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x34 = 0x97,0xffcb 0098 1932 | 2 | Execute Package,Field_Reference,Field_Number 0x32 0099 0129 | ) | Execute Any,Make_Visible 009a e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x35 = 0x9a,0xffca 009b 1933 | 3 | Execute Package,Field_Reference,Field_Number 0x33 009c 0129 | ) | Execute Any,Make_Visible 009d e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x36 = 0x9d,0xffc9 009e 1934 | 4 | Execute Package,Field_Reference,Field_Number 0x34 009f 0129 | ) | Execute Any,Make_Visible 00a0 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x37 = 0xa0,0xffc8 00a1 1935 | 5 | Execute Package,Field_Reference,Field_Number 0x35 00a2 0129 | ) | Execute Any,Make_Visible 00a3 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x38 = 0xa3,0xffc7 00a4 1936 | 6 | Execute Package,Field_Reference,Field_Number 0x36 00a5 0129 | ) | Execute Any,Make_Visible 00a6 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x39 = 0xa6,0xffc6 00a7 1937 | 7 | Execute Package,Field_Reference,Field_Number 0x37 00a8 0129 | ) | Execute Any,Make_Visible 00a9 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x3a = 0xa9,0xffc5 00aa 1938 | 8 | Execute Package,Field_Reference,Field_Number 0x38 00ab 0129 | ) | Execute Any,Make_Visible 00ac e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x3b = 0xac,0xffc4 00ad 1939 | 9 | Execute Package,Field_Reference,Field_Number 0x39 00ae 0129 | ) | Execute Any,Make_Visible 00af e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x3c = 0xaf,0xffc3 00b0 193a | : | Execute Package,Field_Reference,Field_Number 0x3a 00b1 0129 | ) | Execute Any,Make_Visible 00b2 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x3d = 0xb2,0xffc2 00b3 193b | ; | Execute Package,Field_Reference,Field_Number 0x3b 00b4 0129 | ) | Execute Any,Make_Visible 00b5 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x3e = 0xb5,0xffc1 00b6 193c | < | Execute Package,Field_Reference,Field_Number 0x3c 00b7 0129 | ) | Execute Any,Make_Visible 00b8 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x3f = 0xb8,0xffc0 00b9 193d | = | Execute Package,Field_Reference,Field_Number 0x3d 00ba 0129 | ) | Execute Any,Make_Visible 00bb e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x40 = 0xbb,0xffbf 00bc 193e | > | Execute Package,Field_Reference,Field_Number 0x3e 00bd 0129 | ) | Execute Any,Make_Visible 00be e002 | | Load 0x0,0x2 ; Debug Table 0x0.0x41 = 0xbe,0xffbe 00bf 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00c0 0129 | ) | Execute Any,Make_Visible 00c1 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x0.0x42 = 0xc1,0xffbd ; Debug Table 0x0.0x43 = 0xc1,0xffbc ; Debug Table 0x0.0x44 = 0xc1,0xffbb ; Debug Table 0x0.0x45 = 0xc1,0xffba ; Debug Table 0x0.0x46 = 0xc1,0xffb9 00c2 00e3 | | Load_Encached Natural_Cache 00c3 00e3 | | Load_Encached Natural_Cache 00c4 02a0 | | Declare_Subprogram Null_Subprogram 00c5 4803 |H | Short_Literal 0x3 00c6 032e | . | Declare_Type Record,Defined,Visible 00c7 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x0.0x47 = 0xc7,0xffb8 00c8 0322 | " | Declare_Variable Record 00c9 4800 |H | Short_Literal 0x0 00ca 00d9 | | Load_Top At_Offset_1 00cb 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 00cc 4800 |H | Short_Literal 0x0 00cd 00d9 | | Load_Top At_Offset_1 00ce 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 00cf 4800 |H | Short_Literal 0x0 00d0 00d9 | | Load_Top At_Offset_1 00d1 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 00d2 0129 | ) | Execute Any,Make_Visible 00d3 00e4 | | Load_Encached Positive_Cache ; Debug Table 0x0.0x48 = 0xd3,0xffb7 00d4 0266 | f | Execute Discrete,Bounds 00d5 00db | | Load_Top At_Offset_3 00d6 02a0 | | Declare_Subprogram Null_Subprogram 00d7 4801 |H | Short_Literal 0x1 00d8 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object 00d9 4801 |H | Short_Literal 0x1 ; Debug Table 0x0.0x49 = 0xd9,0xffb6 00da 4800 |H | Short_Literal 0x0 00db 00da | | Load_Top At_Offset_2 00dc 0333 | 3 | Declare_Variable Array,Visible,With_Constraint 00dd 4801 |H | Short_Literal 0x1 00de 4800 |H | Short_Literal 0x0 00df 00db | | Load_Top At_Offset_3 00e0 0334 | 4 | Declare_Variable Array,With_Constraint 00e1 00d9 | | Load_Top At_Offset_1 00e2 01d4 | | Execute Vector,Structure_Write 00e3 00bf | | Action Accept_Activation ; Debug Table 0x0.0x4a = 0xe3,0xffb5 ; Debug Table 0x0.0x4b = 0xe3,0xffb4 ; Debug Table 0x0.0x4c = 0xe3,0xffb3 ; Debug Table 0x0.0x4d = 0xe3,0xffb2 ; Debug Table 0x0.0x4e = 0xe3,0xffb1 ; Debug Table 0x0.0x4f = 0xe3,0xffb0 00e4 BODY_0008: 00e4 00bc | | Action Signal_Activated 00e5 00bb | | Action Signal_Completion 00e6 0000 0000 | | .XXX[0x2] 00e8 ; -------------------------------------------------------------------------------------- 00e8 ; SUBPROGRAM 00e8 ; -------------------------------------------------------------------------------------- 00e8 00eb | | .CONST 0x00eb ; Address of begin 00e9 0004 | | .CONST 0x0004 ; Address of exception handler 00ea 0001 | | .CONST 0x0001 ; Number of locals 00eb BODY_00e8: 00eb INIT_00e8: 00eb 4608 |F | Jump_Case 0x9 ; Debug Table 0x1 = .DEBUG 0x00eb,0x026c,0x0005,0x0000,0x0057,0x4ff5,0x0000,0x0031 00ec 7808 |x | Jump 0xf5 ; case 0x0 00ed 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 00ee 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 00ef 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 00f0 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 00f1 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5 00f2 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x6 00f3 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x7 00f4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x8 00f5 4800 |H | Short_Literal 0x0 00f6 00db | | Load_Top At_Offset_3 00f7 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 00f8 4800 |H | Short_Literal 0x0 00f9 00db | | Load_Top At_Offset_3 00fa 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 00fb 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 00fc 0000 0000 | | .BLANK 0000[0x4] 0100 ; -------------------------------------------------------------------------------------- 0100 ; SUBPROGRAM 0100 ; -------------------------------------------------------------------------------------- 0100 0103 | | .CONST 0x0103 ; Address of begin 0101 0004 | | .CONST 0x0004 ; Address of exception handler 0102 0001 | | .CONST 0x0001 ; Number of locals 0103 BODY_0100: 0103 INIT_0100: 0103 4603 |F | Jump_Case 0x4 ; Debug Table 0x2 = .DEBUG 0x0103,0x026e,0x0005,0x0000,0x0057,0x4ff5,0x0000,0x004b 0104 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0105 7802 |x | Jump 0x108 ; case 0x1 0106 7805 |x | Jump 0x10c ; case 0x2 0107 7809 |x | Jump 0x111 ; case 0x3 0108 00da | | Load_Top At_Offset_2 0109 0091 012d | -| Action Push_String_Extended_Indexed,0x12d ; "SUCCESSFUL" 010b 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 010c 00db | | Load_Top At_Offset_3 010d 00db | | Load_Top At_Offset_3 010e 00e0 | | Load_Encached Standard_Cache 010f 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0110 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0111 00da | | Load_Top At_Offset_2 0112 00e0 | | Load_Encached Standard_Cache 0113 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0114 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0115 0000 0000 | | .XXX[0x3] 0117 0000 | | 0118 ; -------------------------------------------------------------------------------------- 0118 ; SUBPROGRAM 0118 ; -------------------------------------------------------------------------------------- 0118 011b | | .CONST 0x011b ; Address of begin 0119 0004 | | .CONST 0x0004 ; Address of exception handler 011a 0001 | | .CONST 0x0001 ; Number of locals 011b BODY_0118: 011b INIT_0118: 011b 4603 |F | Jump_Case 0x4 ; Debug Table 0x3 = .DEBUG 0x011b,0x0270,0x0005,0x0000,0x0057,0x4ff5,0x0000,0x005d 011c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 011d 7802 |x | Jump 0x120 ; case 0x1 011e 7805 |x | Jump 0x124 ; case 0x2 011f 7809 |x | Jump 0x129 ; case 0x3 0120 00da | | Load_Top At_Offset_2 0121 0091 013b | ;| Action Push_String_Extended_Indexed,0x13b ; "AS_IS" 0123 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0124 00db | | Load_Top At_Offset_3 0125 00db | | Load_Top At_Offset_3 0126 00e0 | | Load_Encached Standard_Cache 0127 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0128 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0129 00da | | Load_Top At_Offset_2 012a 00e0 | | Load_Encached Standard_Cache 012b 181c | | Execute Package,Field_Execute,Field_Number 0x1c 012c 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 012d ; -------------------------------------------------------------------------------------- 012d ; STRING TABLE 012d ; -------------------------------------------------------------------------------------- 012d 002a | * | .STRTAB 0x002a->0x0142 ; "SUCCESSFUL" 012e 0032 | 2 | .STRTAB 0x0032->0x0147 ; "BAD_NAME" 012f 0038 | 8 | .STRTAB 0x0038->0x014b ; "BAD_JOB" 0130 003d | = | .STRTAB 0x003d->0x014e ; "BAD_STATE" 0131 0044 | D | .STRTAB 0x0044->0x0153 ; "BAD_IMAGE" 0132 004b | K | .STRTAB 0x004b->0x0157 ; "RESOURCE_LIMIT" 0133 0057 | W | .STRTAB 0x0057->0x015e ; "ILLEGAL_OPERATION" 0134 0066 | f | .STRTAB 0x0066->0x0167 ; "PROTECTION_ERROR" 0135 0074 | t | .STRTAB 0x0074->0x016f ; "ACCESS_ERROR" 0136 007e | ~ | .STRTAB 0x007e->0x0175 ; "ABORTED" 0137 0083 | | .STRTAB 0x0083->0x0178 ; "LOCK_ERROR" 0138 008b | | .STRTAB 0x008b->0x017d ; "BAD_VERSION" 0139 0094 | | .STRTAB 0x0094->0x0183 ; "BAD_ACTION" 013a 009c | | .STRTAB 0x009c->0x0188 ; "INTERNAL_ERROR" 013b 00a8 | | .STRTAB 0x00a8->0x018f ; "AS_IS" 013c 00ab | | .STRTAB 0x00ab->0x0191 ; "CHANGED" 013d 00b0 | | .STRTAB 0x00b0->0x0195 ; "FORMATTED" 013e 00b7 | | .STRTAB 0x00b7->0x0199 ; "COMMITTED" 013f 00be | | .STRTAB 0x00be->0x019e ; "READ_ONLY" 0140 00c5 | | .STRTAB 0x00c5->0x01a2 ; "BUSY" 0141 00c7 | | .STREND 0x00c7->0x01a4 0142 5355 4343 |SUCC| .STRTAB_STRINGS 01a5 0000 0000 | | .XXX[0x3] 01a7 0000 | | 01a8 ; -------------------------------------------------------------------------------------- 01a8 ; Debug Table 01a8 ; -------------------------------------------------------------------------------------- 01a8 0003 0004 | | .CONST 0x0003,0x0004 01aa 000b 01ca | | .DEBUG 0x000b,0x01ca,0x8000,0x0000,0x0057,0x4ff5,0x0000,0x0007 01b2 00eb 026c | l| .DEBUG 0x00eb,0x026c,0x0005,0x0000,0x0057,0x4ff5,0x0000,0x0031 01ba 0103 026e | n| .DEBUG 0x0103,0x026e,0x0005,0x0000,0x0057,0x4ff5,0x0000,0x004b 01c2 011b 0270 | p| .DEBUG 0x011b,0x0270,0x0005,0x0000,0x0057,0x4ff5,0x0000,0x005d 01ca ; -------------------------------------------------------------------------------------- 01ca ; Debug3 Subtable 0x0 01ca ; -------------------------------------------------------------------------------------- 01ca 0050 0000 | P | .DBG3TAB 0x0050,0x0000 01cc 000b ffff | | .CONST 0x000b,0xffff 01ce 000b fffe | | .CONST 0x000b,0xfffe 01d0 000b fffd | | .CONST 0x000b,0xfffd 01d2 000b fffc | | .CONST 0x000b,0xfffc 01d4 000d fffb | | .CONST 0x000d,0xfffb 01d6 000d fffa | | .CONST 0x000d,0xfffa 01d8 000f fff9 | | .CONST 0x000f,0xfff9 01da 000f fff8 | | .CONST 0x000f,0xfff8 01dc 0015 fff7 | | .CONST 0x0015,0xfff7 01de 001e fff6 | | .CONST 0x001e,0xfff6 01e0 0023 fff5 | # | .CONST 0x0023,0xfff5 01e2 0028 fff4 | ( | .CONST 0x0028,0xfff4 01e4 002b fff3 | + | .CONST 0x002b,0xfff3 01e6 002e fff2 | . | .CONST 0x002e,0xfff2 01e8 0031 fff1 | 1 | .CONST 0x0031,0xfff1 01ea 0034 fff0 | 4 | .CONST 0x0034,0xfff0 01ec 0037 ffef | 7 | .CONST 0x0037,0xffef 01ee 003a ffee | : | .CONST 0x003a,0xffee 01f0 003d ffed | = | .CONST 0x003d,0xffed 01f2 0040 ffec | @ | .CONST 0x0040,0xffec 01f4 0043 ffeb | C | .CONST 0x0043,0xffeb 01f6 0046 ffea | F | .CONST 0x0046,0xffea 01f8 0049 ffe9 | I | .CONST 0x0049,0xffe9 01fa 0049 ffe8 | I | .CONST 0x0049,0xffe8 01fc 0049 ffe7 | I | .CONST 0x0049,0xffe7 01fe 0049 ffe6 | I | .CONST 0x0049,0xffe6 0200 0049 ffe5 | I | .CONST 0x0049,0xffe5 0202 004c ffe4 | L | .CONST 0x004c,0xffe4 0204 004f ffe3 | O | .CONST 0x004f,0xffe3 0206 0052 ffe2 | R | .CONST 0x0052,0xffe2 0208 0055 ffe1 | U | .CONST 0x0055,0xffe1 020a 0058 ffe0 | X | .CONST 0x0058,0xffe0 020c 005b ffdf | [ | .CONST 0x005b,0xffdf 020e 005e ffde | ^ | .CONST 0x005e,0xffde 0210 0061 ffdd | a | .CONST 0x0061,0xffdd 0212 0064 ffdc | d | .CONST 0x0064,0xffdc 0214 0067 ffdb | g | .CONST 0x0067,0xffdb 0216 006a ffda | j | .CONST 0x006a,0xffda 0218 006d ffd9 | m | .CONST 0x006d,0xffd9 021a 0070 ffd8 | p | .CONST 0x0070,0xffd8 021c 0073 ffd7 | s | .CONST 0x0073,0xffd7 021e 0076 ffd6 | v | .CONST 0x0076,0xffd6 0220 0079 ffd5 | y | .CONST 0x0079,0xffd5 0222 007c ffd4 | | | .CONST 0x007c,0xffd4 0224 007f ffd3 | | .CONST 0x007f,0xffd3 0226 0082 ffd2 | | .CONST 0x0082,0xffd2 0228 0085 ffd1 | | .CONST 0x0085,0xffd1 022a 0088 ffd0 | | .CONST 0x0088,0xffd0 022c 008b ffcf | | .CONST 0x008b,0xffcf 022e 008e ffce | | .CONST 0x008e,0xffce 0230 0091 ffcd | | .CONST 0x0091,0xffcd 0232 0094 ffcc | | .CONST 0x0094,0xffcc 0234 0097 ffcb | | .CONST 0x0097,0xffcb 0236 009a ffca | | .CONST 0x009a,0xffca 0238 009d ffc9 | | .CONST 0x009d,0xffc9 023a 00a0 ffc8 | | .CONST 0x00a0,0xffc8 023c 00a3 ffc7 | | .CONST 0x00a3,0xffc7 023e 00a6 ffc6 | | .CONST 0x00a6,0xffc6 0240 00a9 ffc5 | | .CONST 0x00a9,0xffc5 0242 00ac ffc4 | | .CONST 0x00ac,0xffc4 0244 00af ffc3 | | .CONST 0x00af,0xffc3 0246 00b2 ffc2 | | .CONST 0x00b2,0xffc2 0248 00b5 ffc1 | | .CONST 0x00b5,0xffc1 024a 00b8 ffc0 | | .CONST 0x00b8,0xffc0 024c 00bb ffbf | | .CONST 0x00bb,0xffbf 024e 00be ffbe | | .CONST 0x00be,0xffbe 0250 00c1 ffbd | | .CONST 0x00c1,0xffbd 0252 00c1 ffbc | | .CONST 0x00c1,0xffbc 0254 00c1 ffbb | | .CONST 0x00c1,0xffbb 0256 00c1 ffba | | .CONST 0x00c1,0xffba 0258 00c1 ffb9 | | .CONST 0x00c1,0xffb9 025a 00c7 ffb8 | | .CONST 0x00c7,0xffb8 025c 00d3 ffb7 | | .CONST 0x00d3,0xffb7 025e 00d9 ffb6 | | .CONST 0x00d9,0xffb6 0260 00e3 ffb5 | | .CONST 0x00e3,0xffb5 0262 00e3 ffb4 | | .CONST 0x00e3,0xffb4 0264 00e3 ffb3 | | .CONST 0x00e3,0xffb3 0266 00e3 ffb2 | | .CONST 0x00e3,0xffb2 0268 00e3 ffb1 | | .CONST 0x00e3,0xffb1 026a 00e3 ffb0 | | .CONST 0x00e3,0xffb0 026c ; -------------------------------------------------------------------------------------- 026c ; Debug3 Subtable 0x1 026c ; -------------------------------------------------------------------------------------- 026c 0000 0000 | | .DBG3TAB 0x0000,0x0000 026e ; -------------------------------------------------------------------------------------- 026e ; Debug3 Subtable 0x2 026e ; -------------------------------------------------------------------------------------- 026e 0000 0000 | | .DBG3TAB 0x0000,0x0000 0270 ; -------------------------------------------------------------------------------------- 0270 ; Debug3 Subtable 0x3 0270 ; -------------------------------------------------------------------------------------- 0270 0000 0000 | | .DBG3TAB 0x0000,0x0000 0272 0000 0000 | | .BLANK 0000[0x18e]