DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Rational R1000/400

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦c30a784da⟧

    Length: 2048 (0x800)
    Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0ea8df

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦5a81ac88f⟧ »Space Info Vol 1« 
        └─⟦this⟧ 

Disassembly

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 01e8       |    |		.CONST	0x01e8								; 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 ; SUBPROGRAM
0008 ; See instruction 0x02cf at 0x73, index=0x0
0008 ; --------------------------------------------------------------------------------------
0008 0042       | B  |		.CONST	0x0042								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 001d       |    |		.CONST	0x001d								; Number of locals
000b			INIT_0008:
000b			INIT_0008:
000b 4802       |H   |		Short_Literal	0x2							; Debug Table 0x0 = .DEBUG	0x000b,0x022a,0x0000,0x0000,0x005a,0x6fa5,0x0000,0x0027
000c 02cb       |    |		Declare_Variable	Entry
000d 4801       |H   |		Short_Literal	0x1
000e 02cb       |    |		Declare_Variable	Entry
000f 4803       |H   |		Short_Literal	0x3
0010 02cb       |    |		Declare_Variable	Entry
0011 4804       |H   |		Short_Literal	0x4
0012 02cb       |    |		Declare_Variable	Entry
0013 00bf       |    |		Action	Accept_Activation
0014 4803       |H   |		Short_Literal	0x3							; Debug Table 0x1 = .DEBUG	0x0014,0x022c,0x0000,0x0000,0x005a,0x7235,0x0000,0x000c
													; Debug Table 0x1.0x0 = 0x14,0xffff
