|
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: 3072 (0xc00) 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 0348 | H | .CONST 0x0348 ; 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 0002 | | .CONST 0x0002 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0021 | ! | .CONST 0x0021 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0013 | | .CONST 0x0013 ; Number of locals 000b INIT_0008: 000b 029a 002b | +| Declare_Subprogram INIT_0028,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0 = .DEBUG 0x000b,0x0392,0x0000,0x0000,0x0059,0x9145,0x0000,0x003a ; Debug Table 0x0.0x0 = 0xb,0xffff 000d 029a 0193 | | Declare_Subprogram INIT_0190,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1 = 0xd,0xfffe 000f 00bf | | Action Accept_Activation 0010 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x0010,0x0398,0x0000,0x0000,0x0059,0x9155,0x0000,0x0006 ; Debug Table 0x1.0x0 = 0x10,0xffff 0011 029b 019b | | Declare_Subprogram INIT_0198,For_Outer_Call,Unelaborated ; Debug Table 0x1.0x1 = 0x11,0xfffe 0013 029d 02a3 | | Declare_Subprogram INIT_02a0,For_Outer_Call ; Debug Table 0x1.0x2 = 0x13,0xfffd 0015 029d 02d3 | | Declare_Subprogram INIT_02d0,For_Outer_Call ; Debug Table 0x1.0x3 = 0x15,0xfffc 0017 029d 02fb | | Declare_Subprogram INIT_02f8,For_Outer_Call ; Debug Table 0x1.0x4 = 0x17,0xfffb 0019 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x1.0x5 = 0x19,0xfffa 001a 00c7 | | Action Elaborate_Subprogram 001b 029d 0323 | #| Declare_Subprogram INIT_0320,For_Outer_Call ; Debug Table 0x1.0x6 = 0x1b,0xfff9 001d 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0x7 = 0x1d,0xfff8 001e 00c7 | | Action Elaborate_Subprogram 001f 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1.0x8 = 0x1f,0xfff7 0020 00c7 | | Action Elaborate_Subprogram 0021 BODY_0008: 0021 00bc | | Action Signal_Activated 0022 00bb | | Action Signal_Completion 0023 0000 0000 | | .BLANK 0000[0x5] 0028 ; -------------------------------------------------------------------------------------- 0028 ; SUBPROGRAM 0028 ; -------------------------------------------------------------------------------------- 0028 0036 | 6 | .CONST 0x0036 ; Address of begin 0029 0004 | | .CONST 0x0004 ; Address of exception handler 002a 0007 | | .CONST 0x0007 ; Number of locals 002b INIT_0028: 002b 00da | | Load_Top At_Offset_2 ; Debug Table 0x2 = .DEBUG 0x002b,0x03ac,0x0001,0x0000,0x0059,0x9145,0x0000,0x003b ; Debug Table 0x2.0x0 = 0x2b,0xffff 002c 00eb | | Load_Encached Diana_Cache 002d 1814 | | Execute Package,Field_Execute,Field_Number 0x14 002e 00eb | | Load_Encached Diana_Cache 002f 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0030 03f1 | | Declare_Variable Discrete,With_Value 0031 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x2.0x1 = 0x31,0xfffe 0032 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x2.0x2 = 0x32,0xfffd 0033 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x2.0x3 = 0x33,0xfffc 0034 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x2.0x4 = 0x34,0xfffb 0035 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x2.0x5 = 0x35,0xfffa 0036 BODY_0028: 0036 e402 | | Load 0x2,0x2 ; Debug Table 0x2.0x6 = 0x36,0x1 0037 00eb | | Load_Encached Diana_Cache 0038 1884 | | Execute Package,Field_Execute,Field_Number 0x84 0039 4604 |F | Jump_Case 0x5 003a 7804 |x | Jump 0x3f ; case 0x0 003b 7826 |x& | Jump 0x62 ; case 0x1 003c 7833 |x3 | Jump 0x70 ; case 0x2 003d 7849 |xI | Jump 0x87 ; case 0x3 003e 7868 |xh | Jump 0xa7 ; case 0x4 003f e5ff | | Load 0x2,-0x1 ; Debug Table 0x2.0x7 = 0x3f,0x2 0040 00eb | | Load_Encached Diana_Cache 0041 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0042 6804 |h | Jump_Zero 0x47 0043 00eb | | Load_Encached Diana_Cache ; Debug Table 0x2.0x8 = 0x43,0x3 0044 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0045 a403 | | Store_Unchecked 0x2,0x3 0046 7876 |xv | Jump 0xbd 0047 e402 | | Load 0x2,0x2 ; Debug Table 0x2.0x9 = 0x47,0x4 0048 00eb | | Load_Encached Diana_Cache 0049 1815 | | Execute Package,Field_Execute,Field_Number 0x15 004a 6808 |h | Jump_Zero 0x53 004b e5ff | | Load 0x2,-0x1 ; Debug Table 0x2.0xa = 0x4b,0x5 004c 00eb | | Load_Encached Diana_Cache 004d 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 004e e402 | | Load 0x2,0x2 004f 00eb | | Load_Encached Diana_Cache 0050 1879 | y | Execute Package,Field_Execute,Field_Number 0x79 0051 a403 | | Store_Unchecked 0x2,0x3 0052 786a |xj | Jump 0xbd 0053 e402 | | Load 0x2,0x2 ; Debug Table 0x2.0xb = 0x53,0x6 0054 0f08 | | Execute_Immediate Equal,0x8 0055 6807 |h | Jump_Zero 0x5d 0056 e5ff | | Load 0x2,-0x1 ; Debug Table 0x2.0xc = 0x56,0x7 0057 4974 |It | Short_Literal 0x174 0058 00eb | | Load_Encached Diana_Cache 0059 0098 | | Execute Package,Field_Read_Dynamic 005a 180d | | Execute Package,Field_Execute,Field_Number 0xd 005b a403 | | Store_Unchecked 0x2,0x3 005c 7860 |x` | Jump 0xbd 005d e402 | | Load 0x2,0x2 ; Debug Table 0x2.0xd = 0x5d,0x8 005e 00eb | | Load_Encached Diana_Cache 005f 1878 | x | Execute Package,Field_Execute,Field_Number 0x78 0060 a403 | | Store_Unchecked 0x2,0x3 0061 785b |x[ | Jump 0xbd 0062 e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0xe = 0x62,0x9 0063 00ec | | Load_Encached Diana_Tree_Cache 0064 e5ff | | Load 0x2,-0x1 0065 00eb | | Load_Encached Diana_Cache 0066 1885 | | Execute Package,Field_Execute,Field_Number 0x85 0067 820d | | Call 0x1,0xd 0068 c404 | | Store 0x2,0x4 0069 00d1 | | Pop_Control Pop_Count_1 006a 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0xf = 0x6a,0xa 006b e402 | | Load 0x2,0x2 006c 00eb | | Load_Encached Diana_Cache 006d 187c | | | Execute Package,Field_Execute,Field_Number 0x7c 006e a403 | | Store_Unchecked 0x2,0x3 006f 784d |xM | Jump 0xbd 0070 e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x10 = 0x70,0xb 0071 00ec | | Load_Encached Diana_Tree_Cache 0072 e5ff | | Load 0x2,-0x1 0073 00eb | | Load_Encached Diana_Cache 0074 1885 | | Execute Package,Field_Execute,Field_Number 0x85 0075 820d | | Call 0x1,0xd 0076 c404 | | Store 0x2,0x4 0077 00d1 | | Pop_Control Pop_Count_1 0078 e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x11 = 0x78,0xc 0079 00ec | | Load_Encached Diana_Tree_Cache 007a e5ff | | Load 0x2,-0x1 007b 00eb | | Load_Encached Diana_Cache 007c 1886 | | Execute Package,Field_Execute,Field_Number 0x86 007d 820d | | Call 0x1,0xd 007e c405 | | Store 0x2,0x5 007f 00d1 | | Pop_Control Pop_Count_1 0080 00da | | Load_Top At_Offset_2 ; Debug Table 0x2.0x12 = 0x80,0xd 0081 e404 | | Load 0x2,0x4 0082 e402 | | Load 0x2,0x2 0083 00eb | | Load_Encached Diana_Cache 0084 187d | } | Execute Package,Field_Execute,Field_Number 0x7d 0085 a403 | | Store_Unchecked 0x2,0x3 0086 7836 |x6 | Jump 0xbd 0087 e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x13 = 0x87,0xe 0088 00ec | | Load_Encached Diana_Tree_Cache 0089 e5ff | | Load 0x2,-0x1 008a 00eb | | Load_Encached Diana_Cache 008b 1885 | | Execute Package,Field_Execute,Field_Number 0x85 008c 820d | | Call 0x1,0xd 008d c404 | | Store 0x2,0x4 008e 00d1 | | Pop_Control Pop_Count_1 008f e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x14 = 0x8f,0xf 0090 00ec | | Load_Encached Diana_Tree_Cache 0091 e5ff | | Load 0x2,-0x1 0092 00eb | | Load_Encached Diana_Cache 0093 1886 | | Execute Package,Field_Execute,Field_Number 0x86 0094 820d | | Call 0x1,0xd 0095 c405 | | Store 0x2,0x5 0096 00d1 | | Pop_Control Pop_Count_1 0097 e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x15 = 0x97,0x10 0098 00ec | | Load_Encached Diana_Tree_Cache 0099 e5ff | | Load 0x2,-0x1 009a 00eb | | Load_Encached Diana_Cache 009b 1887 | | Execute Package,Field_Execute,Field_Number 0x87 009c 820d | | Call 0x1,0xd 009d 0033 | 3 | Store_Top Heap_Access,At_Offset_3 009e 00d1 | | Pop_Control Pop_Count_1 009f 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x2.0x16 = 0x9f,0x11 00a0 00db | | Load_Top At_Offset_3 00a1 e404 | | Load 0x2,0x4 00a2 e402 | | Load 0x2,0x2 00a3 00eb | | Load_Encached Diana_Cache 00a4 187e | ~ | Execute Package,Field_Execute,Field_Number 0x7e 00a5 a403 | | Store_Unchecked 0x2,0x3 00a6 7816 |x | Jump 0xbd 00a7 e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x17 = 0xa7,0x12 00a8 00ee | | Load_Encached Diana_Seq_Type_Cache 00a9 e5ff | | Load 0x2,-0x1 00aa 00eb | | Load_Encached Diana_Cache 00ab 1888 | | Execute Package,Field_Execute,Field_Number 0x88 00ac 8210 | | Call 0x1,0x10 00ad 0032 | 2 | Store_Top Heap_Access,At_Offset_2 00ae 00d1 | | Pop_Control Pop_Count_1 00af 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0x18 = 0xaf,0x13 00b0 e402 | | Load 0x2,0x2 00b1 00eb | | Load_Encached Diana_Cache 00b2 187f | | Execute Package,Field_Execute,Field_Number 0x7f 00b3 a403 | | Store_Unchecked 0x2,0x3 00b4 e402 | | Load 0x2,0x2 ; Debug Table 0x2.0x19 = 0xb4,0x14 00b5 0f1a | | Execute_Immediate Equal,0x1a 00b6 6806 |h | Jump_Zero 0xbd 00b7 e5ff | | Load 0x2,-0x1 ; Debug Table 0x2.0x1a = 0xb7,0x15 00b8 00eb | | Load_Encached Diana_Cache 00b9 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 00ba e403 | | Load 0x2,0x3 00bb 00eb | | Load_Encached Diana_Cache 00bc 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 00bd e402 | | Load 0x2,0x2 ; Debug Table 0x2.0x1b = 0xbd,0x16 00be 46ad |F | Jump_Case 0xae 00bf 78cc |x | Jump 0x18c ; case 0x0 00c0 78ac |x | Jump 0x16d ; case 0x1 00c1 78ca |x | Jump 0x18c ; case 0x2 00c2 78aa |x | Jump 0x16d ; case 0x3 00c3 78c0 |x | Jump 0x184 ; case 0x4 00c4 78bf |x | Jump 0x184 ; case 0x5 00c5 78be |x | Jump 0x184 ; case 0x6 00c6 78a6 |x | Jump 0x16d ; case 0x7 00c7 78bc |x | Jump 0x184 ; case 0x8 00c8 78bb |x | Jump 0x184 ; case 0x9 00c9 78ba |x | Jump 0x184 ; case 0xa 00ca 78a2 |x | Jump 0x16d ; case 0xb 00cb 78b8 |x | Jump 0x184 ; case 0xc 00cc 78a0 |x | Jump 0x16d ; case 0xd 00cd 78b6 |x | Jump 0x184 ; case 0xe 00ce 78b5 |x | Jump 0x184 ; case 0xf 00cf 78b4 |x | Jump 0x184 ; case 0x10 00d0 789c |x | Jump 0x16d ; case 0x11 00d1 78b2 |x | Jump 0x184 ; case 0x12 00d2 789a |x | Jump 0x16d ; case 0x13 00d3 78b8 |x | Jump 0x18c ; case 0x14 00d4 78b7 |x | Jump 0x18c ; case 0x15 00d5 78ae |x | Jump 0x184 ; case 0x16 00d6 78b5 |x | Jump 0x18c ; case 0x17 00d7 78b4 |x | Jump 0x18c ; case 0x18 00d8 78b3 |x | Jump 0x18c ; case 0x19 00d9 78b2 |x | Jump 0x18c ; case 0x1a 00da 78b1 |x | Jump 0x18c ; case 0x1b 00db 7891 |x | Jump 0x16d ; case 0x1c 00dc 7890 |x | Jump 0x16d ; case 0x1d 00dd 788f |x | Jump 0x16d ; case 0x1e 00de 788e |x | Jump 0x16d ; case 0x1f 00df 788d |x | Jump 0x16d ; case 0x20 00e0 788c |x | Jump 0x16d ; case 0x21 00e1 788b |x | Jump 0x16d ; case 0x22 00e2 788a |x | Jump 0x16d ; case 0x23 00e3 7889 |x | Jump 0x16d ; case 0x24 00e4 7888 |x | Jump 0x16d ; case 0x25 00e5 7887 |x | Jump 0x16d ; case 0x26 00e6 7886 |x | Jump 0x16d ; case 0x27 00e7 7885 |x | Jump 0x16d ; case 0x28 00e8 7884 |x | Jump 0x16d ; case 0x29 00e9 7883 |x | Jump 0x16d ; case 0x2a 00ea 7882 |x | Jump 0x16d ; case 0x2b 00eb 7881 |x | Jump 0x16d ; case 0x2c 00ec 7880 |x | Jump 0x16d ; case 0x2d 00ed 789e |x | Jump 0x18c ; case 0x2e 00ee 787e |x~ | Jump 0x16d ; case 0x2f 00ef 787d |x} | Jump 0x16d ; case 0x30 00f0 787c |x| | Jump 0x16d ; case 0x31 00f1 787b |x{ | Jump 0x16d ; case 0x32 00f2 787a |xz | Jump 0x16d ; case 0x33 00f3 7898 |x | Jump 0x18c ; case 0x34 00f4 7897 |x | Jump 0x18c ; case 0x35 00f5 7896 |x | Jump 0x18c ; case 0x36 00f6 7895 |x | Jump 0x18c ; case 0x37 00f7 7894 |x | Jump 0x18c ; case 0x38 00f8 7893 |x | Jump 0x18c ; case 0x39 00f9 7892 |x | Jump 0x18c ; case 0x3a 00fa 7872 |xr | Jump 0x16d ; case 0x3b 00fb 7890 |x | Jump 0x18c ; case 0x3c 00fc 7870 |xp | Jump 0x16d ; case 0x3d 00fd 786f |xo | Jump 0x16d ; case 0x3e 00fe 786e |xn | Jump 0x16d ; case 0x3f 00ff 788c |x | Jump 0x18c ; case 0x40 0100 786c |xl | Jump 0x16d ; case 0x41 0101 786b |xk | Jump 0x16d ; case 0x42 0102 786a |xj | Jump 0x16d ; case 0x43 0103 7869 |xi | Jump 0x16d ; case 0x44 0104 7887 |x | Jump 0x18c ; case 0x45 0105 7878 |xx | Jump 0x17e ; case 0x46 0106 7877 |xw | Jump 0x17e ; case 0x47 0107 786b |xk | Jump 0x173 ; case 0x48 0108 7883 |x | Jump 0x18c ; case 0x49 0109 7863 |xc | Jump 0x16d ; case 0x4a 010a 7881 |x | Jump 0x18c ; case 0x4b 010b 7880 |x | Jump 0x18c ; case 0x4c 010c 787f |x | Jump 0x18c ; case 0x4d 010d 785f |x_ | Jump 0x16d ; case 0x4e 010e 787d |x} | Jump 0x18c ; case 0x4f 010f 787c |x| | Jump 0x18c ; case 0x50 0110 787b |x{ | Jump 0x18c ; case 0x51 0111 787a |xz | Jump 0x18c ; case 0x52 0112 7879 |xy | Jump 0x18c ; case 0x53 0113 7878 |xx | Jump 0x18c ; case 0x54 0114 7877 |xw | Jump 0x18c ; case 0x55 0115 7876 |xv | Jump 0x18c ; case 0x56 0116 7875 |xu | Jump 0x18c ; case 0x57 0117 7874 |xt | Jump 0x18c ; case 0x58 0118 7854 |xT | Jump 0x16d ; case 0x59 0119 7872 |xr | Jump 0x18c ; case 0x5a 011a 7871 |xq | Jump 0x18c ; case 0x5b 011b 7870 |xp | Jump 0x18c ; case 0x5c 011c 786f |xo | Jump 0x18c ; case 0x5d 011d 786e |xn | Jump 0x18c ; case 0x5e 011e 786d |xm | Jump 0x18c ; case 0x5f 011f 786c |xl | Jump 0x18c ; case 0x60 0120 784c |xL | Jump 0x16d ; case 0x61 0121 784b |xK | Jump 0x16d ; case 0x62 0122 784a |xJ | Jump 0x16d ; case 0x63 0123 7849 |xI | Jump 0x16d ; case 0x64 0124 7848 |xH | Jump 0x16d ; case 0x65 0125 7847 |xG | Jump 0x16d ; case 0x66 0126 7846 |xF | Jump 0x16d ; case 0x67 0127 7845 |xE | Jump 0x16d ; case 0x68 0128 7844 |xD | Jump 0x16d ; case 0x69 0129 7843 |xC | Jump 0x16d ; case 0x6a 012a 7842 |xB | Jump 0x16d ; case 0x6b 012b 7841 |xA | Jump 0x16d ; case 0x6c 012c 7840 |x@ | Jump 0x16d ; case 0x6d 012d 783f |x? | Jump 0x16d ; case 0x6e 012e 783e |x> | Jump 0x16d ; case 0x6f 012f 783d |x= | Jump 0x16d ; case 0x70 0130 783c |x< | Jump 0x16d ; case 0x71 0131 783b |x; | Jump 0x16d ; case 0x72 0132 783a |x: | Jump 0x16d ; case 0x73 0133 7858 |xX | Jump 0x18c ; case 0x74 0134 7857 |xW | Jump 0x18c ; case 0x75 0135 7856 |xV | Jump 0x18c ; case 0x76 0136 7836 |x6 | Jump 0x16d ; case 0x77 0137 7854 |xT | Jump 0x18c ; case 0x78 0138 7853 |xS | Jump 0x18c ; case 0x79 0139 7852 |xR | Jump 0x18c ; case 0x7a 013a 7851 |xQ | Jump 0x18c ; case 0x7b 013b 7831 |x1 | Jump 0x16d ; case 0x7c 013c 7830 |x0 | Jump 0x16d ; case 0x7d 013d 782f |x/ | Jump 0x16d ; case 0x7e 013e 782e |x. | Jump 0x16d ; case 0x7f 013f 782d |x- | Jump 0x16d ; case 0x80 0140 784b |xK | Jump 0x18c ; case 0x81 0141 784a |xJ | Jump 0x18c ; case 0x82 0142 7849 |xI | Jump 0x18c ; case 0x83 0143 7848 |xH | Jump 0x18c ; case 0x84 0144 7847 |xG | Jump 0x18c ; case 0x85 0145 7846 |xF | Jump 0x18c ; case 0x86 0146 7845 |xE | Jump 0x18c ; case 0x87 0147 7825 |x% | Jump 0x16d ; case 0x88 0148 7843 |xC | Jump 0x18c ; case 0x89 0149 7842 |xB | Jump 0x18c ; case 0x8a 014a 7841 |xA | Jump 0x18c ; case 0x8b 014b 7840 |x@ | Jump 0x18c ; case 0x8c 014c 783f |x? | Jump 0x18c ; case 0x8d 014d 783e |x> | Jump 0x18c ; case 0x8e 014e 783d |x= | Jump 0x18c ; case 0x8f 014f 783c |x< | Jump 0x18c ; case 0x90 0150 783b |x; | Jump 0x18c ; case 0x91 0151 783a |x: | Jump 0x18c ; case 0x92 0152 7839 |x9 | Jump 0x18c ; case 0x93 0153 7838 |x8 | Jump 0x18c ; case 0x94 0154 7837 |x7 | Jump 0x18c ; case 0x95 0155 7836 |x6 | Jump 0x18c ; case 0x96 0156 7835 |x5 | Jump 0x18c ; case 0x97 0157 7834 |x4 | Jump 0x18c ; case 0x98 0158 7814 |x | Jump 0x16d ; case 0x99 0159 7813 |x | Jump 0x16d ; case 0x9a 015a 7812 |x | Jump 0x16d ; case 0x9b 015b 7830 |x0 | Jump 0x18c ; case 0x9c 015c 782f |x/ | Jump 0x18c ; case 0x9d 015d 782e |x. | Jump 0x18c ; case 0x9e 015e 782d |x- | Jump 0x18c ; case 0x9f 015f 780d |x | Jump 0x16d ; case 0xa0 0160 782b |x+ | Jump 0x18c ; case 0xa1 0161 782a |x* | Jump 0x18c ; case 0xa2 0162 7829 |x) | Jump 0x18c ; case 0xa3 0163 7828 |x( | Jump 0x18c ; case 0xa4 0164 7827 |x' | Jump 0x18c ; case 0xa5 0165 7826 |x& | Jump 0x18c ; case 0xa6 0166 7825 |x% | Jump 0x18c ; case 0xa7 0167 7824 |x$ | Jump 0x18c ; case 0xa8 0168 7823 |x# | Jump 0x18c ; case 0xa9 0169 7803 |x | Jump 0x16d ; case 0xaa 016a 7821 |x! | Jump 0x18c ; case 0xab 016b 7820 |x | Jump 0x18c ; case 0xac 016c 781f |x | Jump 0x18c ; case 0xad 016d e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x1c = 0x16d,0x17 016e e403 | | Load 0x2,0x3 016f e5ff | | Load 0x2,-0x1 0170 8001 | | Call 0x0,0x1 0171 00d1 | | Pop_Control Pop_Count_1 0172 7819 |x | Jump 0x18c 0173 e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x1d = 0x173,0x18 0174 e403 | | Load 0x2,0x3 0175 e5ff | | Load 0x2,-0x1 0176 8001 | | Call 0x0,0x1 0177 00d1 | | Pop_Control Pop_Count_1 0178 e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x1e = 0x178,0x19 0179 e403 | | Load 0x2,0x3 017a e5ff | | Load 0x2,-0x1 017b 8212 | | Call 0x1,0x12 017c 00d1 | | Pop_Control Pop_Count_1 017d 780e |x | Jump 0x18c 017e e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x1f = 0x17e,0x1a 017f e403 | | Load 0x2,0x3 0180 e5ff | | Load 0x2,-0x1 0181 8212 | | Call 0x1,0x12 0182 00d1 | | Pop_Control Pop_Count_1 0183 7808 |x | Jump 0x18c 0184 e403 | | Load 0x2,0x3 ; Debug Table 0x2.0x20 = 0x184,0x1b 0185 e5ff | | Load 0x2,-0x1 0186 8211 | | Call 0x1,0x11 0187 e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x21 = 0x187,0x1c 0188 e403 | | Load 0x2,0x3 0189 e5ff | | Load 0x2,-0x1 018a 8001 | | Call 0x0,0x1 018b 00d1 | | Pop_Control Pop_Count_1 018c e403 | | Load 0x2,0x3 ; Debug Table 0x2.0x22 = 0x18c,0x1e 018d a5fe | | Store_Unchecked 0x2,-0x2 018e 4502 |E | Exit_Suprogram New_Top_Offset 0x2 018f 0000 | | .XXX[0x1] 0190 ; -------------------------------------------------------------------------------------- 0190 ; SUBPROGRAM 0190 ; -------------------------------------------------------------------------------------- 0190 0193 | | .CONST 0x0193 ; Address of begin 0191 0004 | | .CONST 0x0004 ; Address of exception handler 0192 0001 | | .CONST 0x0001 ; Number of locals 0193 BODY_0190: 0193 INIT_0190: 0193 e5fd | | Load 0x2,-0x3 ; Debug Table 0x3 = .DEBUG 0x0193,0x03f4,0x0001,0x0000,0x0059,0x9145,0x0000,0x004f ; Debug Table 0x3.0x0 = 0x193,0x1 0194 e5fe | | Load 0x2,-0x2 0195 e5ff | | Load 0x2,-0x1 0196 820f | | Call 0x1,0xf 0197 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0198 ; -------------------------------------------------------------------------------------- 0198 ; SUBPROGRAM 0198 ; -------------------------------------------------------------------------------------- 0198 019b | | .CONST 0x019b ; Address of begin 0199 0004 | | .CONST 0x0004 ; Address of exception handler 019a 0001 | | .CONST 0x0001 ; Number of locals 019b BODY_0198: 019b INIT_0198: 019b 00da | | Load_Top At_Offset_2 ; Debug Table 0x4 = .DEBUG 0x019b,0x03f8,0x0001,0x0000,0x0059,0x9155,0x0000,0x000d ; Debug Table 0x4.0x0 = 0x19b,0x1 019c 00eb | | Load_Encached Diana_Cache 019d 1814 | | Execute Package,Field_Execute,Field_Number 0x14 019e 00eb | | Load_Encached Diana_Cache 019f 1884 | | Execute Package,Field_Execute,Field_Number 0x84 01a0 4604 |F | Jump_Case 0x5 01a1 7846 |xF | Jump 0x1e8 ; case 0x0 01a2 7803 |x | Jump 0x1a6 ; case 0x1 01a3 780c |x | Jump 0x1b0 ; case 0x2 01a4 781e |x | Jump 0x1c3 ; case 0x3 01a5 7839 |x9 | Jump 0x1df ; case 0x4 01a6 e5fd | | Load 0x2,-0x3 ; Debug Table 0x4.0x1 = 0x1a6,0x2 01a7 e5fe | | Load 0x2,-0x2 01a8 00eb | | Load_Encached Diana_Cache 01a9 1885 | | Execute Package,Field_Execute,Field_Number 0x85 01aa e5ff | | Load 0x2,-0x1 01ab 00eb | | Load_Encached Diana_Cache 01ac 1885 | | Execute Package,Field_Execute,Field_Number 0x85 01ad 820f | | Call 0x1,0xf 01ae 00d1 | | Pop_Control Pop_Count_1 01af 7838 |x8 | Jump 0x1e8 01b0 e5fd | | Load 0x2,-0x3 ; Debug Table 0x4.0x2 = 0x1b0,0x3 01b1 e5fe | | Load 0x2,-0x2 01b2 00eb | | Load_Encached Diana_Cache 01b3 1885 | | Execute Package,Field_Execute,Field_Number 0x85 01b4 e5ff | | Load 0x2,-0x1 01b5 00eb | | Load_Encached Diana_Cache 01b6 1885 | | Execute Package,Field_Execute,Field_Number 0x85 01b7 820f | | Call 0x1,0xf 01b8 00d1 | | Pop_Control Pop_Count_1 01b9 e5fd | | Load 0x2,-0x3 ; Debug Table 0x4.0x3 = 0x1b9,0x4 01ba e5fe | | Load 0x2,-0x2 01bb 00eb | | Load_Encached Diana_Cache 01bc 1886 | | Execute Package,Field_Execute,Field_Number 0x86 01bd e5ff | | Load 0x2,-0x1 01be 00eb | | Load_Encached Diana_Cache 01bf 1886 | | Execute Package,Field_Execute,Field_Number 0x86 01c0 820f | | Call 0x1,0xf 01c1 00d1 | | Pop_Control Pop_Count_1 01c2 7825 |x% | Jump 0x1e8 01c3 e5fd | | Load 0x2,-0x3 ; Debug Table 0x4.0x4 = 0x1c3,0x5 01c4 e5fe | | Load 0x2,-0x2 01c5 00eb | | Load_Encached Diana_Cache 01c6 1885 | | Execute Package,Field_Execute,Field_Number 0x85 01c7 e5ff | | Load 0x2,-0x1 01c8 00eb | | Load_Encached Diana_Cache 01c9 1885 | | Execute Package,Field_Execute,Field_Number 0x85 01ca 820f | | Call 0x1,0xf 01cb 00d1 | | Pop_Control Pop_Count_1 01cc e5fd | | Load 0x2,-0x3 ; Debug Table 0x4.0x5 = 0x1cc,0x6 01cd e5fe | | Load 0x2,-0x2 01ce 00eb | | Load_Encached Diana_Cache 01cf 1886 | | Execute Package,Field_Execute,Field_Number 0x86 01d0 e5ff | | Load 0x2,-0x1 01d1 00eb | | Load_Encached Diana_Cache 01d2 1886 | | Execute Package,Field_Execute,Field_Number 0x86 01d3 820f | | Call 0x1,0xf 01d4 00d1 | | Pop_Control Pop_Count_1 01d5 e5fd | | Load 0x2,-0x3 ; Debug Table 0x4.0x6 = 0x1d5,0x7 01d6 e5fe | | Load 0x2,-0x2 01d7 00eb | | Load_Encached Diana_Cache 01d8 1887 | | Execute Package,Field_Execute,Field_Number 0x87 01d9 e5ff | | Load 0x2,-0x1 01da 00eb | | Load_Encached Diana_Cache 01db 1887 | | Execute Package,Field_Execute,Field_Number 0x87 01dc 820f | | Call 0x1,0xf 01dd 00d1 | | Pop_Control Pop_Count_1 01de 7809 |x | Jump 0x1e8 01df e5fd | | Load 0x2,-0x3 ; Debug Table 0x4.0x7 = 0x1df,0x8 01e0 e5fe | | Load 0x2,-0x2 01e1 00eb | | Load_Encached Diana_Cache 01e2 1888 | | Execute Package,Field_Execute,Field_Number 0x88 01e3 e5ff | | Load 0x2,-0x1 01e4 00eb | | Load_Encached Diana_Cache 01e5 1888 | | Execute Package,Field_Execute,Field_Number 0x88 01e6 8213 | | Call 0x1,0x13 01e7 00d1 | | Pop_Control Pop_Count_1 01e8 00da | | Load_Top At_Offset_2 ; Debug Table 0x4.0x8 = 0x1e8,0xa 01e9 00eb | | Load_Encached Diana_Cache 01ea 1814 | | Execute Package,Field_Execute,Field_Number 0x14 01eb 46ad |F | Jump_Case 0xae 01ec 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x0 01ed 78ac |x | Jump 0x29a ; case 0x1 01ee 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x2 01ef 78aa |x | Jump 0x29a ; case 0x3 01f0 78a9 |x | Jump 0x29a ; case 0x4 01f1 78a8 |x | Jump 0x29a ; case 0x5 01f2 78a7 |x | Jump 0x29a ; case 0x6 01f3 78a6 |x | Jump 0x29a ; case 0x7 01f4 78a5 |x | Jump 0x29a ; case 0x8 01f5 78a4 |x | Jump 0x29a ; case 0x9 01f6 78a3 |x | Jump 0x29a ; case 0xa 01f7 78a2 |x | Jump 0x29a ; case 0xb 01f8 78a1 |x | Jump 0x29a ; case 0xc 01f9 78a0 |x | Jump 0x29a ; case 0xd 01fa 789f |x | Jump 0x29a ; case 0xe 01fb 789e |x | Jump 0x29a ; case 0xf 01fc 789d |x | Jump 0x29a ; case 0x10 01fd 789c |x | Jump 0x29a ; case 0x11 01fe 789b |x | Jump 0x29a ; case 0x12 01ff 789a |x | Jump 0x29a ; case 0x13 0200 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x14 0201 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x15 0202 7897 |x | Jump 0x29a ; case 0x16 0203 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x17 0204 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x18 0205 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x19 0206 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x1a 0207 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x1b 0208 7891 |x | Jump 0x29a ; case 0x1c 0209 7890 |x | Jump 0x29a ; case 0x1d 020a 788f |x | Jump 0x29a ; case 0x1e 020b 788e |x | Jump 0x29a ; case 0x1f 020c 788d |x | Jump 0x29a ; case 0x20 020d 788c |x | Jump 0x29a ; case 0x21 020e 788b |x | Jump 0x29a ; case 0x22 020f 788a |x | Jump 0x29a ; case 0x23 0210 7889 |x | Jump 0x29a ; case 0x24 0211 7888 |x | Jump 0x29a ; case 0x25 0212 7887 |x | Jump 0x29a ; case 0x26 0213 7886 |x | Jump 0x29a ; case 0x27 0214 7885 |x | Jump 0x29a ; case 0x28 0215 7884 |x | Jump 0x29a ; case 0x29 0216 7883 |x | Jump 0x29a ; case 0x2a 0217 7882 |x | Jump 0x29a ; case 0x2b 0218 7881 |x | Jump 0x29a ; case 0x2c 0219 7880 |x | Jump 0x29a ; case 0x2d 021a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x2e 021b 787e |x~ | Jump 0x29a ; case 0x2f 021c 787d |x} | Jump 0x29a ; case 0x30 021d 787c |x| | Jump 0x29a ; case 0x31 021e 787b |x{ | Jump 0x29a ; case 0x32 021f 787a |xz | Jump 0x29a ; case 0x33 0220 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x34 0221 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x35 0222 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x36 0223 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x37 0224 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x38 0225 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x39 0226 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x3a 0227 7872 |xr | Jump 0x29a ; case 0x3b 0228 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x3c 0229 7870 |xp | Jump 0x29a ; case 0x3d 022a 786f |xo | Jump 0x29a ; case 0x3e 022b 786e |xn | Jump 0x29a ; case 0x3f 022c 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x40 022d 786c |xl | Jump 0x29a ; case 0x41 022e 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x42 022f 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x43 0230 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x44 0231 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x45 0232 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x46 0233 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x47 0234 7865 |xe | Jump 0x29a ; case 0x48 0235 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x49 0236 7863 |xc | Jump 0x29a ; case 0x4a 0237 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x4b 0238 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x4c 0239 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x4d 023a 785f |x_ | Jump 0x29a ; case 0x4e 023b 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x4f 023c 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x50 023d 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x51 023e 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x52 023f 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x53 0240 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x54 0241 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x55 0242 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x56 0243 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x57 0244 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x58 0245 7854 |xT | Jump 0x29a ; case 0x59 0246 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x5a 0247 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x5b 0248 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x5c 0249 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x5d 024a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x5e 024b 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x5f 024c 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x60 024d 784c |xL | Jump 0x29a ; case 0x61 024e 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x62 024f 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x63 0250 7849 |xI | Jump 0x29a ; case 0x64 0251 7848 |xH | Jump 0x29a ; case 0x65 0252 7847 |xG | Jump 0x29a ; case 0x66 0253 7846 |xF | Jump 0x29a ; case 0x67 0254 7845 |xE | Jump 0x29a ; case 0x68 0255 7844 |xD | Jump 0x29a ; case 0x69 0256 7843 |xC | Jump 0x29a ; case 0x6a 0257 7842 |xB | Jump 0x29a ; case 0x6b 0258 7841 |xA | Jump 0x29a ; case 0x6c 0259 7840 |x@ | Jump 0x29a ; case 0x6d 025a 783f |x? | Jump 0x29a ; case 0x6e 025b 783e |x> | Jump 0x29a ; case 0x6f 025c 783d |x= | Jump 0x29a ; case 0x70 025d 783c |x< | Jump 0x29a ; case 0x71 025e 783b |x; | Jump 0x29a ; case 0x72 025f 783a |x: | Jump 0x29a ; case 0x73 0260 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x74 0261 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x75 0262 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x76 0263 7836 |x6 | Jump 0x29a ; case 0x77 0264 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x78 0265 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x79 0266 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x7a 0267 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x7b 0268 7831 |x1 | Jump 0x29a ; case 0x7c 0269 7830 |x0 | Jump 0x29a ; case 0x7d 026a 782f |x/ | Jump 0x29a ; case 0x7e 026b 782e |x. | Jump 0x29a ; case 0x7f 026c 782d |x- | Jump 0x29a ; case 0x80 026d 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x81 026e 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x82 026f 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x83 0270 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x84 0271 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x85 0272 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x86 0273 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x87 0274 7825 |x% | Jump 0x29a ; case 0x88 0275 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x89 0276 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x8a 0277 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x8b 0278 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x8c 0279 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x8d 027a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x8e 027b 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x8f 027c 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x90 027d 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x91 027e 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x92 027f 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x93 0280 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x94 0281 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x95 0282 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x96 0283 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x97 0284 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x98 0285 7814 |x | Jump 0x29a ; case 0x99 0286 7813 |x | Jump 0x29a ; case 0x9a 0287 7812 |x | Jump 0x29a ; case 0x9b 0288 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x9c 0289 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x9d 028a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x9e 028b 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x9f 028c 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0xa0 028d 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0xa1 028e 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0xa2 028f 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0xa3 0290 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0xa4 0291 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0xa5 0292 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0xa6 0293 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0xa7 0294 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0xa8 0295 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0xa9 0296 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0xaa 0297 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0xab 0298 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0xac 0299 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0xad 029a e5fd | | Load 0x2,-0x3 ; Debug Table 0x4.0x9 = 0x29a,0xb 029b e5fe | | Load 0x2,-0x2 029c e5ff | | Load 0x2,-0x1 029d 8001 | | Call 0x0,0x1 029e 00d1 | | Pop_Control Pop_Count_1 029f 4503 |E | Exit_Suprogram New_Top_Offset 0x3 02a0 ; -------------------------------------------------------------------------------------- 02a0 ; SUBPROGRAM 02a0 ; -------------------------------------------------------------------------------------- 02a0 02ab | | .CONST 0x02ab ; Address of begin 02a1 0004 | | .CONST 0x0004 ; Address of exception handler 02a2 0004 | | .CONST 0x0004 ; Number of locals 02a3 INIT_02a0: 02a3 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x5 = .DEBUG 0x02a3,0x040e,0x0001,0x0000,0x0059,0x9155,0x0000,0x001c ; Debug Table 0x5.0x0 = 0x2a3,0xffff 02a4 00eb | | Load_Encached Diana_Cache 02a5 1857 | W | Execute Package,Field_Execute,Field_Number 0x57 02a6 0031 | 1 | Store_Top Heap_Access,At_Offset_1 02a7 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x5.0x1 = 0x2a7,0xfffe 02a8 e5ff | | Load 0x2,-0x1 02a9 0031 | 1 | Store_Top Heap_Access,At_Offset_1 02aa 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x5.0x2 = 0x2aa,0xfffd 02ab BODY_02a0: 02ab 00cf | | Action Mark_Auxiliary 02ac 7814 |x | Jump 0x2c1 02ad e5fd | | Load 0x2,-0x3 ; Debug Table 0x5.0x3 = 0x2ad,0x2 02ae 00ec | | Load_Encached Diana_Tree_Cache 02af e403 | | Load 0x2,0x3 02b0 00eb | | Load_Encached Diana_Cache 02b1 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59 02b2 820d | | Call 0x1,0xd 02b3 0033 | 3 | Store_Top Heap_Access,At_Offset_3 02b4 00d1 | | Pop_Control Pop_Count_1 02b5 00db | | Load_Top At_Offset_3 ; Debug Table 0x5.0x4 = 0x2b5,0x3 02b6 00da | | Load_Top At_Offset_2 02b7 4975 |Iu | Short_Literal 0x175 02b8 00eb | | Load_Encached Diana_Cache 02b9 0098 | | Execute Package,Field_Read_Dynamic 02ba 181c | | Execute Package,Field_Execute,Field_Number 0x1c 02bb c402 | | Store 0x2,0x2 02bc 00da | | Load_Top At_Offset_2 ; Debug Table 0x5.0x5 = 0x2bc,0x4 02bd 00eb | | Load_Encached Diana_Cache 02be 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a 02bf 0033 | 3 | Store_Top Heap_Access,At_Offset_3 02c0 00c9 | | Action Pop_Auxiliary_Loop 02c1 00da | | Load_Top At_Offset_2 ; Debug Table 0x5.0x6 = 0x2c1,0x1 02c2 00eb | | Load_Encached Diana_Cache 02c3 1858 | X | Execute Package,Field_Execute,Field_Number 0x58 02c4 6fe8 |o | Jump_Zero 0x2ad 02c5 00ce | | Action Pop_Auxiliary 02c6 00da | | Load_Top At_Offset_2 ; Debug Table 0x5.0x7 = 0x2c6,0x5 02c7 a5fe | | Store_Unchecked 0x2,-0x2 02c8 4502 |E | Exit_Suprogram New_Top_Offset 0x2 02c9 0000 0000 | | .BLANK 0000[0x7] 02d0 ; -------------------------------------------------------------------------------------- 02d0 ; SUBPROGRAM 02d0 ; -------------------------------------------------------------------------------------- 02d0 02db | | .CONST 0x02db ; Address of begin 02d1 0004 | | .CONST 0x0004 ; Address of exception handler 02d2 0002 | | .CONST 0x0002 ; Number of locals 02d3 INIT_02d0: 02d3 00eb | | Load_Encached Diana_Cache ; Debug Table 0x6 = .DEBUG 0x02d3,0x0420,0x0001,0x0000,0x0059,0x9155,0x0000,0x0078 ; Debug Table 0x6.0x0 = 0x2d3,0xffff 02d4 1b96 | | Execute Package,Field_Read,Field_Number 0x96 02d5 0322 | " | Declare_Variable Record 02d6 00db | | Load_Top At_Offset_3 02d7 00eb | | Load_Encached Diana_Cache 02d8 18f5 | | Execute Package,Field_Execute,Field_Number 0xf5 02d9 00d9 | | Load_Top At_Offset_1 02da 017d | } | Execute Record,Structure_Write 02db BODY_02d0: 02db 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x1 = 0x2db,0x1 02dc 00eb | | Load_Encached Diana_Cache 02dd 1898 | | Execute Package,Field_Execute,Field_Number 0x98 02de 4603 |F | Jump_Case 0x4 02df 7803 |x | Jump 0x2e3 ; case 0x0 02e0 7802 |x | Jump 0x2e3 ; case 0x1 02e1 7806 |x | Jump 0x2e8 ; case 0x2 02e2 7800 |x | Jump 0x2e3 ; case 0x3 02e3 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x2 = 0x2e3,0x3 02e4 e5fe | | Load 0x2,-0x2 02e5 4954 |IT | Short_Literal 0x154 02e6 00eb | | Load_Encached Diana_Cache 02e7 0096 | | Execute Package,Entry 02e8 00db | | Load_Top At_Offset_3 ; Debug Table 0x6.0x3 = 0x2e8,0x4 02e9 e002 | | Load 0x0,0x2 02ea 1811 | | Execute Package,Field_Execute,Field_Number 0x11 02eb 6806 |h | Jump_Zero 0x2f2 02ec 00db | | Load_Top At_Offset_3 ; Debug Table 0x6.0x4 = 0x2ec,0x5 02ed e002 | | Load 0x0,0x2 02ee 1812 | | Execute Package,Field_Execute,Field_Number 0x12 02ef e5fe | | Load 0x2,-0x2 02f0 e002 | | Load 0x0,0x2 02f1 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02f2 4503 |E | Exit_Suprogram New_Top_Offset 0x3 02f3 0000 0000 | | .BLANK 0000[0x5] 02f8 ; -------------------------------------------------------------------------------------- 02f8 ; SUBPROGRAM 02f8 ; -------------------------------------------------------------------------------------- 02f8 0302 | | .CONST 0x0302 ; Address of begin 02f9 0004 | | .CONST 0x0004 ; Address of exception handler 02fa 0004 | | .CONST 0x0004 ; Number of locals 02fb INIT_02f8: 02fb 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x7 = .DEBUG 0x02fb,0x042c,0x0001,0x0000,0x0059,0x9155,0x0000,0x00c3 ; Debug Table 0x7.0x0 = 0x2fb,0xffff 02fc 00db | | Load_Top At_Offset_3 02fd 00eb | | Load_Encached Diana_Cache 02fe 18b6 | | Execute Package,Field_Execute,Field_Number 0xb6 02ff 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0300 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x7.0x1 = 0x300,0xfffe 0301 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x7.0x2 = 0x301,0xfffd 0302 BODY_02f8: 0302 00da | | Load_Top At_Offset_2 ; Debug Table 0x7.0x3 = 0x302,0x1 0303 00eb | | Load_Encached Diana_Cache 0304 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0305 0f77 | w | Execute_Immediate Equal,0x77 0306 6814 |h | Jump_Zero 0x31b 0307 e5fd | | Load 0x2,-0x3 ; Debug Table 0x7.0x4 = 0x307,0x2 0308 e5ff | | Load 0x2,-0x1 0309 8003 | | Call 0x0,0x3 030a 0031 | 1 | Store_Top Heap_Access,At_Offset_1 030b e5fd | | Load 0x2,-0x3 ; Debug Table 0x7.0x5 = 0x30b,0x3 030c 00ec | | Load_Encached Diana_Tree_Cache 030d 00da | | Load_Top At_Offset_2 030e 820d | | Call 0x1,0xd 030f 0033 | 3 | Store_Top Heap_Access,At_Offset_3 0310 00d1 | | Pop_Control Pop_Count_1 0311 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x7.0x6 = 0x311,0x4 0312 e5fe | | Load 0x2,-0x2 0313 4917 |I | Short_Literal 0x117 0314 00eb | | Load_Encached Diana_Cache 0315 0096 | | Execute Package,Entry 0316 e5fd | | Load 0x2,-0x3 ; Debug Table 0x7.0x7 = 0x316,0x5 0317 00da | | Load_Top At_Offset_2 0318 00da | | Load_Top At_Offset_2 0319 8001 | | Call 0x0,0x1 031a 00d1 | | Pop_Control Pop_Count_1 031b 4503 |E | Exit_Suprogram New_Top_Offset 0x3 031c 0000 0000 | | .BLANK 0000[0x4] 0320 ; -------------------------------------------------------------------------------------- 0320 ; SUBPROGRAM 0320 ; -------------------------------------------------------------------------------------- 0320 0329 | ) | .CONST 0x0329 ; Address of begin 0321 0004 | | .CONST 0x0004 ; Address of exception handler 0322 0003 | | .CONST 0x0003 ; Number of locals 0323 INIT_0320: 0323 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x8 = .DEBUG 0x0323,0x043e,0x0001,0x0000,0x0059,0x9155,0x0000,0x03a3 ; Debug Table 0x8.0x0 = 0x323,0xffff 0324 00db | | Load_Top At_Offset_3 0325 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0326 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x8.0x1 = 0x326,0xfffe 0327 e5fe | | Load 0x2,-0x2 0328 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0329 BODY_0320: 0329 00cf | | Action Mark_Auxiliary 032a 7812 |x | Jump 0x33d 032b e5fd | | Load 0x2,-0x3 ; Debug Table 0x8.0x2 = 0x32b,0x2 032c 00da | | Load_Top At_Offset_2 032d 00eb | | Load_Encached Diana_Cache 032e 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59 032f e402 | | Load 0x2,0x2 0330 00eb | | Load_Encached Diana_Cache 0331 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59 0332 820f | | Call 0x1,0xf 0333 00d1 | | Pop_Control Pop_Count_1 0334 00da | | Load_Top At_Offset_2 ; Debug Table 0x8.0x3 = 0x334,0x3 0335 00eb | | Load_Encached Diana_Cache 0336 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a 0337 0033 | 3 | Store_Top Heap_Access,At_Offset_3 0338 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x8.0x4 = 0x338,0x4 0339 00eb | | Load_Encached Diana_Cache 033a 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a 033b 0032 | 2 | Store_Top Heap_Access,At_Offset_2 033c 00c9 | | Action Pop_Auxiliary_Loop 033d 00da | | Load_Top At_Offset_2 ; Debug Table 0x8.0x5 = 0x33d,0x1 033e 00eb | | Load_Encached Diana_Cache 033f 1858 | X | Execute Package,Field_Execute,Field_Number 0x58 0340 6fea |o | Jump_Zero 0x32b 0341 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0342 0000 0000 | | .BLANK 0000[0x6] 0348 ; -------------------------------------------------------------------------------------- 0348 ; Debug Table 0348 ; -------------------------------------------------------------------------------------- 0348 0003 0009 | | .CONST 0x0003,0x0009 034a 000b 0392 | | .DEBUG 0x000b,0x0392,0x0000,0x0000,0x0059,0x9145,0x0000,0x003a 0352 0010 0398 | | .DEBUG 0x0010,0x0398,0x0000,0x0000,0x0059,0x9155,0x0000,0x0006 035a 002b 03ac | + | .DEBUG 0x002b,0x03ac,0x0001,0x0000,0x0059,0x9145,0x0000,0x003b 0362 0193 03f4 | | .DEBUG 0x0193,0x03f4,0x0001,0x0000,0x0059,0x9145,0x0000,0x004f 036a 019b 03f8 | | .DEBUG 0x019b,0x03f8,0x0001,0x0000,0x0059,0x9155,0x0000,0x000d 0372 02a3 040e | | .DEBUG 0x02a3,0x040e,0x0001,0x0000,0x0059,0x9155,0x0000,0x001c 037a 02d3 0420 | | .DEBUG 0x02d3,0x0420,0x0001,0x0000,0x0059,0x9155,0x0000,0x0078 0382 02fb 042c | ,| .DEBUG 0x02fb,0x042c,0x0001,0x0000,0x0059,0x9155,0x0000,0x00c3 038a 0323 043e | # >| .DEBUG 0x0323,0x043e,0x0001,0x0000,0x0059,0x9155,0x0000,0x03a3 0392 ; -------------------------------------------------------------------------------------- 0392 ; Debug3 Subtable 0x0 0392 ; -------------------------------------------------------------------------------------- 0392 0002 0000 | | .DBG3TAB 0x0002,0x0000 0394 000b ffff | | .CONST 0x000b,0xffff 0396 000d fffe | | .CONST 0x000d,0xfffe 0398 ; -------------------------------------------------------------------------------------- 0398 ; Debug3 Subtable 0x1 0398 ; -------------------------------------------------------------------------------------- 0398 0009 0000 | | .DBG3TAB 0x0009,0x0000 039a 0010 ffff | | .CONST 0x0010,0xffff 039c 0011 fffe | | .CONST 0x0011,0xfffe 039e 0013 fffd | | .CONST 0x0013,0xfffd 03a0 0015 fffc | | .CONST 0x0015,0xfffc 03a2 0017 fffb | | .CONST 0x0017,0xfffb 03a4 0019 fffa | | .CONST 0x0019,0xfffa 03a6 001b fff9 | | .CONST 0x001b,0xfff9 03a8 001d fff8 | | .CONST 0x001d,0xfff8 03aa 001f fff7 | | .CONST 0x001f,0xfff7 03ac ; -------------------------------------------------------------------------------------- 03ac ; Debug3 Subtable 0x2 03ac ; -------------------------------------------------------------------------------------- 03ac 0006 001d | | .DBG3TAB 0x0006,0x001d 03ae 002b ffff | + | .CONST 0x002b,0xffff 03b0 0031 fffe | 1 | .CONST 0x0031,0xfffe 03b2 0032 fffd | 2 | .CONST 0x0032,0xfffd 03b4 0033 fffc | 3 | .CONST 0x0033,0xfffc 03b6 0034 fffb | 4 | .CONST 0x0034,0xfffb 03b8 0035 fffa | 5 | .CONST 0x0035,0xfffa 03ba 0036 0001 | 6 | .CONST 0x0036,0x0001 03bc 003f 0002 | ? | .CONST 0x003f,0x0002 03be 0043 0003 | C | .CONST 0x0043,0x0003 03c0 0047 0004 | G | .CONST 0x0047,0x0004 03c2 004b 0005 | K | .CONST 0x004b,0x0005 03c4 0053 0006 | S | .CONST 0x0053,0x0006 03c6 0056 0007 | V | .CONST 0x0056,0x0007 03c8 005d 0008 | ] | .CONST 0x005d,0x0008 03ca 0062 0009 | b | .CONST 0x0062,0x0009 03cc 006a 000a | j | .CONST 0x006a,0x000a 03ce 0070 000b | p | .CONST 0x0070,0x000b 03d0 0078 000c | x | .CONST 0x0078,0x000c 03d2 0080 000d | | .CONST 0x0080,0x000d 03d4 0087 000e | | .CONST 0x0087,0x000e 03d6 008f 000f | | .CONST 0x008f,0x000f 03d8 0097 0010 | | .CONST 0x0097,0x0010 03da 009f 0011 | | .CONST 0x009f,0x0011 03dc 00a7 0012 | | .CONST 0x00a7,0x0012 03de 00af 0013 | | .CONST 0x00af,0x0013 03e0 00b4 0014 | | .CONST 0x00b4,0x0014 03e2 00b7 0015 | | .CONST 0x00b7,0x0015 03e4 00bd 0016 | | .CONST 0x00bd,0x0016 03e6 016d 0017 | m | .CONST 0x016d,0x0017 03e8 0173 0018 | s | .CONST 0x0173,0x0018 03ea 0178 0019 | x | .CONST 0x0178,0x0019 03ec 017e 001a | ~ | .CONST 0x017e,0x001a 03ee 0184 001b | | .CONST 0x0184,0x001b 03f0 0187 001c | | .CONST 0x0187,0x001c 03f2 018c 001e | | .CONST 0x018c,0x001e 03f4 ; -------------------------------------------------------------------------------------- 03f4 ; Debug3 Subtable 0x3 03f4 ; -------------------------------------------------------------------------------------- 03f4 0000 0001 | | .DBG3TAB 0x0000,0x0001 03f6 0193 0001 | | .CONST 0x0193,0x0001 03f8 ; -------------------------------------------------------------------------------------- 03f8 ; Debug3 Subtable 0x4 03f8 ; -------------------------------------------------------------------------------------- 03f8 0000 000a | | .DBG3TAB 0x0000,0x000a 03fa 019b 0001 | | .CONST 0x019b,0x0001 03fc 01a6 0002 | | .CONST 0x01a6,0x0002 03fe 01b0 0003 | | .CONST 0x01b0,0x0003 0400 01b9 0004 | | .CONST 0x01b9,0x0004 0402 01c3 0005 | | .CONST 0x01c3,0x0005 0404 01cc 0006 | | .CONST 0x01cc,0x0006 0406 01d5 0007 | | .CONST 0x01d5,0x0007 0408 01df 0008 | | .CONST 0x01df,0x0008 040a 01e8 000a | | .CONST 0x01e8,0x000a 040c 029a 000b | | .CONST 0x029a,0x000b 040e ; -------------------------------------------------------------------------------------- 040e ; Debug3 Subtable 0x5 040e ; -------------------------------------------------------------------------------------- 040e 0003 0005 | | .DBG3TAB 0x0003,0x0005 0410 02a3 ffff | | .CONST 0x02a3,0xffff 0412 02a7 fffe | | .CONST 0x02a7,0xfffe 0414 02aa fffd | | .CONST 0x02aa,0xfffd 0416 02ad 0002 | | .CONST 0x02ad,0x0002 0418 02b5 0003 | | .CONST 0x02b5,0x0003 041a 02bc 0004 | | .CONST 0x02bc,0x0004 041c 02c1 0001 | | .CONST 0x02c1,0x0001 041e 02c6 0005 | | .CONST 0x02c6,0x0005 0420 ; -------------------------------------------------------------------------------------- 0420 ; Debug3 Subtable 0x6 0420 ; -------------------------------------------------------------------------------------- 0420 0001 0004 | | .DBG3TAB 0x0001,0x0004 0422 02d3 ffff | | .CONST 0x02d3,0xffff 0424 02db 0001 | | .CONST 0x02db,0x0001 0426 02e3 0003 | | .CONST 0x02e3,0x0003 0428 02e8 0004 | | .CONST 0x02e8,0x0004 042a 02ec 0005 | | .CONST 0x02ec,0x0005 042c ; -------------------------------------------------------------------------------------- 042c ; Debug3 Subtable 0x7 042c ; -------------------------------------------------------------------------------------- 042c 0003 0005 | | .DBG3TAB 0x0003,0x0005 042e 02fb ffff | | .CONST 0x02fb,0xffff 0430 0300 fffe | | .CONST 0x0300,0xfffe 0432 0301 fffd | | .CONST 0x0301,0xfffd 0434 0302 0001 | | .CONST 0x0302,0x0001 0436 0307 0002 | | .CONST 0x0307,0x0002 0438 030b 0003 | | .CONST 0x030b,0x0003 043a 0311 0004 | | .CONST 0x0311,0x0004 043c 0316 0005 | | .CONST 0x0316,0x0005 043e ; -------------------------------------------------------------------------------------- 043e ; Debug3 Subtable 0x8 043e ; -------------------------------------------------------------------------------------- 043e 0002 0004 | | .DBG3TAB 0x0002,0x0004 0440 0323 ffff | # | .CONST 0x0323,0xffff 0442 0326 fffe | & | .CONST 0x0326,0xfffe 0444 032b 0002 | + | .CONST 0x032b,0x0002 0446 0334 0003 | 4 | .CONST 0x0334,0x0003 0448 0338 0004 | 8 | .CONST 0x0338,0x0004 044a 033d 0001 | = | .CONST 0x033d,0x0001 044c 0000 0000 | | .BLANK 0000[0x1b4]