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

⟦05bc9be48⟧

    Length: 3072 (0xc00)
    Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0500e0

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 03a0       |    |		.CONST	0x03a0								; 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 0026       | &  |		.CONST	0x0026								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0011       |    |		.CONST	0x0011								; Number of locals
000b			INIT_0008:
000b 4800       |H   |		Short_Literal	0x0							; Debug Table 0x0 = .DEBUG	0x000b,0x03ca,0x8000,0x0000,0x0058,0x7805,0x0000,0x0009
													; Debug Table 0x0.0x0 = 0xb,0xffff
													; Debug Table 0x0.0x1 = 0xb,0xfffe
													; Debug Table 0x0.0x2 = 0xb,0xfffd
													; Debug Table 0x0.0x3 = 0xb,0xfffc
000c 481f       |H   |		Short_Literal	0x1f
000d 029f 0033  |   3|		Declare_Subprogram	INIT_0030,For_Call
000f 03fe       |    |		Declare_Type	Discrete,Defined,Visible
0010 4816       |H   |		Short_Literal	0x16							; Debug Table 0x0.0x4 = 0x10,0xfffb
0011 481b       |H   |		Short_Literal	0x1b
0012 00da       |    |		Load_Top	At_Offset_2
0013 03f9       |    |		Declare_Type	Discrete,Constrained,Visible
0014 612f       |a/  |		Indirect_Literal	Discrete,0x144,{0x00000000, 0x00587805}		; Debug Table 0x0.0x5 = 0x14,0xfffa
0015 4846       |HF  |		Short_Literal	0x46
0016 4808       |H   |		Short_Literal	0x8
0017 e20d       |    |		Load	0x1,0xd
0018 e001       |    |		Load	0x0,0x1
0019 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
001a 0386       |    |		Declare_Variable	Package,Visible
001b 00d8       |    |		Load_Top	At_Offset_0
001c 020f       |    |		Execute	Module,Activate
001d 029a 004b  |   K|		Declare_Subprogram	INIT_0048,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x6 = 0x1d,0xfff9
001f 029a 006b  |   k|		Declare_Subprogram	INIT_0068,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x7 = 0x1f,0xfff8
0021 00bf       |    |		Action	Accept_Activation
0022 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x1 = .DEBUG	0x0022,0x03dc,0x8000,0x0000,0x0058,0x79a5,0x0000,0x000b
													; Debug Table 0x1.0x0 = 0x22,0xffff
0023 00c7       |    |		Action	Elaborate_Subprogram
0024 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x1.0x1 = 0x24,0xfffe
0025 00c7       |    |		Action	Elaborate_Subprogram
0026			BODY_0008:
0026 8211       |    |		Call	0x1,0x11							; Debug Table 0x1.0x2 = 0x26,0x1
0027 00bc       |    |		Action	Signal_Activated
0028 00bb       |    |		Action	Signal_Completion
0029 0000 0000  |    |		.BLANK	0000[0x7]
0030 ; --------------------------------------------------------------------------------------
0030 ; SUBPROGRAM
0030 ; --------------------------------------------------------------------------------------
0030 0033       | 3  |		.CONST	0x0033								; Address of begin
0031 0004       |    |		.CONST	0x0004								; Address of exception handler
0032 0001       |    |		.CONST	0x0001								; Number of locals
0033			BODY_0030:
0033			INIT_0030:
0033 4603       |F   |		Jump_Case	0x4							; Debug Table 0x2 = .DEBUG	0x0033,0x03e4,0x0005,0x0000,0x0058,0x7805,0x0000,0x001b
0034 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
0035 7802       |x   |		Jump	0x38								; case 0x1
0036 7805       |x   |		Jump	0x3c								; case 0x2
0037 7809       |x   |		Jump	0x41								; case 0x3
0038 00da       |    |		Load_Top	At_Offset_2
0039 0091 0148  |   H|		Action	Push_String_Extended_Indexed,0x148				; "COMMIT"
003b 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
003c 00db       |    |		Load_Top	At_Offset_3
003d 00db       |    |		Load_Top	At_Offset_3
003e 00e0       |    |		Load_Encached	Standard_Cache
003f 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0040 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0041 00da       |    |		Load_Top	At_Offset_2
0042 00e0       |    |		Load_Encached	Standard_Cache
0043 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0044 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0045 0000 0000  |    |		.XXX[0x3]
0047 0000       |    |
0048 ; --------------------------------------------------------------------------------------
0048 ; SUBPROGRAM
0048 ; --------------------------------------------------------------------------------------
0048 004b       | K  |		.CONST	0x004b								; Address of begin
0049 0004       |    |		.CONST	0x0004								; Address of exception handler
004a 0001       |    |		.CONST	0x0001								; Number of locals
004b			BODY_0048:
004b			INIT_0048:
004b e002       |    |		Load	0x0,0x2								; Debug Table 0x3 = .DEBUG	0x004b,0x03e6,0x0002,0x0000,0x0058,0x7805,0x0000,0x0051
													; Debug Table 0x3.0x0 = 0x4b,0x1