0015 032a       | *  |		Declare_Type	Record,Incomplete
0016 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1.0x1 = 0x16,0xfffe
0017 02a0       |    |		Declare_Subprogram	Null_Subprogram
0018 03ad       |    |		Declare_Type	Heap_Access,Defined
0019 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x2 = 0x19,0xfffd
001a 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x1.0x3 = 0x1a,0xfffc
001b e001       |    |		Load	0x0,0x1
001c 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
001d 00da       |    |		Load_Top	At_Offset_2
001e 029f 005b  |   [|		Declare_Subprogram	INIT_0058,For_Call
0020 e211       |    |		Load	0x1,0x11
0021 0326       | &  |		Complete_Type	Record,By_Defining
0022 61ad       |a   |		Indirect_Literal	Discrete,0x1d0,{0x00000000, 0x005a7235}		; Debug Table 0x1.0x4 = 0x22,0xfffb
0023 482d       |H-  |		Short_Literal	0x2d
0024 e002       |    |		Load	0x0,0x2
0025 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0026 00db       |    |		Load_Top	At_Offset_3
0027 00e5       |    |		Load_Encached	Long_Integer_Cache
0028 e002       |    |		Load	0x0,0x2
0029 1913       |    |		Execute	Package,Field_Reference,Field_Number 0x13
002a e003       |    |		Load	0x0,0x3
002b 0387       |    |		Declare_Variable	Package
002c 00d8       |    |		Load_Top	At_Offset_0
002d 020f       |    |		Execute	Module,Activate
002e 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x5 = 0x2e,0xfffa
002f e004       |    |		Load	0x0,0x4								; Debug Table 0x1.0x6 = 0x2f,0xfff9
0030 191d       |    |		Execute	Package,Field_Reference,Field_Number 0x1d
0031 0007       |    |		Action	Break_Optional
0032 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x1.0x7 = 0x32,0xfff8
0033 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0034 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1.0x8 = 0x34,0xfff7
0035 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0036 00f0       |    |		Load_Encached	Segment_Cache						; Debug Table 0x1.0x9 = 0x36,0xfff6
0037 e212       |    |		Load	0x1,0x12							; Debug Table 0x1.0xa = 0x37,0xfff5
0038 0007       |    |		Action	Break_Optional
0039 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0xb = 0x39,0xfff4
003a 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x1.0xc = 0x3a,0xfff3
003b e212       |    |		Load	0x1,0x12							; Debug Table 0x1.0xd = 0x3b,0xfff2
003c 0007       |    |		Action	Break_Optional
003d 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x1.0xe = 0x3d,0xfff1
003e 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x1.0xf = 0x3e,0xfff0
003f 029f 0073  |   s|		Declare_Subprogram	INIT_0070,For_Call
0041 00bc       |    |		Action	Signal_Activated
0042			BODY_0008:
0042			BODY_0008:
0042 0092 01d4  |    |		Action	Push_String_Extended,0x1d4					; "Image_Database_Manager"
													; Debug Table 0x1.0x10 = 0x42,0x1
0044 e005       |    |		Load	0x0,0x5
0045 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0046 00f0       |    |		Load_Encached	Segment_Cache						; Debug Table 0x1.0x11 = 0x46,0x2
0047 48cd       |H   |		Short_Literal	0xcd
0048 e006       |    |		Load	0x0,0x6
0049 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
004a c217       |    |		Store	0x1,0x17
004b e213       |    |		Load	0x1,0x13							; Debug Table 0x1.0x12 = 0x4b,0x3
004c 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
004d e217       |    |		Load	0x1,0x17
004e e213       |    |		Load	0x1,0x13
004f 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0050 c216       |    |		Store	0x1,0x16
0051 00cf       |    |		Action	Mark_Auxiliary
0052 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x13 = 0x52,0x4
0053 821d       |    |		Call	0x1,0x1d							; Debug Table 0x1.0x14 = 0x53,0x5
0054 00c9       |    |		Action	Pop_Auxiliary_Loop
0055 7ffd       |    |		Jump	0x53
0056 0000 0000  |    |		.XXX[0x2]
0058 ; --------------------------------------------------------------------------------------
0058 ; SUBPROGRAM
0058 ; --------------------------------------------------------------------------------------
0058 005b       | [  |		.CONST	0x005b								; Address of begin
0059 0004       |    |		.CONST	0x0004								; Address of exception handler
005a 0001       |    |		.CONST	0x0001								; Number of locals
005b			BODY_0058:
005b			INIT_0058:
005b 4608       |F   |		Jump_Case	0x9							; Debug Table 0x2 = .DEBUG	0x005b,0x0258,0x0005,0x0000,0x005a,0x7235,0x0000,0x001a
005c 7808       |x   |		Jump	0x65								; case 0x0
005d 780b       |x   |		Jump	0x69								; case 0x1
005e 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
005f 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
0060 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
0061 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x5
0062 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x6
0063 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x7
0064 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x8
0065 00da       |    |		Load_Top	At_Offset_2
0066 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0067 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0068 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0069 00da       |    |		Load_Top	At_Offset_2
006a 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
006b 1c01       |    |		Execute_Immediate	Run_Utility,0x1
006c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
006d 0000 0000  |    |		.XXX[0x3]
006f 0000       |    |
0070 ; --------------------------------------------------------------------------------------
0070 ; SUBPROGRAM
0070 ; --------------------------------------------------------------------------------------
0070 0080       |    |		.CONST	0x0080								; Address of begin
0071 0087       |    |		.CONST	0x0087								; Address of exception handler
0072 0002       |    |		.CONST	0x0002								; Number of locals
0073			INIT_0070:
0073 4810 4812  |H H |		Declare_Variable	Select	0x000, 0x004,				; Debug Table 0x3 = .DEBUG	0x0073,0x025a,0x0004,0x0000,0x005a,0x7235,0x0000,0x02be
0075 480f 4820  |H H |				[0x000]: 0x001 = 0x0008,
0077 480e 482b  |H H+|				[0x00d]: 0x030 = 0x0180,
0079 480d 4830  |H H0|				[0x00e]: 0x02b = 0x0158,
007b 4800 4801  |H H |				[0x00f]: 0x020 = 0x0100,
007d 4800 4804  |H H |				[0x010]: 0x012 = 0x0090
007f 02cf       |    |
0080			BODY_0070:
0080 00cf       |    |		Action	Mark_Auxiliary
0081 0007       |    |		Action	Break_Optional							; Debug Table 0x3.0x0 = 0x81,0x1
0082 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0x1 = 0x82,0x2
0083 013f       | ?  |		Execute	Select,Rendezvous
0084 00d1       |    |		Pop_Control	Pop_Count_1
0085 00c9       |    |		Action	Pop_Auxiliary_Loop
0086 7ffb       |    |		Jump	0x82
0087			TRAP_0070:
0087 0007       |    |		Action	Break_Optional
0088 e215       |    |		Load	0x1,0x15							; Debug Table 0x3.0x2 = 0x88,0x7
0089 0a01       |    |		Execute_Immediate	Plus,0x1
008a c215       |    |		Store	0x1,0x15
008b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
008c 0000 0000  |    |		.BLANK	0000[0x4]
0090 ; --------------------------------------------------------------------------------------
0090 ; SUBPROGRAM
0090 ; See instruction 0x02cf at 0x73, index=0x10
0090 ; --------------------------------------------------------------------------------------
0090 0093       |    |		.CONST	0x0093								; Address of begin
0091 0004       |    |		.CONST	0x0004								; Address of exception handler
0092 0001       |    |		.CONST	0x0001								; Number of locals
0093			BODY_0090:
0093			INIT_0090:
0093 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x4 = .DEBUG	0x0093,0x0262,0x0003,0x0000,0x005a,0x7235,0x0000,0x02a6
													; Debug Table 0x4.0x0 = 0x93,0x1
0094 e21a       |    |		Load	0x1,0x1a
0095 e7fd       |    |		Load	0x3,-0x3
0096 e216       |    |		Load	0x1,0x16
0097 e213       |    |		Load	0x1,0x13
0098 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0099 c21a       |    |		Store	0x1,0x1a
009a c219       |    |		Store	0x1,0x19
009b e219       |    |		Load	0x1,0x19							; Debug Table 0x4.0x1 = 0x9b,0x2
009c 7001       |p   |		Jump_Nonzero	0x9e
009d 4100       |A   |		End_Rendezvous	0x0							; Debug Table 0x4.0x2 = 0x9d,0x3
009e e21a       |    |		Load	0x1,0x1a							; Debug Table 0x4.0x3 = 0x9e,0x4
009f 0217       |    |		Execute	Heap_Access,All_Reference
00a0 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
00a1 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00a2 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
00a3 6826       |h&  |		Jump_Zero	0xca
00a4 e21a       |    |		Load	0x1,0x1a
00a5 0217       |    |		Execute	Heap_Access,All_Reference
00a6 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
00a7 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
00a8 e21a       |    |		Load	0x1,0x1a
00a9 0217       |    |		Execute	Heap_Access,All_Reference
00aa 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
00ab 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
00ac 01d5       |    |		Execute	Vector,Field_Reference
00ad 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
00ae e7fe       |    |		Load	0x3,-0x2
00af 016f       | o  |		Execute	Variant_Record,Equal
00b0 6819       |h   |		Jump_Zero	0xca
00b1 e21a       |    |		Load	0x1,0x1a							; Debug Table 0x4.0x4 = 0xb1,0x5
00b2 0217       |    |		Execute	Heap_Access,All_Reference
00b3 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
00b4 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
00b5 a21b       |    |		Store_Unchecked	0x1,0x1b
00b6 e7fb       |    |		Load	0x3,-0x5							; Debug Table 0x4.0x5 = 0xb6,0x6
00b7 e21b       |    |		Load	0x1,0x1b
00b8 e21a       |    |		Load	0x1,0x1a
00b9 0217       |    |		Execute	Heap_Access,All_Reference
00ba 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
00bb 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
00bc 01d5       |    |		Execute	Vector,Field_Reference
00bd 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
00be e7fc       |    |		Load	0x3,-0x4							; Debug Table 0x4.0x6 = 0xbe,0x7
00bf 0e01       |    |		Execute_Immediate	Not_Equal,0x1
00c0 6808       |h   |		Jump_Zero	0xc9
00c1 e7fc       |    |		Load	0x3,-0x4							; Debug Table 0x4.0x7 = 0xc1,0x8
00c2 e21b       |    |		Load	0x1,0x1b
00c3 e21a       |    |		Load	0x1,0x1a
00c4 0217       |    |		Execute	Heap_Access,All_Reference
00c5 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
00c6 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
00c7 01d5       |    |		Execute	Vector,Field_Reference
00c8 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
00c9 4100       |A   |		End_Rendezvous	0x0
00ca e21a       |    |		Load	0x1,0x1a							; Debug Table 0x4.0x8 = 0xca,0x9
00cb 0217       |    |		Execute	Heap_Access,All_Reference
00cc 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
00cd 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
00ce 0a01       |    |		Execute_Immediate	Plus,0x1
00cf 0248       | H  |		Execute	Discrete,Check_In_Integer
00d0 480b       |H   |		Short_Literal	0xb
00d1 026e       | n  |		Execute	Discrete,Modulo
00d2 c21b       |    |		Store	0x1,0x1b
00d3 e001       |    |		Load	0x0,0x1								; Debug Table 0x4.0x9 = 0xd3,0xa
00d4 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
00d5 0322       | "  |		Declare_Variable	Record
00d6 00d8       |    |		Load_Top	At_Offset_0
00d7 1c01       |    |		Execute_Immediate	Run_Utility,0x1
00d8 e7fe       |    |		Load	0x3,-0x2
00d9 00d9       |    |		Load_Top	At_Offset_1
00da 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00db e7fc       |    |		Load	0x3,-0x4
00dc 00d9       |    |		Load_Top	At_Offset_1
00dd 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
00de e7fb       |    |		Load	0x3,-0x5
00df e004       |    |		Load	0x0,0x4
00e0 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00e1 0119       |    |		Execute	Any,Check_In_Formal_Type
00e2 00d9       |    |		Load_Top	At_Offset_1
00e3 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
00e4 e21b       |    |		Load	0x1,0x1b
00e5 e21a       |    |		Load	0x1,0x1a
00e6 0217       |    |		Execute	Heap_Access,All_Reference
00e7 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
00e8 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
00e9 01d6       |    |		Execute	Vector,Field_Write
00ea e21a       |    |		Load	0x1,0x1a							; Debug Table 0x4.0xa = 0xea,0xb
00eb 0217       |    |		Execute	Heap_Access,All_Reference
00ec 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
00ed 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00ee 0d0b       |    |		Execute_Immediate	Less,0xb
00ef 6809       |h   |		Jump_Zero	0xf9
00f0 e21a       |    |		Load	0x1,0x1a							; Debug Table 0x4.0xb = 0xf0,0xc
00f1 0217       |    |		Execute	Heap_Access,All_Reference
00f2 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
00f3 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00f4 0a01       |    |		Execute_Immediate	Plus,0x1
00f5 e21a       |    |		Load	0x1,0x1a
00f6 0217       |    |		Execute	Heap_Access,All_Reference
00f7 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
00f8 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00f9 e21b       |    |		Load	0x1,0x1b							; Debug Table 0x4.0xc = 0xf9,0xd
00fa e21a       |    |		Load	0x1,0x1a
00fb 0217       |    |		Execute	Heap_Access,All_Reference
00fc 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
00fd 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
00fe 4100       |A   |		End_Rendezvous	0x0
00ff 0000       |    |		.XXX[0x1]
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; See instruction 0x02cf at 0x73, index=0xf
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 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x5 = .DEBUG	0x0103,0x027e,0x0003,0x0000,0x005a,0x7235,0x0000,0x01ef
													; Debug Table 0x5.0x0 = 0x103,0x1
0104 e21a       |    |		Load	0x1,0x1a
0105 e7fe       |    |		Load	0x3,-0x2
0106 e216       |    |		Load	0x1,0x16
0107 e213       |    |		Load	0x1,0x13
0108 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0109 c21a       |    |		Store	0x1,0x1a
010a c219       |    |		Store	0x1,0x19
010b e219       |    |		Load	0x1,0x19							; Debug Table 0x5.0x1 = 0x10b,0x2
010c 6845       |hE  |		Jump_Zero	0x152
010d e21a       |    |		Load	0x1,0x1a							; Debug Table 0x5.0x2 = 0x10d,0x3
010e 0217       |    |		Execute	Heap_Access,All_Reference
010f 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0110 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
0111 e7fc       |    |		Load	0x3,-0x4
0112 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0113 e21a       |    |		Load	0x1,0x1a							; Debug Table 0x5.0x3 = 0x113,0x4
0114 0217       |    |		Execute	Heap_Access,All_Reference
0115 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0116 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0117 a21b       |    |		Store_Unchecked	0x1,0x1b
0118 4800       |H   |		Short_Literal	0x0							; Debug Table 0x5.0x4 = 0x118,0x5
0119 a21c       |    |		Store_Unchecked	0x1,0x1c
011a 00cf       |    |		Action	Mark_Auxiliary
011b e21b       |    |		Load	0x1,0x1b							; Debug Table 0x5.0x5 = 0x11b,0x6
011c 0a0b       |    |		Execute_Immediate	Plus,0xb
011d 0248       | H  |		Execute	Discrete,Check_In_Integer
011e e21a       |    |		Load	0x1,0x1a
011f 0217       |    |		Execute	Heap_Access,All_Reference
0120 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0121 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0122 0272       | r  |		Execute	Discrete,Minus
0123 0a01       |    |		Execute_Immediate	Plus,0x1
0124 0248       | H  |		Execute	Discrete,Check_In_Integer
0125 e21b       |    |		Load	0x1,0x1b
0126 0a0b       |    |		Execute_Immediate	Plus,0xb
0127 0248       | H  |		Execute	Discrete,Check_In_Integer
0128 0264       | d  |		Execute	Discrete,Below_Bound
0129 7015       |p   |		Jump_Nonzero	0x13f
012a e7fd       |    |		Load	0x3,-0x3							; Debug Table 0x5.0x6 = 0x12a,0x7
012b 00d9       |    |		Load_Top	At_Offset_1
012c 480b       |H   |		Short_Literal	0xb
012d 026e       | n  |		Execute	Discrete,Modulo
012e e21a       |    |		Load	0x1,0x1a
012f 0217       |    |		Execute	Heap_Access,All_Reference
0130 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0131 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
0132 01d5       |    |		Execute	Vector,Field_Reference
0133 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0134 8214       |    |		Call	0x1,0x14
0135 6802       |h   |		Jump_Zero	0x138
0136 00d2       |    |		Pop_Control	Pop_Count_2						; Debug Table 0x5.0x7 = 0x136,0x8
0137 7807       |x   |		Jump	0x13f
0138 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x8 = 0x138,0x9
0139 c21b       |    |		Store	0x1,0x1b
013a e21c       |    |		Load	0x1,0x1c							; Debug Table 0x5.0x9 = 0x13a,0xa
013b 0a01       |    |		Execute_Immediate	Plus,0x1
013c c21c       |    |		Store	0x1,0x1c
013d 00c8       |    |		Action	Pop_Auxiliary_Range
013e 37eb       |7   |		Loop_Decreasing	0x12a
013f 00ce       |    |		Action	Pop_Auxiliary
0140 e21c       |    |		Load	0x1,0x1c							; Debug Table 0x5.0xa = 0x140,0xb
0141 0c0b       |    |		Execute_Immediate	Greater_Equal,0xb
0142 6807       |h   |		Jump_Zero	0x14a
0143 6088       |`   |		Indirect_Literal	Discrete,0x1cc,{0x00000000, 0x7fffffff}		; Debug Table 0x5.0xb = 0x143,0xc
0144 e7fc       |    |		Load	0x3,-0x4
0145 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0146 4800       |H   |		Short_Literal	0x0							; Debug Table 0x5.0xc = 0x146,0xd
0147 e7fc       |    |		Load	0x3,-0x4
0148 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0149 4101       |A   |		End_Rendezvous	0x1
014a e21c       |    |		Load	0x1,0x1c							; Debug Table 0x5.0xd = 0x14a,0xe
014b e7fc       |    |		Load	0x3,-0x4
014c 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
014d e21b       |    |		Load	0x1,0x1b							; Debug Table 0x5.0xe = 0x14d,0xf
014e 480b       |H   |		Short_Literal	0xb
014f 026e       | n  |		Execute	Discrete,Modulo
0150 e7fc       |    |		Load	0x3,-0x4
0151 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0152 4101       |A   |		End_Rendezvous	0x1
0153 0000 0000  |    |		.BLANK	0000[0x5]
0158 ; --------------------------------------------------------------------------------------
0158 ; SUBPROGRAM
0158 ; See instruction 0x02cf at 0x73, index=0xe
0158 ; --------------------------------------------------------------------------------------
0158 015b       | [  |		.CONST	0x015b								; Address of begin
0159 0004       |    |		.CONST	0x0004								; Address of exception handler
015a 0001       |    |		.CONST	0x0001								; Number of locals
015b			BODY_0158:
015b			INIT_0158:
015b 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x6 = .DEBUG	0x015b,0x029e,0x0003,0x0000,0x005a,0x7235,0x0000,0x0154
													; Debug Table 0x6.0x0 = 0x15b,0x1
015c e21a       |    |		Load	0x1,0x1a
015d e7fe       |    |		Load	0x3,-0x2
015e e216       |    |		Load	0x1,0x16
015f e213       |    |		Load	0x1,0x13
0160 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0161 c21a       |    |		Store	0x1,0x1a
0162 c219       |    |		Store	0x1,0x19
0163 e219       |    |		Load	0x1,0x19							; Debug Table 0x6.0x1 = 0x163,0x2
0164 7001       |p   |		Jump_Nonzero	0x166
0165 4100       |A   |		End_Rendezvous	0x0							; Debug Table 0x6.0x2 = 0x165,0x3
0166 e21a       |    |		Load	0x1,0x1a							; Debug Table 0x6.0x3 = 0x166,0x4
0167 0217       |    |		Execute	Heap_Access,All_Reference
0168 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0169 0d02       |    |		Execute_Immediate	Less,0x2
016a 680b       |h   |		Jump_Zero	0x176
016b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6.0x4 = 0x16b,0x5
016c e216       |    |		Load	0x1,0x16
016d e213       |    |		Load	0x1,0x13
016e 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
016f e218       |    |		Load	0x1,0x18							; Debug Table 0x6.0x5 = 0x16f,0x6
0170 e21a       |    |		Load	0x1,0x1a
0171 0217       |    |		Execute	Heap_Access,All_Reference
0172 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0173 e21a       |    |		Load	0x1,0x1a							; Debug Table 0x6.0x6 = 0x173,0x7
0174 a218       |    |		Store_Unchecked	0x1,0x18
0175 4100       |A   |		End_Rendezvous	0x0
0176 e21a       |    |		Load	0x1,0x1a							; Debug Table 0x6.0x7 = 0x176,0x8
0177 0217       |    |		Execute	Heap_Access,All_Reference
0178 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0179 0aff       |    |		Execute_Immediate	Plus,-0x1
017a e21a       |    |		Load	0x1,0x1a
017b 0217       |    |		Execute	Heap_Access,All_Reference
017c 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
017d 4100       |A   |		End_Rendezvous	0x0
017e 0000 0000  |    |		.XXX[0x2]
0180 ; --------------------------------------------------------------------------------------
0180 ; SUBPROGRAM
0180 ; See instruction 0x02cf at 0x73, index=0xd
0180 ; --------------------------------------------------------------------------------------
0180 0183       |    |		.CONST	0x0183								; Address of begin
0181 0004       |    |		.CONST	0x0004								; Address of exception handler
0182 0001       |    |		.CONST	0x0001								; Number of locals
0183			BODY_0180:
0183			INIT_0180:
0183 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x7 = .DEBUG	0x0183,0x02b0,0x0003,0x0000,0x005a,0x7235,0x0000,0x0112
													; Debug Table 0x7.0x0 = 0x183,0x1
0184 e21a       |    |		Load	0x1,0x1a
0185 e7fe       |    |		Load	0x3,-0x2
0186 e216       |    |		Load	0x1,0x16
0187 e213       |    |		Load	0x1,0x13
0188 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0189 c21a       |    |		Store	0x1,0x1a
018a c219       |    |		Store	0x1,0x19
018b e219       |    |		Load	0x1,0x19							; Debug Table 0x7.0x1 = 0x18b,0x2
018c 6808       |h   |		Jump_Zero	0x195
018d e21a       |    |		Load	0x1,0x1a							; Debug Table 0x7.0x2 = 0x18d,0x3
018e 0217       |    |		Execute	Heap_Access,All_Reference
018f 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0190 0a01       |    |		Execute_Immediate	Plus,0x1
0191 e21a       |    |		Load	0x1,0x1a
0192 0217       |    |		Execute	Heap_Access,All_Reference
0193 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0194 4100       |A   |		End_Rendezvous	0x0
0195 e218       |    |		Load	0x1,0x18							; Debug Table 0x7.0x3 = 0x195,0x4
0196 681c       |h   |		Jump_Zero	0x1b3
0197 e218       |    |		Load	0x1,0x18							; Debug Table 0x7.0x4 = 0x197,0x5
0198 a21a       |    |		Store_Unchecked	0x1,0x1a
0199 e218       |    |		Load	0x1,0x18							; Debug Table 0x7.0x5 = 0x199,0x6
019a 0217       |    |		Execute	Heap_Access,All_Reference
019b 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
019c a218       |    |		Store_Unchecked	0x1,0x18
019d e211       |    |		Load	0x1,0x11							; Debug Table 0x7.0x6 = 0x19d,0x7
019e 0322       | "  |		Declare_Variable	Record
019f 00d8       |    |		Load_Top	At_Offset_0
01a0 1c01       |    |		Execute_Immediate	Run_Utility,0x1
01a1 4801       |H   |		Short_Literal	0x1
01a2 00d9       |    |		Load_Top	At_Offset_1
01a3 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
01a4 8007       |    |		Call	0x0,0x7
01a5 00d9       |    |		Load_Top	At_Offset_1
01a6 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
01a7 e212       |    |		Load	0x1,0x12
01a8 00d9       |    |		Load_Top	At_Offset_1
01a9 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
01aa e21a       |    |		Load	0x1,0x1a
01ab 0218       |    |		Execute	Heap_Access,All_Write
01ac 4801       |H   |		Short_Literal	0x1							; Debug Table 0x7.0x7 = 0x1ac,0x8
01ad e21a       |    |		Load	0x1,0x1a
01ae e7fe       |    |		Load	0x3,-0x2
01af e216       |    |		Load	0x1,0x16
01b0 e213       |    |		Load	0x1,0x13
01b1 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
01b2 4100       |A   |		End_Rendezvous	0x0
01b3 e211       |    |		Load	0x1,0x11							; Debug Table 0x7.0x8 = 0x1b3,0x9
01b4 0322       | "  |		Declare_Variable	Record
01b5 00d8       |    |		Load_Top	At_Offset_0
01b6 1c01       |    |		Execute_Immediate	Run_Utility,0x1
01b7 4801       |H   |		Short_Literal	0x1
01b8 00d9       |    |		Load_Top	At_Offset_1
01b9 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
01ba 8007       |    |		Call	0x0,0x7
01bb 00d9       |    |		Load_Top	At_Offset_1
01bc 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
01bd e212       |    |		Load	0x1,0x12
01be 00d9       |    |		Load_Top	At_Offset_1
01bf 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
01c0 e212       |    |		Load	0x1,0x12
01c1 e217       |    |		Load	0x1,0x17
01c2 0396       |    |		Declare_Variable	Heap_Access,By_Allocation,With_Value
01c3 a21a       |    |		Store_Unchecked	0x1,0x1a
01c4 0007       |    |		Action	Break_Optional							; Debug Table 0x7.0x9 = 0x1c4,0xa
01c5 4801       |H   |		Short_Literal	0x1							; Debug Table 0x7.0xa = 0x1c5,0xb
01c6 e21a       |    |		Load	0x1,0x1a
01c7 e7fe       |    |		Load	0x3,-0x2
01c8 e216       |    |		Load	0x1,0x16
01c9 e213       |    |		Load	0x1,0x13
01ca 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
01cb 4100       |A   |		End_Rendezvous	0x0
01cc 0000 0000  |    |		.LITERAL	{0x00000000, 0x7fffffff}
01d0 0000 0000  |    |		.LITERAL	{0x00000000, 0x005a7235}
01d4 ; --------------------------------------------------------------------------------------
01d4 ; STRING TABLE
01d4 ; --------------------------------------------------------------------------------------
01d4 0004       |    |		.STRTAB	0x0004->0x01d6							; "Image_Database_Manager"
01d5 0018       |    |		.STREND 0x0018->0x01e1
01d6 496d 6167  |Imag|		.STRTAB_STRINGS
01e1 0000 0000  |    |		.BLANK	0000[0x7]
01e8 ; --------------------------------------------------------------------------------------
01e8 ; Debug Table
01e8 ; --------------------------------------------------------------------------------------
01e8 0003 0008  |    |		.CONST	0x0003,0x0008
01ea 000b 022a  |   *|		.DEBUG	0x000b,0x022a,0x0000,0x0000,0x005a,0x6fa5,0x0000,0x0027
01f2 0014 022c  |   ,|		.DEBUG	0x0014,0x022c,0x0000,0x0000,0x005a,0x7235,0x0000,0x000c
01fa 005b 0258  | [ X|		.DEBUG	0x005b,0x0258,0x0005,0x0000,0x005a,0x7235,0x0000,0x001a
0202 0073 025a  | s Z|		.DEBUG	0x0073,0x025a,0x0004,0x0000,0x005a,0x7235,0x0000,0x02be
020a 0093 0262  |   b|		.DEBUG	0x0093,0x0262,0x0003,0x0000,0x005a,0x7235,0x0000,0x02a6
0212 0103 027e  |   ~|		.DEBUG	0x0103,0x027e,0x0003,0x0000,0x005a,0x7235,0x0000,0x01ef
021a 015b 029e  | [  |		.DEBUG	0x015b,0x029e,0x0003,0x0000,0x005a,0x7235,0x0000,0x0154
0222 0183 02b0  |    |		.DEBUG	0x0183,0x02b0,0x0003,0x0000,0x005a,0x7235,0x0000,0x0112
022a ; --------------------------------------------------------------------------------------
022a ; Debug3 Subtable 0x0
022a ; --------------------------------------------------------------------------------------
022a 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
022c ; --------------------------------------------------------------------------------------
022c ; Debug3 Subtable 0x1
022c ; --------------------------------------------------------------------------------------
022c 0010 0005  |    |		.DBG3TAB	0x0010,0x0005
022e 0014 ffff  |    |		.CONST	0x0014,0xffff
0230 0016 fffe  |    |		.CONST	0x0016,0xfffe
0232 0019 fffd  |    |		.CONST	0x0019,0xfffd
0234 001a fffc  |    |		.CONST	0x001a,0xfffc
0236 0022 fffb  | "  |		.CONST	0x0022,0xfffb
0238 002e fffa  | .  |		.CONST	0x002e,0xfffa
023a 002f fff9  | /  |		.CONST	0x002f,0xfff9
023c 0032 fff8  | 2  |		.CONST	0x0032,0xfff8
023e 0034 fff7  | 4  |		.CONST	0x0034,0xfff7
0240 0036 fff6  | 6  |		.CONST	0x0036,0xfff6
0242 0037 fff5  | 7  |		.CONST	0x0037,0xfff5
0244 0039 fff4  | 9  |		.CONST	0x0039,0xfff4
0246 003a fff3  | :  |		.CONST	0x003a,0xfff3
0248 003b fff2  | ;  |		.CONST	0x003b,0xfff2
024a 003d fff1  | =  |		.CONST	0x003d,0xfff1
024c 003e fff0  | >  |		.CONST	0x003e,0xfff0
024e 0042 0001  | B  |		.CONST	0x0042,0x0001
0250 0046 0002  | F  |		.CONST	0x0046,0x0002
0252 004b 0003  | K  |		.CONST	0x004b,0x0003
0254 0052 0004  | R  |		.CONST	0x0052,0x0004
0256 0053 0005  | S  |		.CONST	0x0053,0x0005
0258 ; --------------------------------------------------------------------------------------
0258 ; Debug3 Subtable 0x2
0258 ; --------------------------------------------------------------------------------------
0258 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
025a ; --------------------------------------------------------------------------------------
025a ; Debug3 Subtable 0x3
025a ; --------------------------------------------------------------------------------------
025a 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
025c 0081 0001  |    |		.CONST	0x0081,0x0001
025e 0082 0002  |    |		.CONST	0x0082,0x0002
0260 0088 0007  |    |		.CONST	0x0088,0x0007
0262 ; --------------------------------------------------------------------------------------
0262 ; Debug3 Subtable 0x4
0262 ; --------------------------------------------------------------------------------------
0262 0000 000d  |    |		.DBG3TAB	0x0000,0x000d
0264 0093 0001  |    |		.CONST	0x0093,0x0001
0266 009b 0002  |    |		.CONST	0x009b,0x0002
0268 009d 0003  |    |		.CONST	0x009d,0x0003
026a 009e 0004  |    |		.CONST	0x009e,0x0004
026c 00b1 0005  |    |		.CONST	0x00b1,0x0005
026e 00b6 0006  |    |		.CONST	0x00b6,0x0006
0270 00be 0007  |    |		.CONST	0x00be,0x0007
0272 00c1 0008  |    |		.CONST	0x00c1,0x0008
0274 00ca 0009  |    |		.CONST	0x00ca,0x0009
0276 00d3 000a  |    |		.CONST	0x00d3,0x000a
0278 00ea 000b  |    |		.CONST	0x00ea,0x000b
027a 00f0 000c  |    |		.CONST	0x00f0,0x000c
027c 00f9 000d  |    |		.CONST	0x00f9,0x000d
027e ; --------------------------------------------------------------------------------------
027e ; Debug3 Subtable 0x5
027e ; --------------------------------------------------------------------------------------
027e 0000 000f  |    |		.DBG3TAB	0x0000,0x000f
0280 0103 0001  |    |		.CONST	0x0103,0x0001
0282 010b 0002  |    |		.CONST	0x010b,0x0002
0284 010d 0003  |    |		.CONST	0x010d,0x0003
0286 0113 0004  |    |		.CONST	0x0113,0x0004
0288 0118 0005  |    |		.CONST	0x0118,0x0005
028a 011b 0006  |    |		.CONST	0x011b,0x0006
028c 012a 0007  | *  |		.CONST	0x012a,0x0007
028e 0136 0008  | 6  |		.CONST	0x0136,0x0008
0290 0138 0009  | 8  |		.CONST	0x0138,0x0009
0292 013a 000a  | :  |		.CONST	0x013a,0x000a
0294 0140 000b  | @  |		.CONST	0x0140,0x000b
0296 0143 000c  | C  |		.CONST	0x0143,0x000c
0298 0146 000d  | F  |		.CONST	0x0146,0x000d
029a 014a 000e  | J  |		.CONST	0x014a,0x000e
029c 014d 000f  | M  |		.CONST	0x014d,0x000f
029e ; --------------------------------------------------------------------------------------
029e ; Debug3 Subtable 0x6
029e ; --------------------------------------------------------------------------------------
029e 0000 0008  |    |		.DBG3TAB	0x0000,0x0008
02a0 015b 0001  | [  |		.CONST	0x015b,0x0001
02a2 0163 0002  | c  |		.CONST	0x0163,0x0002
02a4 0165 0003  | e  |		.CONST	0x0165,0x0003
02a6 0166 0004  | f  |		.CONST	0x0166,0x0004
02a8 016b 0005  | k  |		.CONST	0x016b,0x0005
02aa 016f 0006  | o  |		.CONST	0x016f,0x0006
02ac 0173 0007  | s  |		.CONST	0x0173,0x0007
02ae 0176 0008  | v  |		.CONST	0x0176,0x0008
02b0 ; --------------------------------------------------------------------------------------
02b0 ; Debug3 Subtable 0x7
02b0 ; --------------------------------------------------------------------------------------
02b0 0000 000b  |    |		.DBG3TAB	0x0000,0x000b
02b2 0183 0001  |    |		.CONST	0x0183,0x0001
02b4 018b 0002  |    |		.CONST	0x018b,0x0002
02b6 018d 0003  |    |		.CONST	0x018d,0x0003
02b8 0195 0004  |    |		.CONST	0x0195,0x0004
02ba 0197 0005  |    |		.CONST	0x0197,0x0005
02bc 0199 0006  |    |		.CONST	0x0199,0x0006
02be 019d 0007  |    |		.CONST	0x019d,0x0007
02c0 01ac 0008  |    |		.CONST	0x01ac,0x0008
02c2 01b3 0009  |    |		.CONST	0x01b3,0x0009
02c4 01c4 000a  |    |		.CONST	0x01c4,0x000a
02c6 01c5 000b  |    |		.CONST	0x01c5,0x000b
02c8 0000 0000  |    |		.BLANK	0000[0x138]