|
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 - metrics - download
Length: 3072 (0xc00)
Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0340e4
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─⟦cfc2e13cd⟧ »Space Info Vol 2«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5900 |Y | .CONST 0x5900 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 04e8 | | .CONST 0x04e8 ; 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 0033 | 3 | .CONST 0x0033 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 000a | | .CONST 0x000a ; Number of locals
000b INIT_0008:
000b e00d | | Load 0x0,0xd
000c 1b32 | 2 | Execute Package,Field_Read,Field_Number 0x32
000d 0322 | " | Declare_Variable Record
000e 00d8 | | Load_Top At_Offset_0
000f 1c00 | | Execute_Immediate Run_Utility,0x0
0010 e00d | | Load 0x0,0xd
0011 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
0012 0322 | " | Declare_Variable Record
0013 00d8 | | Load_Top At_Offset_0
0014 1c00 | | Execute_Immediate Run_Utility,0x0
0015 e00d | | Load 0x0,0xd
0016 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
0017 02c7 | | Declare_Variable Any
0018 00d8 | | Load_Top At_Offset_0
0019 1c00 | | Execute_Immediate Run_Utility,0x0
001a e00d | | Load 0x0,0xd
001b 1b10 | | Execute Package,Field_Read,Field_Number 0x10
001c 0322 | " | Declare_Variable Record
001d 00d8 | | Load_Top At_Offset_0
001e 1c00 | | Execute_Immediate Run_Utility,0x0
001f e00d | | Load 0x0,0xd
0020 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0021 02c7 | | Declare_Variable Any
0022 00d8 | | Load_Top At_Offset_0
0023 1c00 | | Execute_Immediate Run_Utility,0x0
0024 e00f | | Load 0x0,0xf
0025 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0026 02c7 | | Declare_Variable Any
0027 00d8 | | Load_Top At_Offset_0
0028 1c00 | | Execute_Immediate Run_Utility,0x0
0029 e00f | | Load 0x0,0xf
002a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
002b 02c7 | | Declare_Variable Any
002c 00d8 | | Load_Top At_Offset_0
002d 1c00 | | Execute_Immediate Run_Utility,0x0
002e e5fe | | Load 0x2,-0x2
002f e013 | | Load 0x0,0x13
0030 180d | | Execute Package,Field_Execute,Field_Number 0xd
0031 029f 0323 | #| Declare_Subprogram For_Call,INIT_0320
0033 BODY_0008:
0033 4800 |H | Short_Literal 0x0
0034 0092 0335 | 5| Action Push_String_Extended,0x335 ; "Rpc"
0036 e00e | | Load 0x0,0xe
0037 180d | | Execute Package,Field_Execute,Field_Number 0xd
0038 840a | | Call 0x2,0xa
0039 4800 |H | Short_Literal 0x0
003a 0092 0336 | 6| Action Push_String_Extended,0x336 ; "Rpc_Server"
003c e00e | | Load 0x0,0xe
003d 180d | | Execute Package,Field_Execute,Field_Number 0xd
003e 840a | | Call 0x2,0xa
003f 4800 |H | Short_Literal 0x0
0040 0092 0337 | 7| Action Push_String_Extended,0x337 ; "Transport_Stream"
0042 e00e | | Load 0x0,0xe
0043 180d | | Execute Package,Field_Execute,Field_Number 0xd
0044 840a | | Call 0x2,0xa
0045 4800 |H | Short_Literal 0x0
0046 0092 0338 | 8| Action Push_String_Extended,0x338 ; "Transport_Interchange"
0048 e00e | | Load 0x0,0xe
0049 180d | | Execute Package,Field_Execute,Field_Number 0xd
004a 840a | | Call 0x2,0xa
004b 4800 |H | Short_Literal 0x0
004c e5fe | | Load 0x2,-0x2
004d e013 | | Load 0x0,0x13
004e 180f | | Execute Package,Field_Execute,Field_Number 0xf
004f e00e | | Load 0x0,0xe
0050 180d | | Execute Package,Field_Execute,Field_Number 0xd
0051 840a | | Call 0x2,0xa
0052 4800 |H | Short_Literal 0x0
0053 0092 0339 | 9| Action Push_String_Extended,0x339 ; "Interchange"
0055 e00e | | Load 0x0,0xe
0056 180d | | Execute Package,Field_Execute,Field_Number 0xd
0057 840a | | Call 0x2,0xa
0058 4800 |H | Short_Literal 0x0
0059 e5fe | | Load 0x2,-0x2
005a e00e | | Load 0x0,0xe
005b 180d | | Execute Package,Field_Execute,Field_Number 0xd
005c 840a | | Call 0x2,0xa
005d e405 | | Load 0x2,0x5
005e e5ff | | Load 0x2,-0x1
005f e00d | | Load 0x0,0xd
0060 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0061 00d1 | | Pop_Control Pop_Count_1
0062 00cf | | Action Mark_Auxiliary
0063 780c |x | Jump 0x70
0064 4800 |H | Short_Literal 0x0
0065 e405 | | Load 0x2,0x5
0066 e00d | | Load 0x0,0xd
0067 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0068 e00e | | Load 0x0,0xe
0069 180d | | Execute Package,Field_Execute,Field_Number 0xd
006a 840a | | Call 0x2,0xa
006b e405 | | Load 0x2,0x5
006c e00d | | Load 0x0,0xd
006d 1815 | | Execute Package,Field_Execute,Field_Number 0x15
006e 00d1 | | Pop_Control Pop_Count_1
006f 00c9 | | Action Pop_Auxiliary_Loop
0070 e405 | | Load 0x2,0x5
0071 e00d | | Load 0x0,0xd
0072 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0073 6ff0 |o | Jump_Zero 0x64
0074 00ce | | Action Pop_Auxiliary
0075 4801 |H | Short_Literal 0x1
0076 4801 |H | Short_Literal 0x1
0077 e5fe | | Load 0x2,-0x2
0078 e013 | | Load 0x0,0x13
0079 180e | | Execute Package,Field_Execute,Field_Number 0xe
007a e00e | | Load 0x0,0xe
007b 180f | | Execute Package,Field_Execute,Field_Number 0xf
007c 840a | | Call 0x2,0xa
007d 4800 |H | Short_Literal 0x0
007e 0092 033a | :| Action Push_String_Extended,0x33a ; "Stream : Transport_Stream.Stream_Id; \x0aId : Rpc.Transaction_Id; \x0aVersion : Rpc.Version_Number; \x0aProc : Rpc.Procedure_Number"
0080 4801 |H | Short_Literal 0x1
0081 0092 033b | ;| Action Push_String_Extended,0x33b ; "Process_Call"
0083 e00e | | Load 0x0,0xe
0084 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0085 840a | | Call 0x2,0xa
0086 4800 |H | Short_Literal 0x0
0087 e00e | | Load 0x0,0xe
0088 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0089 840a | | Call 0x2,0xa
008a 4800 |H | Short_Literal 0x0
008b 0092 033c | <| Action Push_String_Extended,0x33c ; "Proc"
008d e00e | | Load 0x0,0xe
008e 181f | | Execute Package,Field_Execute,Field_Number 0x1f
008f 840a | | Call 0x2,0xa
0090 e402 | | Load 0x2,0x2
0091 e5ff | | Load 0x2,-0x1
0092 e00d | | Load 0x0,0xd
0093 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
0094 00d1 | | Pop_Control Pop_Count_1
0095 00cf | | Action Mark_Auxiliary
0096 79bf |y | Jump 0x256
0097 4800 |H | Short_Literal 0x0
0098 00db | | Load_Top At_Offset_3
0099 0092 033d | =| Action Push_String_Extended,0x33d ; ".Procedure_Number."
009b 01cc | | Execute Vector,Catenate
009c e402 | | Load 0x2,0x2
009d e00d | | Load 0x0,0xd
009e 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36
009f 01cc | | Execute Vector,Catenate
00a0 e00e | | Load 0x0,0xe
00a1 1820 | | Execute Package,Field_Execute,Field_Number 0x20
00a2 840a | | Call 0x2,0xa
00a3 4800 |H | Short_Literal 0x0
00a4 00ea | | Load_Encached Null_String_Cache
00a5 e00e | | Load 0x0,0xe
00a6 1817 | | Execute Package,Field_Execute,Field_Number 0x17
00a7 840a | | Call 0x2,0xa
00a8 e402 | | Load 0x2,0x2
00a9 e00d | | Load 0x0,0xd
00aa 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
00ab c404 | | Store 0x2,0x4
00ac 00cf | | Action Mark_Auxiliary
00ad 7872 |xr | Jump 0x120
00ae e404 | | Load 0x2,0x4
00af e00d | | Load 0x0,0xd
00b0 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
00b1 c408 | | Store 0x2,0x8
00b2 e404 | | Load 0x2,0x4
00b3 e00d | | Load 0x0,0xd
00b4 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
00b5 0f04 | | Execute_Immediate Equal,0x4
00b6 7064 |pd | Jump_Nonzero 0x11b
00b7 7800 |x | Jump 0xb8
00b8 e404 | | Load 0x2,0x4
00b9 e00d | | Load 0x0,0xd
00ba 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
00bb c406 | | Store 0x2,0x6
00bc e408 | | Load 0x2,0x8
00bd e214 | | Load 0x1,0x14
00be 180d | | Execute Package,Field_Execute,Field_Number 0xd
00bf 7026 |p& | Jump_Nonzero 0xe6
00c0 00cf | | Action Mark_Auxiliary
00c1 781e |x | Jump 0xe0
00c2 4800 |H | Short_Literal 0x0
00c3 4801 |H | Short_Literal 0x1
00c4 e408 | | Load 0x2,0x8
00c5 e5fe | | Load 0x2,-0x2
00c6 0092 033e | >| Action Push_String_Extended,0x33e ; "Stream"
00c8 e408 | | Load 0x2,0x8
00c9 e214 | | Load 0x1,0x14
00ca 1815 | | Execute Package,Field_Execute,Field_Number 0x15
00cb e406 | | Load 0x2,0x6
00cc e00d | | Load 0x0,0xd
00cd 1819 | | Execute Package,Field_Execute,Field_Number 0x19
00ce e214 | | Load 0x1,0x14
00cf 1816 | | Execute Package,Field_Execute,Field_Number 0x16
00d0 e404 | | Load 0x2,0x4
00d1 e00d | | Load 0x0,0xd
00d2 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
00d3 e00d | | Load 0x0,0xd
00d4 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
00d5 e406 | | Load 0x2,0x6
00d6 e00d | | Load 0x0,0xd
00d7 1819 | | Execute Package,Field_Execute,Field_Number 0x19
00d8 e00e | | Load 0x0,0xe
00d9 1815 | | Execute Package,Field_Execute,Field_Number 0x15
00da 840a | | Call 0x2,0xa
00db e406 | | Load 0x2,0x6
00dc e00d | | Load 0x0,0xd
00dd 181a | | Execute Package,Field_Execute,Field_Number 0x1a
00de c406 | | Store 0x2,0x6
00df 00c9 | | Action Pop_Auxiliary_Loop
00e0 e406 | | Load 0x2,0x6
00e1 e00d | | Load 0x0,0xd
00e2 1817 | | Execute Package,Field_Execute,Field_Number 0x17
00e3 6fde |o | Jump_Zero 0xc2
00e4 00ce | | Action Pop_Auxiliary
00e5 7835 |x5 | Jump 0x11b
00e6 00cf | | Action Mark_Auxiliary
00e7 782e |x. | Jump 0x116
00e8 4800 |H | Short_Literal 0x0
00e9 e404 | | Load 0x2,0x4
00ea e00d | | Load 0x0,0xd
00eb 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
00ec e00d | | Load 0x0,0xd
00ed 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
00ee e406 | | Load 0x2,0x6
00ef e00d | | Load 0x0,0xd
00f0 1819 | | Execute Package,Field_Execute,Field_Number 0x19
00f1 e00e | | Load 0x0,0xe
00f2 1814 | | Execute Package,Field_Execute,Field_Number 0x14
00f3 840a | | Call 0x2,0xa
00f4 e408 | | Load 0x2,0x8
00f5 e214 | | Load 0x1,0x14
00f6 180f | | Execute Package,Field_Execute,Field_Number 0xf
00f7 6819 |h | Jump_Zero 0x111
00f8 e404 | | Load 0x2,0x4
00f9 e00d | | Load 0x0,0xd
00fa 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
00fb 680a |h | Jump_Zero 0x106
00fc e404 | | Load 0x2,0x4
00fd e00d | | Load 0x0,0xd
00fe 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
00ff 0f03 | | Execute_Immediate Equal,0x3
0100 7005 |p | Jump_Nonzero 0x106
0101 e404 | | Load 0x2,0x4
0102 e00d | | Load 0x0,0xd
0103 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0104 0f01 | | Execute_Immediate Equal,0x1
0105 680b |h | Jump_Zero 0x111
0106 4800 |H | Short_Literal 0x0
0107 0092 033f | ?| Action Push_String_Extended,0x33f ; "Interchange.Duration"
0109 e406 | | Load 0x2,0x6
010a e00d | | Load 0x0,0xd
010b 1819 | | Execute Package,Field_Execute,Field_Number 0x19
010c e013 | | Load 0x0,0x13
010d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
010e e00e | | Load 0x0,0xe
010f 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0110 840a | | Call 0x2,0xa
0111 e406 | | Load 0x2,0x6
0112 e00d | | Load 0x0,0xd
0113 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0114 c406 | | Store 0x2,0x6
0115 00c9 | | Action Pop_Auxiliary_Loop
0116 e406 | | Load 0x2,0x6
0117 e00d | | Load 0x0,0xd
0118 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0119 6fce |o | Jump_Zero 0xe8
011a 00ce | | Action Pop_Auxiliary
011b e404 | | Load 0x2,0x4
011c e00d | | Load 0x0,0xd
011d 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
011e c404 | | Store 0x2,0x4
011f 00c9 | | Action Pop_Auxiliary_Loop
0120 e404 | | Load 0x2,0x4
0121 e00d | | Load 0x0,0xd
0122 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0123 6f8a |o | Jump_Zero 0xae
0124 00ce | | Action Pop_Auxiliary
0125 e402 | | Load 0x2,0x2
0126 e00d | | Load 0x0,0xd
0127 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0128 6812 |h | Jump_Zero 0x13b
0129 e402 | | Load 0x2,0x2
012a e00d | | Load 0x0,0xd
012b 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
012c c407 | | Store 0x2,0x7
012d e407 | | Load 0x2,0x7
012e e214 | | Load 0x1,0x14
012f 180d | | Execute Package,Field_Execute,Field_Number 0xd
0130 680a |h | Jump_Zero 0x13b
0131 4800 |H | Short_Literal 0x0
0132 e407 | | Load 0x2,0x7
0133 e00d | | Load 0x0,0xd
0134 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0135 e407 | | Load 0x2,0x7
0136 e214 | | Load 0x1,0x14
0137 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0138 e00e | | Load 0x0,0xe
0139 1814 | | Execute Package,Field_Execute,Field_Number 0x14
013a 840a | | Call 0x2,0xa
013b 4800 |H | Short_Literal 0x0
013c e00e | | Load 0x0,0xe
013d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
013e 840a | | Call 0x2,0xa
013f e402 | | Load 0x2,0x2
0140 e00d | | Load 0x0,0xd
0141 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
0142 c404 | | Store 0x2,0x4
0143 00cf | | Action Mark_Auxiliary
0144 7861 |xa | Jump 0x1a6
0145 e404 | | Load 0x2,0x4
0146 e00d | | Load 0x0,0xd
0147 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0148 c408 | | Store 0x2,0x8
0149 e404 | | Load 0x2,0x4
014a e00d | | Load 0x0,0xd
014b 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
014c 4604 |F | Jump_Case 0x4
014d 7804 |x | Jump 0x152 ; case 0x0
014e 7803 |x | Jump 0x152 ; case 0x1
014f 7851 |xQ | Jump 0x1a1 ; case 0x2
0150 7801 |x | Jump 0x152 ; case 0x3
0151 784f |xO | Jump 0x1a1 ; case 0x4
0152 e408 | | Load 0x2,0x8
0153 e214 | | Load 0x1,0x14
0154 180d | | Execute Package,Field_Execute,Field_Number 0xd
0155 684b |hK | Jump_Zero 0x1a1
0156 e404 | | Load 0x2,0x4
0157 e00d | | Load 0x0,0xd
0158 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
0159 c406 | | Store 0x2,0x6
015a 00cf | | Action Mark_Auxiliary
015b 7840 |x@ | Jump 0x19c
015c e408 | | Load 0x2,0x8
015d e214 | | Load 0x1,0x14
015e 180f | | Execute Package,Field_Execute,Field_Number 0xf
015f 6828 |h( | Jump_Zero 0x188
0160 4801 |H | Short_Literal 0x1
0161 4801 |H | Short_Literal 0x1
0162 e408 | | Load 0x2,0x8
0163 e5fe | | Load 0x2,-0x2
0164 0092 033e | >| Action Push_String_Extended,0x33e ; "Stream"
0166 e408 | | Load 0x2,0x8
0167 e214 | | Load 0x1,0x14
0168 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0169 e406 | | Load 0x2,0x6
016a e00d | | Load 0x0,0xd
016b 1819 | | Execute Package,Field_Execute,Field_Number 0x19
016c e013 | | Load 0x0,0x13
016d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
016e e214 | | Load 0x1,0x14
016f 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0170 840a | | Call 0x2,0xa
0171 4800 |H | Short_Literal 0x0
0172 e408 | | Load 0x2,0x8
0173 e214 | | Load 0x1,0x14
0174 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0175 0092 0340 | @| Action Push_String_Extended,0x340 ; "("
0177 01cc | | Execute Vector,Catenate
0178 e406 | | Load 0x2,0x6
0179 e00d | | Load 0x0,0xd
017a 1819 | | Execute Package,Field_Execute,Field_Number 0x19
017b e013 | | Load 0x0,0x13
017c 1810 | | Execute Package,Field_Execute,Field_Number 0x10
017d 01cc | | Execute Vector,Catenate
017e 0092 0341 | A| Action Push_String_Extended,0x341 ; ")"
0180 01cc | | Execute Vector,Catenate
0181 e406 | | Load 0x2,0x6
0182 e00d | | Load 0x0,0xd
0183 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0184 e00e | | Load 0x0,0xe
0185 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0186 840a | | Call 0x2,0xa
0187 780f |x | Jump 0x197
0188 4801 |H | Short_Literal 0x1
0189 4801 |H | Short_Literal 0x1
018a e408 | | Load 0x2,0x8
018b e5fe | | Load 0x2,-0x2
018c 0092 033e | >| Action Push_String_Extended,0x33e ; "Stream"
018e e408 | | Load 0x2,0x8
018f e214 | | Load 0x1,0x14
0190 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0191 e406 | | Load 0x2,0x6
0192 e00d | | Load 0x0,0xd
0193 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0194 e214 | | Load 0x1,0x14
0195 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0196 840a | | Call 0x2,0xa
0197 e406 | | Load 0x2,0x6
0198 e00d | | Load 0x0,0xd
0199 181a | | Execute Package,Field_Execute,Field_Number 0x1a
019a c406 | | Store 0x2,0x6
019b 00c9 | | Action Pop_Auxiliary_Loop
019c e406 | | Load 0x2,0x6
019d e00d | | Load 0x0,0xd
019e 1817 | | Execute Package,Field_Execute,Field_Number 0x17
019f 6fbc |o | Jump_Zero 0x15c
01a0 00ce | | Action Pop_Auxiliary
01a1 e404 | | Load 0x2,0x4
01a2 e00d | | Load 0x0,0xd
01a3 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
01a4 c404 | | Store 0x2,0x4
01a5 00c9 | | Action Pop_Auxiliary_Loop
01a6 e404 | | Load 0x2,0x4
01a7 e00d | | Load 0x0,0xd
01a8 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
01a9 6f9b |o | Jump_Zero 0x145
01aa 00ce | | Action Pop_Auxiliary
01ab e402 | | Load 0x2,0x2
01ac e00d | | Load 0x0,0xd
01ad 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
01ae c404 | | Store 0x2,0x4
01af e402 | | Load 0x2,0x2
01b0 e00d | | Load 0x0,0xd
01b1 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
01b2 6834 |h4 | Jump_Zero 0x1e7
01b3 e407 | | Load 0x2,0x7
01b4 e214 | | Load 0x1,0x14
01b5 180d | | Execute Package,Field_Execute,Field_Number 0xd
01b6 6812 |h | Jump_Zero 0x1c9
01b7 4800 |H | Short_Literal 0x0
01b8 e407 | | Load 0x2,0x7
01b9 e214 | | Load 0x1,0x14
01ba 1811 | | Execute Package,Field_Execute,Field_Number 0x11
01bb e404 | | Load 0x2,0x4
01bc 4802 |H | Short_Literal 0x2
01bd e402 | | Load 0x2,0x2
01be e00d | | Load 0x0,0xd
01bf 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
01c0 e215 | | Load 0x1,0x15
01c1 181d | | Execute Package,Field_Execute,Field_Number 0x1d
01c2 e407 | | Load 0x2,0x7
01c3 e214 | | Load 0x1,0x14
01c4 1811 | | Execute Package,Field_Execute,Field_Number 0x11
01c5 e00e | | Load 0x0,0xe
01c6 1816 | | Execute Package,Field_Execute,Field_Number 0x16
01c7 840a | | Call 0x2,0xa
01c8 7827 |x' | Jump 0x1f0
01c9 4800 |H | Short_Literal 0x0
01ca 00ea | | Load_Encached Null_String_Cache
01cb e00e | | Load 0x0,0xe
01cc 1817 | | Execute Package,Field_Execute,Field_Number 0x17
01cd 840a | | Call 0x2,0xa
01ce 4800 |H | Short_Literal 0x0
01cf e407 | | Load 0x2,0x7
01d0 e00d | | Load 0x0,0xd
01d1 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
01d2 e404 | | Load 0x2,0x4
01d3 4802 |H | Short_Literal 0x2
01d4 e402 | | Load 0x2,0x2
01d5 e00d | | Load 0x0,0xd
01d6 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
01d7 e215 | | Load 0x1,0x15
01d8 181d | | Execute Package,Field_Execute,Field_Number 0x1d
01d9 e407 | | Load 0x2,0x7
01da e00d | | Load 0x0,0xd
01db 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
01dc e407 | | Load 0x2,0x7
01dd e214 | | Load 0x1,0x14
01de 1811 | | Execute Package,Field_Execute,Field_Number 0x11
01df e00e | | Load 0x0,0xe
01e0 1815 | | Execute Package,Field_Execute,Field_Number 0x15
01e1 840a | | Call 0x2,0xa
01e2 4800 |H | Short_Literal 0x0
01e3 e00e | | Load 0x0,0xe
01e4 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01e5 840a | | Call 0x2,0xa
01e6 7809 |x | Jump 0x1f0
01e7 4801 |H | Short_Literal 0x1
01e8 e404 | | Load 0x2,0x4
01e9 4802 |H | Short_Literal 0x2
01ea e402 | | Load 0x2,0x2
01eb e00d | | Load 0x0,0xd
01ec 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
01ed e215 | | Load 0x1,0x15
01ee 181c | | Execute Package,Field_Execute,Field_Number 0x1c
01ef 840a | | Call 0x2,0xa
01f0 4801 |H | Short_Literal 0x1
01f1 0092 0342 | B| Action Push_String_Extended,0x342 ; "Rpc_Server.Begin_Response (Stream, Id);"
01f3 840a | | Call 0x2,0xa
01f4 e402 | | Load 0x2,0x2
01f5 e00d | | Load 0x0,0xd
01f6 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
01f7 6819 |h | Jump_Zero 0x211
01f8 4801 |H | Short_Literal 0x1
01f9 4800 |H | Short_Literal 0x0
01fa e407 | | Load 0x2,0x7
01fb e5fe | | Load 0x2,-0x2
01fc 0092 033e | >| Action Push_String_Extended,0x33e ; "Stream"
01fe e407 | | Load 0x2,0x7
01ff e214 | | Load 0x1,0x14
0200 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0201 e407 | | Load 0x2,0x7
0202 e214 | | Load 0x1,0x14
0203 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0204 e214 | | Load 0x1,0x14
0205 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0206 840a | | Call 0x2,0xa
0207 e407 | | Load 0x2,0x7
0208 e214 | | Load 0x1,0x14
0209 180d | | Execute Package,Field_Execute,Field_Number 0xd
020a 7041 |pA | Jump_Nonzero 0x24c
020b 4800 |H | Short_Literal 0x0
020c 00ea | | Load_Encached Null_String_Cache
020d e00e | | Load 0x0,0xe
020e 1819 | | Execute Package,Field_Execute,Field_Number 0x19
020f 840a | | Call 0x2,0xa
0210 783b |x; | Jump 0x24c
0211 e402 | | Load 0x2,0x2
0212 e00d | | Load 0x0,0xd
0213 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
0214 c404 | | Store 0x2,0x4
0215 00cf | | Action Mark_Auxiliary
0216 7830 |x0 | Jump 0x247
0217 e404 | | Load 0x2,0x4
0218 e00d | | Load 0x0,0xd
0219 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
021a c408 | | Store 0x2,0x8
021b e404 | | Load 0x2,0x4
021c e00d | | Load 0x0,0xd
021d 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
021e 4802 |H | Short_Literal 0x2
021f 4803 |H | Short_Literal 0x3
0220 0262 | b | Execute Discrete,In_Range
0221 7001 |p | Jump_Nonzero 0x223
0222 781f |x | Jump 0x242
0223 e404 | | Load 0x2,0x4
0224 e00d | | Load 0x0,0xd
0225 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
0226 c406 | | Store 0x2,0x6
0227 00cf | | Action Mark_Auxiliary
0228 7814 |x | Jump 0x23d
0229 4801 |H | Short_Literal 0x1
022a 4800 |H | Short_Literal 0x0
022b e408 | | Load 0x2,0x8
022c e5fe | | Load 0x2,-0x2
022d 0092 033e | >| Action Push_String_Extended,0x33e ; "Stream"
022f e408 | | Load 0x2,0x8
0230 e214 | | Load 0x1,0x14
0231 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0232 e406 | | Load 0x2,0x6
0233 e00d | | Load 0x0,0xd
0234 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0235 e214 | | Load 0x1,0x14
0236 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0237 840a | | Call 0x2,0xa
0238 e406 | | Load 0x2,0x6
0239 e00d | | Load 0x0,0xd
023a 181a | | Execute Package,Field_Execute,Field_Number 0x1a
023b c406 | | Store 0x2,0x6
023c 00c9 | | Action Pop_Auxiliary_Loop
023d e406 | | Load 0x2,0x6
023e e00d | | Load 0x0,0xd
023f 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0240 6fe8 |o | Jump_Zero 0x229
0241 00ce | | Action Pop_Auxiliary
0242 e404 | | Load 0x2,0x4
0243 e00d | | Load 0x0,0xd
0244 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
0245 c404 | | Store 0x2,0x4
0246 00c9 | | Action Pop_Auxiliary_Loop
0247 e404 | | Load 0x2,0x4
0248 e00d | | Load 0x0,0xd
0249 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
024a 6fcc |o | Jump_Zero 0x217
024b 00ce | | Action Pop_Auxiliary
024c 4800 |H | Short_Literal 0x0
024d 00ea | | Load_Encached Null_String_Cache
024e e00e | | Load 0x0,0xe
024f 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0250 840a | | Call 0x2,0xa
0251 e402 | | Load 0x2,0x2
0252 e00d | | Load 0x0,0xd
0253 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
0254 00d1 | | Pop_Control Pop_Count_1
0255 00c9 | | Action Pop_Auxiliary_Loop
0256 e402 | | Load 0x2,0x2
0257 e00d | | Load 0x0,0xd
0258 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
0259 6e3d |n= | Jump_Zero 0x97
025a 00ce | | Action Pop_Auxiliary
025b 4800 |H | Short_Literal 0x0
025c 0092 0343 | C| Action Push_String_Extended,0x343 ; "others"
025e e00e | | Load 0x0,0xe
025f 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0260 840a | | Call 0x2,0xa
0261 4800 |H | Short_Literal 0x0
0262 0092 0344 | D| Action Push_String_Extended,0x344 ; "Rpc.No_Such_Procedure"
0264 e00e | | Load 0x0,0xe
0265 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0266 840a | | Call 0x2,0xa
0267 4800 |H | Short_Literal 0x0
0268 e00e | | Load 0x0,0xe
0269 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
026a 840a | | Call 0x2,0xa
026b 4800 |H | Short_Literal 0x0
026c e00e | | Load 0x0,0xe
026d 181a | | Execute Package,Field_Execute,Field_Number 0x1a
026e 840a | | Call 0x2,0xa
026f 4800 |H | Short_Literal 0x0
0270 0092 0345 | E| Action Push_String_Extended,0x345 ; "Constraint_Error"
0272 e00e | | Load 0x0,0xe
0273 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0274 840a | | Call 0x2,0xa
0275 4802 |H | Short_Literal 0x2
0276 0092 0346 | F| Action Push_String_Extended,0x346 ; "Rpc_Server.Return_Exception (Stream, id, "
0278 00db | | Load_Top At_Offset_3
0279 01cc | | Execute Vector,Catenate
027a 0092 0347 | G| Action Push_String_Extended,0x347 ; ".Exception_Number.Constraint_Error);"
027c 01cc | | Execute Vector,Catenate
027d 840a | | Call 0x2,0xa
027e 4800 |H | Short_Literal 0x0
027f 0092 0348 | H| Action Push_String_Extended,0x348 ; "Numeric_Error"
0281 e00e | | Load 0x0,0xe
0282 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0283 840a | | Call 0x2,0xa
0284 4802 |H | Short_Literal 0x2
0285 0092 0346 | F| Action Push_String_Extended,0x346 ; "Rpc_Server.Return_Exception (Stream, id, "
0287 00db | | Load_Top At_Offset_3
0288 01cc | | Execute Vector,Catenate
0289 0092 0349 | I| Action Push_String_Extended,0x349 ; ".Exception_Number.Numeric_Error);"
028b 01cc | | Execute Vector,Catenate
028c 840a | | Call 0x2,0xa
028d 4800 |H | Short_Literal 0x0
028e 0092 034a | J| Action Push_String_Extended,0x34a ; "Program_Error"
0290 e00e | | Load 0x0,0xe
0291 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0292 840a | | Call 0x2,0xa
0293 4802 |H | Short_Literal 0x2
0294 0092 0346 | F| Action Push_String_Extended,0x346 ; "Rpc_Server.Return_Exception (Stream, id, "
0296 00db | | Load_Top At_Offset_3
0297 01cc | | Execute Vector,Catenate
0298 0092 034b | K| Action Push_String_Extended,0x34b ; ".Exception_Number.Program_Error);"
029a 01cc | | Execute Vector,Catenate
029b 840a | | Call 0x2,0xa
029c 4800 |H | Short_Literal 0x0
029d 0092 034c | L| Action Push_String_Extended,0x34c ; "Storage_Error"
029f e00e | | Load 0x0,0xe
02a0 1820 | | Execute Package,Field_Execute,Field_Number 0x20
02a1 840a | | Call 0x2,0xa
02a2 4802 |H | Short_Literal 0x2
02a3 0092 0346 | F| Action Push_String_Extended,0x346 ; "Rpc_Server.Return_Exception (Stream, id, "
02a5 00db | | Load_Top At_Offset_3
02a6 01cc | | Execute Vector,Catenate
02a7 0092 034d | M| Action Push_String_Extended,0x34d ; ".Exception_Number.Storage_Error);"
02a9 01cc | | Execute Vector,Catenate
02aa 840a | | Call 0x2,0xa
02ab 4800 |H | Short_Literal 0x0
02ac 0092 034e | N| Action Push_String_Extended,0x34e ; "Tasking_Error"
02ae e00e | | Load 0x0,0xe
02af 1820 | | Execute Package,Field_Execute,Field_Number 0x20
02b0 840a | | Call 0x2,0xa
02b1 4802 |H | Short_Literal 0x2
02b2 0092 0346 | F| Action Push_String_Extended,0x346 ; "Rpc_Server.Return_Exception (Stream, id, "
02b4 00db | | Load_Top At_Offset_3
02b5 01cc | | Execute Vector,Catenate
02b6 0092 034f | O| Action Push_String_Extended,0x34f ; ".Exception_Number.Tasking_Error);"
02b8 01cc | | Execute Vector,Catenate
02b9 840a | | Call 0x2,0xa
02ba e403 | | Load 0x2,0x3
02bb e5ff | | Load 0x2,-0x1
02bc e00d | | Load 0x0,0xd
02bd 181c | | Execute Package,Field_Execute,Field_Number 0x1c
02be 00d1 | | Pop_Control Pop_Count_1
02bf 00cf | | Action Mark_Auxiliary
02c0 7831 |x1 | Jump 0x2f2
02c1 e403 | | Load 0x2,0x3
02c2 e00d | | Load 0x0,0xd
02c3 181e | | Execute Package,Field_Execute,Field_Number 0x1e
02c4 c406 | | Store 0x2,0x6
02c5 00cf | | Action Mark_Auxiliary
02c6 7821 |x! | Jump 0x2e8
02c7 4800 |H | Short_Literal 0x0
02c8 e5fe | | Load 0x2,-0x2
02c9 0092 0350 | P| Action Push_String_Extended,0x350 ; "."
02cb 01cc | | Execute Vector,Catenate
02cc e406 | | Load 0x2,0x6
02cd e00d | | Load 0x0,0xd
02ce 1819 | | Execute Package,Field_Execute,Field_Number 0x19
02cf 01cc | | Execute Vector,Catenate
02d0 e00e | | Load 0x0,0xe
02d1 1820 | | Execute Package,Field_Execute,Field_Number 0x20
02d2 840a | | Call 0x2,0xa
02d3 4802 |H | Short_Literal 0x2
02d4 0092 0346 | F| Action Push_String_Extended,0x346 ; "Rpc_Server.Return_Exception (Stream, id, "
02d6 e409 | | Load 0x2,0x9
02d7 01cc | | Execute Vector,Catenate
02d8 0092 0351 | Q| Action Push_String_Extended,0x351 ; ".Exception_Number."
02da 01cc | | Execute Vector,Catenate
02db e406 | | Load 0x2,0x6
02dc e00d | | Load 0x0,0xd
02dd 1819 | | Execute Package,Field_Execute,Field_Number 0x19
02de 01cc | | Execute Vector,Catenate
02df 0092 0352 | R| Action Push_String_Extended,0x352 ; ");"
02e1 01cc | | Execute Vector,Catenate
02e2 840a | | Call 0x2,0xa
02e3 e406 | | Load 0x2,0x6
02e4 e00d | | Load 0x0,0xd
02e5 181a | | Execute Package,Field_Execute,Field_Number 0x1a
02e6 c406 | | Store 0x2,0x6
02e7 00c9 | | Action Pop_Auxiliary_Loop
02e8 e406 | | Load 0x2,0x6
02e9 e00d | | Load 0x0,0xd
02ea 1817 | | Execute Package,Field_Execute,Field_Number 0x17
02eb 6fdb |o | Jump_Zero 0x2c7
02ec 00ce | | Action Pop_Auxiliary
02ed e403 | | Load 0x2,0x3
02ee e00d | | Load 0x0,0xd
02ef 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
02f0 00d1 | | Pop_Control Pop_Count_1
02f1 00c9 | | Action Pop_Auxiliary_Loop
02f2 e403 | | Load 0x2,0x3
02f3 e00d | | Load 0x0,0xd
02f4 181d | | Execute Package,Field_Execute,Field_Number 0x1d
02f5 6fcb |o | Jump_Zero 0x2c1
02f6 00ce | | Action Pop_Auxiliary
02f7 4801 |H | Short_Literal 0x1
02f8 00ea | | Load_Encached Null_String_Cache
02f9 e00e | | Load 0x0,0xe
02fa 1819 | | Execute Package,Field_Execute,Field_Number 0x19
02fb 840a | | Call 0x2,0xa
02fc 4802 |H | Short_Literal 0x2
02fd 0092 0353 | S| Action Push_String_Extended,0x353 ; "procedure Serve_Guts is new Rpc_Server.Serve(Program => "
02ff 00db | | Load_Top At_Offset_3
0300 01cc | | Execute Vector,Catenate
0301 0092 0354 | T| Action Push_String_Extended,0x354 ; ".program,"
0303 01cc | | Execute Vector,Catenate
0304 0092 0355 | U| Action Push_String_Extended,0x355 ; "Process_Call => Process_Call);"
0306 01cc | | Execute Vector,Catenate
0307 840a | | Call 0x2,0xa
0308 4800 |H | Short_Literal 0x0
0309 0092 0356 | V| Action Push_String_Extended,0x356 ; "procedure Serve (Connection : Transport.COnnection_Id) is "
030b 840a | | Call 0x2,0xa
030c 4800 |H | Short_Literal 0x0
030d e00e | | Load 0x0,0xe
030e 1818 | | Execute Package,Field_Execute,Field_Number 0x18
030f 840a | | Call 0x2,0xa
0310 4800 |H | Short_Literal 0x0
0311 0092 0357 | W| Action Push_String_Extended,0x357 ; "Serve_Guts (Connection);"
0313 840a | | Call 0x2,0xa
0314 4801 |H | Short_Literal 0x1
0315 00ea | | Load_Encached Null_String_Cache
0316 e00e | | Load 0x0,0xe
0317 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0318 840a | | Call 0x2,0xa
0319 4800 |H | Short_Literal 0x0
031a 00ea | | Load_Encached Null_String_Cache
031b e00e | | Load 0x0,0xe
031c 1819 | | Execute Package,Field_Execute,Field_Number 0x19
031d 840a | | Call 0x2,0xa
031e 4504 |E | Exit_Subprogram 0x4
031f 0000 | | .XXX[0x1]
0320 ; --------------------------------------------------------------------------------------
0320 ; SUBPROGRAM
0320 ; --------------------------------------------------------------------------------------
0320 0323 | # | .CONST 0x0323 ; Address of begin
0321 0004 | | .CONST 0x0004 ; Address of exception handler
0322 0001 | | .CONST 0x0001 ; Number of locals
0323 BODY_0320:
0323 INIT_0320:
0323 00da | | Load_Top At_Offset_2
0324 e5fd | | Load 0x2,-0x3
0325 e015 | | Load 0x0,0x15
0326 185e | ^ | Execute Package,Field_Execute,Field_Number 0x5e
0327 00db | | Load_Top At_Offset_3
0328 0c01 | | Execute_Immediate Greater_Equal,0x1
0329 680a |h | Jump_Zero 0x334
032a 00db | | Load_Top At_Offset_3
032b 00d8 | | Load_Top At_Offset_0
032c e015 | | Load 0x0,0x15
032d 1b10 | | Execute Package,Field_Read,Field_Number 0x10
032e 0260 | ` | Execute Discrete,In_Type
032f 7001 |p | Jump_Nonzero 0x331
0330 0801 | | Execute_Immediate Raise,0x1
0331 e5fd | | Load 0x2,-0x3
0332 e015 | | Load 0x0,0x15
0333 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
0334 4503 |E | Exit_Subprogram 0x3
0335 ; --------------------------------------------------------------------------------------
0335 ; STRING TABLE
0335 ; --------------------------------------------------------------------------------------
0335 0048 | H | .STRTAB 0x0048->0x0359 ; "Rpc"
0336 0049 | I | .STRTAB 0x0049->0x035a ; "Rpc_Server"
0337 0051 | Q | .STRTAB 0x0051->0x035f ; "Transport_Stream"
0338 005f | _ | .STRTAB 0x005f->0x0367 ; "Transport_Interchange"
0339 0072 | r | .STRTAB 0x0072->0x0372 ; "Interchange"
033a 007b | { | .STRTAB 0x007b->0x0377 ; "Stream : Transport_Stream.Stream_Id; \x0aId : Rpc.Transaction_Id; \x0aVersion : Rpc.Version_Number; \x0aProc : Rpc.Procedure_Number"
033b 00f6 | | .STRTAB 0x00f6->0x03b6 ; "Process_Call"
033c 0100 | | .STRTAB 0x0100->0x03bc ; "Proc"
033d 0102 | | .STRTAB 0x0102->0x03be ; ".Procedure_Number."
033e 0112 | | .STRTAB 0x0112->0x03c7 ; "Stream"
; "Stream"
; "Stream"
; "Stream"
; "Stream"
033f 0116 | | .STRTAB 0x0116->0x03ca ; "Interchange.Duration"
0340 0128 | ( | .STRTAB 0x0128->0x03d4 ; "("
0341 0127 | ' | .STRTAB 0x0127->0x03d4 ; ")"
0342 0126 | & | .STRTAB 0x0126->0x03d5 ; "Rpc_Server.Begin_Response (Stream, Id);"
0343 014b | K | .STRTAB 0x014b->0x03e8 ; "others"
0344 014f | O | .STRTAB 0x014f->0x03eb ; "Rpc.No_Such_Procedure"
0345 0162 | b | .STRTAB 0x0162->0x03f6 ; "Constraint_Error"
0346 0170 | p | .STRTAB 0x0170->0x03fe ; "Rpc_Server.Return_Exception (Stream, id, "
; "Rpc_Server.Return_Exception (Stream, id, "
; "Rpc_Server.Return_Exception (Stream, id, "
; "Rpc_Server.Return_Exception (Stream, id, "
; "Rpc_Server.Return_Exception (Stream, id, "
; "Rpc_Server.Return_Exception (Stream, id, "
0347 0197 | | .STRTAB 0x0197->0x0412 ; ".Exception_Number.Constraint_Error);"
0348 01b9 | | .STRTAB 0x01b9->0x0424 ; "Numeric_Error"
0349 01c4 | | .STRTAB 0x01c4->0x042b ; ".Exception_Number.Numeric_Error);"
034a 01e3 | | .STRTAB 0x01e3->0x043b ; "Program_Error"
034b 01ee | | .STRTAB 0x01ee->0x0442 ; ".Exception_Number.Program_Error);"
034c 020d | | .STRTAB 0x020d->0x0452 ; "Storage_Error"
034d 0218 | | .STRTAB 0x0218->0x0459 ; ".Exception_Number.Storage_Error);"
034e 0237 | 7 | .STRTAB 0x0237->0x0469 ; "Tasking_Error"
034f 0242 | B | .STRTAB 0x0242->0x0470 ; ".Exception_Number.Tasking_Error);"
0350 0261 | a | .STRTAB 0x0261->0x0480 ; "."
0351 0260 | ` | .STRTAB 0x0260->0x0481 ; ".Exception_Number."
0352 0270 | p | .STRTAB 0x0270->0x048a ; ");"
0353 0270 | p | .STRTAB 0x0270->0x048b ; "procedure Serve_Guts is new Rpc_Server.Serve(Program => "
0354 02a6 | | .STRTAB 0x02a6->0x04a7 ; ".program,"
0355 02ad | | .STRTAB 0x02ad->0x04ab ; "Process_Call => Process_Call);"
0356 02c9 | | .STRTAB 0x02c9->0x04ba ; "procedure Serve (Connection : Transport.COnnection_Id) is "
0357 0301 | | .STRTAB 0x0301->0x04d7 ; "Serve_Guts (Connection);"
0358 0317 | | .STREND 0x0317->0x04e3
0359 5270 6352 |RpcR| .STRTAB_STRINGS
04e4 0000 0000 | | .BLANK 0000[0x4]
04e8 ; --------------------------------------------------------------------------------------
04e8 ; Debug Table
04e8 ; --------------------------------------------------------------------------------------
04e8 0004 0004 | | .DEBUG4 0x0004,0x0004,0x2f26,0x0000,0x0001,0x0002
04ee 000b 04f6 | | .DBG4T 0x000b,0x04f6,0x0001,0xc000
04f2 0323 05da | # | .DBG4T 0x0323,0x05da,0x0001,0x0000
04f6 ; --------------------------------------------------------------------------------------
04f6 ; Debug chain
04f6 ; --------------------------------------------------------------------------------------
04f6 0008 0069 | i| .DBGLEN 0x0008,0x0069
04f8 000b 0010 | | .DBGLNO 0x000b,0x0010,0x0015,0x001a,0x001f,0x0024,0x002e,0x0031,0x0033,0x0039,0x003f,0x0045,0x004b,0x0052,0x0058,0x005d,0x0064,0x006b,0x0070,0x0075,0x007d,0x0086,0x008a,0x0090,0x0097,0x00a3,0x00a8,0x00ae,0x00b2,0x00b8,0x00bc,0x00c2,0x00db,0x00e0,0x00e8,0x00f4,0x0106,0x0111,0x0116,0x011b,0x0120,0x0125,0x0129,0x012d,0x0131,0x013b,0x013f,0x0145,0x0149,0x0152,0x0156,0x015c,0x0160,0x0171,0x0188,0x0197,0x019c,0x01a1,0x01a6,0x01ab,0x01af,0x01b3,0x01b7,0x01c9,0x01ce,0x01e2,0x01e7,0x01f0,0x01f4,0x01f8,0x0207,0x020b,0x0211,0x0217,0x021b,0x0223,0x0229,0x0238,0x023d,0x0242,0x0247,0x024c,0x0251,0x0256,0x025b,0x0261,0x0267,0x026b,0x026f,0x0275,0x027e,0x0284,0x028d,0x0293,0x029c,0x02a2,0x02ab,0x02b1,0x02ba,0x02c1,0x02c7,0x02d3,0x02e3,0x02e8,0x02ed,0x02f2,0x02f7,0x02fc,0x0308,0x030c,0x0310,0x0314,0x0319
0569 0002 0003 | | .XXX[0x71]
056b 0004 0005 | |
056d 0006 0007 | |
056f 0008 0009 | |
0571 0001 0002 | |
0573 0003 0004 | |
0575 0005 0006 | |
0577 0007 0008 | |
0579 000a 000b | |
057b 0009 000c | |
057d 000d 000e | |
057f 000f 0010 | |
0581 0012 0013 | |
0583 0014 0016 | |
0585 0017 0018 | |
0587 0019 001b | |
0589 001c 001a | |
058b 001e 001f | |
058d 0020 0021 | !|
058f 001d 0023 | #|
0591 0015 0024 | $|
0593 0026 0027 | & '|
0595 0028 0029 | ( )|
0597 002a 002c | * ,|
0599 002d 002e | - .|
059b 002f 0031 | / 1|
059d 0032 0033 | 2 3|
059f 0034 0035 | 4 5|
05a1 0030 0037 | 0 7|
05a3 002b 0038 | + 8|
05a5 0039 003b | 9 ;|
05a7 003c 003d | < =|
05a9 003e 003f | > ?|
05ab 003a 0040 | : @|
05ad 0041 004c | A L|
05af 004d 004e | M N|
05b1 0042 0044 | B D|
05b3 0045 0046 | E F|
05b5 0048 0049 | H I|
05b7 0047 004b | G K|
05b9 0043 004f | C O|
05bb 0050 0011 | P |
05bd 0051 0052 | Q R|
05bf 0053 0054 | S T|
05c1 0055 0056 | U V|
05c3 0057 0058 | W X|
05c5 0059 005a | Y Z|
05c7 005b 005c | [ \|
05c9 005d 005e | ] ^|
05cb 005f 0061 | _ a|
05cd 0063 0064 | c d|
05cf 0065 0062 | e b|
05d1 0066 0060 | f `|
05d3 0067 0068 | g h|
05d5 0069 006a | i j|
05d7 006b 006c | k l|
05d9 006d | m |
05da ; --------------------------------------------------------------------------------------
05da ; Debug chain
05da ; --------------------------------------------------------------------------------------
05da 0000 0003 | | .DBGLEN 0x0000,0x0003
05dc 0323 0327 | # '| .DBGLNO 0x0323,0x0327,0x032a
05df 0000 0000 | | .BLANK 0000[0x21]