004c 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
004d 0322       | "  |		Declare_Variable	Record
004e 4801       |H   |		Short_Literal	0x1
004f 00d9       |    |		Load_Top	At_Offset_1
0050 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0051 00db       |    |		Load_Top	At_Offset_3
0052 e20f       |    |		Load	0x1,0xf
0053 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0054 00d9       |    |		Load_Top	At_Offset_1
0055 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0056 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x3.0x1 = 0x56,0x401
0057 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0x2 = 0x57,0x1
0058 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0059 4800       |H   |		Short_Literal	0x0
005a 00d9       |    |		Load_Top	At_Offset_1
005b 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
005c 4801       |H   |		Short_Literal	0x1
005d 00d9       |    |		Load_Top	At_Offset_1
005e 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
005f 4800       |H   |		Short_Literal	0x0
0060 00d9       |    |		Load_Top	At_Offset_1
0061 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
0062 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0063 0000 0000  |    |		.BLANK	0000[0x5]
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 006b       | k  |		.CONST	0x006b								; Address of begin
0069 0004       |    |		.CONST	0x0004								; Address of exception handler
006a 0001       |    |		.CONST	0x0001								; Number of locals
006b			BODY_0068:
006b			INIT_0068:
006b e003       |    |		Load	0x0,0x3								; Debug Table 0x4 = .DEBUG	0x006b,0x03ee,0x0001,0x0000,0x0058,0x7805,0x0000,0x005c
													; Debug Table 0x4.0x0 = 0x6b,0x1
006c 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
006d 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
006e 0092 0168  |   h|		Action	Push_String_Extended,0x168					; "!Commands.Common.Commit"
0070 4800       |H   |		Short_Literal	0x0
0071 e20f       |    |		Load	0x1,0xf
0072 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0073 e003       |    |		Load	0x0,0x3								; Debug Table 0x4.0x1 = 0x73,0x2
0074 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0075 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0076 0092 0169  |   i|		Action	Push_String_Extended,0x169					; "!Commands.Common.Release"
0078 4801       |H   |		Short_Literal	0x1
0079 e20f       |    |		Load	0x1,0xf
007a 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
007b e003       |    |		Load	0x0,0x3								; Debug Table 0x4.0x2 = 0x7b,0x3
007c 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
007d 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
007e 0092 016a  |   j|		Action	Push_String_Extended,0x16a					; "!Commands.Common.Abandon"
0080 4802       |H   |		Short_Literal	0x2
0081 e20f       |    |		Load	0x1,0xf
0082 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0083 e003       |    |		Load	0x0,0x3								; Debug Table 0x4.0x3 = 0x83,0x4
0084 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0085 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0086 0092 016b  |   k|		Action	Push_String_Extended,0x16b					; "!Commands.Common.Explain"
0088 4803       |H   |		Short_Literal	0x3
0089 e20f       |    |		Load	0x1,0xf
008a 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
008b e003       |    |		Load	0x0,0x3								; Debug Table 0x4.0x4 = 0x8b,0x5
008c 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
008d 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
008e 0092 016c  |   l|		Action	Push_String_Extended,0x16c					; "!Commands.Common.Redo"
0090 4804       |H   |		Short_Literal	0x4
0091 e20f       |    |		Load	0x1,0xf
0092 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0093 e003       |    |		Load	0x0,0x3								; Debug Table 0x4.0x5 = 0x93,0x6
0094 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0095 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0096 0092 016d  |   m|		Action	Push_String_Extended,0x16d					; "!Commands.Common.Undo"
0098 4805       |H   |		Short_Literal	0x5
0099 e20f       |    |		Load	0x1,0xf
009a 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
009b e003       |    |		Load	0x0,0x3								; Debug Table 0x4.0x6 = 0x9b,0x7
009c 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
009d 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
009e 0092 016e  |   n|		Action	Push_String_Extended,0x16e					; "!Commands.Common.Semanticize"
00a0 4806       |H   |		Short_Literal	0x6
00a1 e20f       |    |		Load	0x1,0xf
00a2 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00a3 e003       |    |		Load	0x0,0x3								; Debug Table 0x4.0x7 = 0xa3,0x8
00a4 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
00a5 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
00a6 0092 016f  |   o|		Action	Push_String_Extended,0x16f					; "!Commands.Common.Complete"
00a8 4807       |H   |		Short_Literal	0x7
00a9 e20f       |    |		Load	0x1,0xf
00aa 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00ab e003       |    |		Load	0x0,0x3								; Debug Table 0x4.0x8 = 0xab,0x9
00ac 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
00ad 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
00ae 0092 0170  |   p|		Action	Push_String_Extended,0x170					; "!Commands.Common.Object.Insert"
00b0 4808       |H   |		Short_Literal	0x8
00b1 e20f       |    |		Load	0x1,0xf
00b2 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00b3 e003       |    |		Load	0x0,0x3								; Debug Table 0x4.0x9 = 0xb3,0xa
00b4 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
00b5 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
00b6 0092 0171  |   q|		Action	Push_String_Extended,0x171					; "!Commands.Common.Object.Copy"
00b8 4809       |H   |		Short_Literal	0x9
00b9 e20f       |    |		Load	0x1,0xf
00ba 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00bb e003       |    |		Load	0x0,0x3								; Debug Table 0x4.0xa = 0xbb,0xb
00bc 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
00bd 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
00be 0092 0172  |   r|		Action	Push_String_Extended,0x172					; "!Commands.Common.Object.Delete"
00c0 480a       |H   |		Short_Literal	0xa
00c1 e20f       |    |		Load	0x1,0xf
00c2 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00c3 e003       |    |		Load	0x0,0x3								; Debug Table 0x4.0xb = 0xc3,0xc
00c4 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
00c5 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
00c6 0092 0173  |   s|		Action	Push_String_Extended,0x173					; "!Commands.Common.Object.Move"
00c8 480b       |H   |		Short_Literal	0xb
00c9 e20f       |    |		Load	0x1,0xf
00ca 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00cb e003       |    |		Load	0x0,0x3								; Debug Table 0x4.0xc = 0xcb,0xd
00cc 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
00cd 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
00ce 0092 0174  |   t|		Action	Push_String_Extended,0x174					; "!Commands.Common.Edit"
00d0 480c       |H   |		Short_Literal	0xc
00d1 e20f       |    |		Load	0x1,0xf
00d2 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00d3 e003       |    |		Load	0x0,0x3								; Debug Table 0x4.0xd = 0xd3,0xe
00d4 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
00d5 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
00d6 0092 0175  |   u|		Action	Push_String_Extended,0x175					; "!Commands.Common.Definition"
00d8 480d       |H   |		Short_Literal	0xd
00d9 e20f       |    |		Load	0x1,0xf
00da 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00db e003       |    |		Load	0x0,0x3								; Debug Table 0x4.0xe = 0xdb,0xf
00dc 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
00dd 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
00de 0092 0176  |   v|		Action	Push_String_Extended,0x176					; "!Commands.Common.Enclosing"
00e0 480e       |H   |		Short_Literal	0xe
00e1 e20f       |    |		Load	0x1,0xf
00e2 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00e3 e003       |    |		Load	0x0,0x3								; Debug Table 0x4.0xf = 0xe3,0x10
00e4 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
00e5 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
00e6 0092 0177  |   w|		Action	Push_String_Extended,0x177					; "!Commands.Common.Promote"
00e8 480f       |H   |		Short_Literal	0xf
00e9 e20f       |    |		Load	0x1,0xf
00ea 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00eb e003       |    |		Load	0x0,0x3								; Debug Table 0x4.0x10 = 0xeb,0x11
00ec 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
00ed 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
00ee 0092 0178  |   x|		Action	Push_String_Extended,0x178					; "!Commands.Common.Demote"
00f0 4810       |H   |		Short_Literal	0x10
00f1 e20f       |    |		Load	0x1,0xf
00f2 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00f3 e003       |    |		Load	0x0,0x3								; Debug Table 0x4.0x11 = 0xf3,0x12
00f4 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
00f5 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
00f6 0092 0179  |   y|		Action	Push_String_Extended,0x179					; "!Commands.Common.Format"
00f8 4815       |H   |		Short_Literal	0x15
00f9 e20f       |    |		Load	0x1,0xf
00fa 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00fb e003       |    |		Load	0x0,0x3								; Debug Table 0x4.0x12 = 0xfb,0x13
00fc 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
00fd 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
00fe 0092 017a  |   z|		Action	Push_String_Extended,0x17a					; "!Commands.Common.Object.Previous"
0100 4816       |H   |		Short_Literal	0x16
0101 e20f       |    |		Load	0x1,0xf
0102 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0103 e003       |    |		Load	0x0,0x3								; Debug Table 0x4.0x13 = 0x103,0x14
0104 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0105 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0106 0092 017b  |   {|		Action	Push_String_Extended,0x17b					; "!Commands.Common.Object.Next"
0108 4817       |H   |		Short_Literal	0x17
0109 e20f       |    |		Load	0x1,0xf
010a 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
010b e003       |    |		Load	0x0,0x3								; Debug Table 0x4.0x14 = 0x10b,0x15
010c 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
010d 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
010e 0092 017c  |   ||		Action	Push_String_Extended,0x17c					; "!Commands.Common.Object.Parent"
0110 4818       |H   |		Short_Literal	0x18
0111 e20f       |    |		Load	0x1,0xf
0112 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0113 e003       |    |		Load	0x0,0x3								; Debug Table 0x4.0x15 = 0x113,0x16
0114 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0115 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0116 0092 017d  |   }|		Action	Push_String_Extended,0x17d					; "!Commands.Common.Object.Child"
0118 4819       |H   |		Short_Literal	0x19
0119 e20f       |    |		Load	0x1,0xf
011a 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
011b e003       |    |		Load	0x0,0x3								; Debug Table 0x4.0x16 = 0x11b,0x17
011c 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
011d 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
011e 0092 017e  |   ~|		Action	Push_String_Extended,0x17e					; "!Commands.Common.Object.First_Child"
0120 481a       |H   |		Short_Literal	0x1a
0121 e20f       |    |		Load	0x1,0xf
0122 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0123 e003       |    |		Load	0x0,0x3								; Debug Table 0x4.0x17 = 0x123,0x18
0124 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0125 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0126 0092 017f  |    |		Action	Push_String_Extended,0x17f					; "!Commands.Common.Object.Last_Child"
0128 481b       |H   |		Short_Literal	0x1b
0129 e20f       |    |		Load	0x1,0xf
012a 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
012b e003       |    |		Load	0x0,0x3								; Debug Table 0x4.0x18 = 0x12b,0x19
012c 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
012d 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
012e 0092 0180  |    |		Action	Push_String_Extended,0x180					; "!Commands.Common.Object.Elide"
0130 481c       |H   |		Short_Literal	0x1c
0131 e20f       |    |		Load	0x1,0xf
0132 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0133 e003       |    |		Load	0x0,0x3								; Debug Table 0x4.0x19 = 0x133,0x1a
0134 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0135 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0136 0092 0181  |    |		Action	Push_String_Extended,0x181					; "!Commands.Common.Object.Expand"
0138 481d       |H   |		Short_Literal	0x1d
0139 e20f       |    |		Load	0x1,0xf
013a 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
013b e003       |    |		Load	0x0,0x3								; Debug Table 0x4.0x1a = 0x13b,0x1b
013c 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
013d 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
013e 0092 0182  |    |		Action	Push_String_Extended,0x182					; "!Commands.Common.Revert"
0140 481e       |H   |		Short_Literal	0x1e
0141 e20f       |    |		Load	0x1,0xf
0142 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0143 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0144 0000 0000  |    |		.LITERAL	{0x00000000, 0x00587805}
0148 ; --------------------------------------------------------------------------------------
0148 ; STRING TABLE
0148 ; --------------------------------------------------------------------------------------
0148 0078       | x  |		.STRTAB	0x0078->0x0184							; "COMMIT"
0149 007c       | |  |		.STRTAB	0x007c->0x0187							; "RELEASE"
014a 0081       |    |		.STRTAB	0x0081->0x018a							; "ABANDON"
014b 0086       |    |		.STRTAB	0x0086->0x018e							; "EXPLAIN"
014c 008b       |    |		.STRTAB	0x008b->0x0191							; "REDO"
014d 008d       |    |		.STRTAB	0x008d->0x0193							; "UNDO"
014e 008f       |    |		.STRTAB	0x008f->0x0195							; "SEMANTICIZE"
014f 0098       |    |		.STRTAB	0x0098->0x019b							; "COMPLETE"
0150 009e       |    |		.STRTAB	0x009e->0x019f							; "OBJECT_INSERT"
0151 00a9       |    |		.STRTAB	0x00a9->0x01a5							; "OBJECT_COPY"
0152 00b2       |    |		.STRTAB	0x00b2->0x01ab							; "OBJECT_DELETE"
0153 00bd       |    |		.STRTAB	0x00bd->0x01b1							; "OBJECT_MOVE"
0154 00c6       |    |		.STRTAB	0x00c6->0x01b7							; "EDIT"
0155 00c8       |    |		.STRTAB	0x00c8->0x01b9							; "DEFINITION"
0156 00d0       |    |		.STRTAB	0x00d0->0x01be							; "ENCLOSING_PACKAGE"
0157 00df       |    |		.STRTAB	0x00df->0x01c6							; "PROMOTE"
0158 00e4       |    |		.STRTAB	0x00e4->0x01ca							; "DEMOTE"
0159 00e8       |    |		.STRTAB	0x00e8->0x01cd							; "SORT_IMAGE"
015a 00f0       |    |		.STRTAB	0x00f0->0x01d2							; "AVAILABLE_2"
015b 00f9       |    |		.STRTAB	0x00f9->0x01d7							; "AVAILABLE_3"
015c 0102       |    |		.STRTAB	0x0102->0x01dd							; "AVAILABLE_4"
015d 010b       |    |		.STRTAB	0x010b->0x01e2							; "FORMAT"
015e 010f       |    |		.STRTAB	0x010f->0x01e5							; "SELECT_LEFT_BROTHER"
015f 0120       |    |		.STRTAB	0x0120->0x01ef							; "SELECT_RIGHT_BROTHER"
0160 0132       | 2  |		.STRTAB	0x0132->0x01f9							; "SELECT_PARENT"
0161 013d       | =  |		.STRTAB	0x013d->0x01ff							; "SELECT_CHILD"
0162 0147       | G  |		.STRTAB	0x0147->0x0205							; "SELECT_FIRST_CHILD"
0163 0157       | W  |		.STRTAB	0x0157->0x020e							; "SELECT_LAST_CHILD"
0164 0166       | f  |		.STRTAB	0x0166->0x0217							; "SELECTION_ELIDE"
0165 0173       | s  |		.STRTAB	0x0173->0x021e							; "ELISION_EXPAND"
0166 017f       |    |		.STRTAB	0x017f->0x0225							; "OBJECT_REDRAW"
0167 018a       |    |		.STRTAB	0x018a->0x022c							; "OBJECT_DEBUG"
0168 0194       |    |		.STRTAB	0x0194->0x0232							; "!Commands.Common.Commit"
0169 01a9       |    |		.STRTAB	0x01a9->0x023d							; "!Commands.Common.Release"
016a 01bf       |    |		.STRTAB	0x01bf->0x0249							; "!Commands.Common.Abandon"
016b 01d5       |    |		.STRTAB	0x01d5->0x0255							; "!Commands.Common.Explain"
016c 01eb       |    |		.STRTAB	0x01eb->0x0261							; "!Commands.Common.Redo"
016d 01fe       |    |		.STRTAB	0x01fe->0x026c							; "!Commands.Common.Undo"
016e 0211       |    |		.STRTAB	0x0211->0x0276							; "!Commands.Common.Semanticize"
016f 022b       | +  |		.STRTAB	0x022b->0x0284							; "!Commands.Common.Complete"
0170 0242       | B  |		.STRTAB	0x0242->0x0291							; "!Commands.Common.Object.Insert"
0171 025e       | ^  |		.STRTAB	0x025e->0x02a0							; "!Commands.Common.Object.Copy"
0172 0278       | x  |		.STRTAB	0x0278->0x02ae							; "!Commands.Common.Object.Delete"
0173 0294       |    |		.STRTAB	0x0294->0x02bd							; "!Commands.Common.Object.Move"
0174 02ae       |    |		.STRTAB	0x02ae->0x02cb							; "!Commands.Common.Edit"
0175 02c1       |    |		.STRTAB	0x02c1->0x02d5							; "!Commands.Common.Definition"
0176 02da       |    |		.STRTAB	0x02da->0x02e3							; "!Commands.Common.Enclosing"
0177 02f2       |    |		.STRTAB	0x02f2->0x02f0							; "!Commands.Common.Promote"
0178 0308       |    |		.STRTAB	0x0308->0x02fc							; "!Commands.Common.Demote"
0179 031d       |    |		.STRTAB	0x031d->0x0307							; "!Commands.Common.Format"
017a 0332       | 2  |		.STRTAB	0x0332->0x0313							; "!Commands.Common.Object.Previous"
017b 0350       | P  |		.STRTAB	0x0350->0x0323							; "!Commands.Common.Object.Next"
017c 036a       | j  |		.STRTAB	0x036a->0x0331							; "!Commands.Common.Object.Parent"
017d 0386       |    |		.STRTAB	0x0386->0x0340							; "!Commands.Common.Object.Child"
017e 03a1       |    |		.STRTAB	0x03a1->0x034e							; "!Commands.Common.Object.First_Child"
017f 03c2       |    |		.STRTAB	0x03c2->0x0360							; "!Commands.Common.Object.Last_Child"
0180 03e2       |    |		.STRTAB	0x03e2->0x0371							; "!Commands.Common.Object.Elide"
0181 03fd       |    |		.STRTAB	0x03fd->0x037f							; "!Commands.Common.Object.Expand"
0182 0419       |    |		.STRTAB	0x0419->0x038e							; "!Commands.Common.Revert"
0183 042e       | .  |		.STREND 0x042e->0x039a
0184 434f 4d4d  |COMM|		.STRTAB_STRINGS
039a 0000 0000  |    |		.BLANK	0000[0x6]
03a0 ; --------------------------------------------------------------------------------------
03a0 ; Debug Table
03a0 ; --------------------------------------------------------------------------------------
03a0 0003 0005  |    |		.CONST	0x0003,0x0005
03a2 000b 03ca  |    |		.DEBUG	0x000b,0x03ca,0x8000,0x0000,0x0058,0x7805,0x0000,0x0009
03aa 0022 03dc  | "  |		.DEBUG	0x0022,0x03dc,0x8000,0x0000,0x0058,0x79a5,0x0000,0x000b
03b2 0033 03e4  | 3  |		.DEBUG	0x0033,0x03e4,0x0005,0x0000,0x0058,0x7805,0x0000,0x001b
03ba 004b 03e6  | K  |		.DEBUG	0x004b,0x03e6,0x0002,0x0000,0x0058,0x7805,0x0000,0x0051
03c2 006b 03ee  | k  |		.DEBUG	0x006b,0x03ee,0x0001,0x0000,0x0058,0x7805,0x0000,0x005c
03ca ; --------------------------------------------------------------------------------------
03ca ; Debug3 Subtable 0x0
03ca ; --------------------------------------------------------------------------------------
03ca 0008 0000  |    |		.DBG3TAB	0x0008,0x0000
03cc 000b ffff  |    |		.CONST	0x000b,0xffff
03ce 000b fffe  |    |		.CONST	0x000b,0xfffe
03d0 000b fffd  |    |		.CONST	0x000b,0xfffd
03d2 000b fffc  |    |		.CONST	0x000b,0xfffc
03d4 0010 fffb  |    |		.CONST	0x0010,0xfffb
03d6 0014 fffa  |    |		.CONST	0x0014,0xfffa
03d8 001d fff9  |    |		.CONST	0x001d,0xfff9
03da 001f fff8  |    |		.CONST	0x001f,0xfff8
03dc ; --------------------------------------------------------------------------------------
03dc ; Debug3 Subtable 0x1
03dc ; --------------------------------------------------------------------------------------
03dc 0002 0001  |    |		.DBG3TAB	0x0002,0x0001
03de 0022 ffff  | "  |		.CONST	0x0022,0xffff
03e0 0024 fffe  | $  |		.CONST	0x0024,0xfffe
03e2 0026 0001  | &  |		.CONST	0x0026,0x0001
03e4 ; --------------------------------------------------------------------------------------
03e4 ; Debug3 Subtable 0x2
03e4 ; --------------------------------------------------------------------------------------
03e4 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
03e6 ; --------------------------------------------------------------------------------------
03e6 ; Debug3 Subtable 0x3
03e6 ; --------------------------------------------------------------------------------------
03e6 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
03e8 004b 0001  | K  |		.CONST	0x004b,0x0001
03ea 0056 0401  | V  |		.CONST	0x0056,0x0401
03ec 0057 0001  | W  |		.CONST	0x0057,0x0001
03ee ; --------------------------------------------------------------------------------------
03ee ; Debug3 Subtable 0x4
03ee ; --------------------------------------------------------------------------------------
03ee 0000 001b  |    |		.DBG3TAB	0x0000,0x001b
03f0 006b 0001  | k  |		.CONST	0x006b,0x0001
03f2 0073 0002  | s  |		.CONST	0x0073,0x0002
03f4 007b 0003  | {  |		.CONST	0x007b,0x0003
03f6 0083 0004  |    |		.CONST	0x0083,0x0004
03f8 008b 0005  |    |		.CONST	0x008b,0x0005
03fa 0093 0006  |    |		.CONST	0x0093,0x0006
03fc 009b 0007  |    |		.CONST	0x009b,0x0007
03fe 00a3 0008  |    |		.CONST	0x00a3,0x0008
0400 00ab 0009  |    |		.CONST	0x00ab,0x0009
0402 00b3 000a  |    |		.CONST	0x00b3,0x000a
0404 00bb 000b  |    |		.CONST	0x00bb,0x000b
0406 00c3 000c  |    |		.CONST	0x00c3,0x000c
0408 00cb 000d  |    |		.CONST	0x00cb,0x000d
040a 00d3 000e  |    |		.CONST	0x00d3,0x000e
040c 00db 000f  |    |		.CONST	0x00db,0x000f
040e 00e3 0010  |    |		.CONST	0x00e3,0x0010
0410 00eb 0011  |    |		.CONST	0x00eb,0x0011
0412 00f3 0012  |    |		.CONST	0x00f3,0x0012
0414 00fb 0013  |    |		.CONST	0x00fb,0x0013
0416 0103 0014  |    |		.CONST	0x0103,0x0014
0418 010b 0015  |    |		.CONST	0x010b,0x0015
041a 0113 0016  |    |		.CONST	0x0113,0x0016
041c 011b 0017  |    |		.CONST	0x011b,0x0017
041e 0123 0018  | #  |		.CONST	0x0123,0x0018
0420 012b 0019  | +  |		.CONST	0x012b,0x0019
0422 0133 001a  | 3  |		.CONST	0x0133,0x001a
0424 013b 001b  | ;  |		.CONST	0x013b,0x001b
0426 0000 0000  |    |		.BLANK	0000[0x1da]