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

⟦3b2048e65⟧

    Length: 2048 (0x800)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0a7cf5

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 5800       |X   |		.CONST	0x5800								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0358       | X  |		.CONST	0x0358								; 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 8001       |    |		.CONST	0x8001								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 000b       |    |		.CONST	0x000b								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0001       |    |		.CONST	0x0001								; Number of locals
000b			BODY_0008:
000b			INIT_0008:
000b 0092 0082  |    |		Action	Push_String_Extended,0x82					; "~comment(Rational Publishing Interface: Compose)"
000d 8406       |    |		Call	0x2,0x6
000e e402       |    |		Load	0x2,0x2
000f e009       |    |		Load	0x0,0x9
0010 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0011 6815       |h   |		Jump_Zero	0x27
0012 4829       |H)  |		Short_Literal	0x29
0013 0092 0083  |    |		Action	Push_String_Extended,0x83					; "~comment(Prolog generated by "
0015 e014       |    |		Load	0x0,0x14
0016 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0017 e014       |    |		Load	0x0,0x14
0018 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0019 01cc       |    |		Execute	Vector,Catenate
001a 0092 0084  |    |		Action	Push_String_Extended,0x84					; " on "
001c 01cc       |    |		Execute	Vector,Catenate
001d 4800       |H   |		Short_Literal	0x0
001e 4800       |H   |		Short_Literal	0x0
001f 4800       |H   |		Short_Literal	0x0
0020 e015       |    |		Load	0x0,0x15
0021 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0022 e015       |    |		Load	0x0,0x15
0023 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
0024 01cc       |    |		Execute	Vector,Catenate
0025 01cb       |    |		Execute	Vector,Append
0026 8406       |    |		Call	0x2,0x6
0027 0092 0085  |    |		Action	Push_String_Extended,0x85					; "~setup(center_appendix_title=true,"
0029 8406       |    |		Call	0x2,0x6
002a 0092 0086  |    |		Action	Push_String_Extended,0x86					; "       indented_pp_indent=0.5inches,"
002c 8406       |    |		Call	0x2,0x6
002d 0092 0087  |    |		Action	Push_String_Extended,0x87					; "       indented_pp_margin_align=false,"
002f 8406       |    |		Call	0x2,0x6
0030 0092 0088  |    |		Action	Push_String_Extended,0x88					; "       figure_label_format=\x22~1\x22,"
0032 8406       |    |		Call	0x2,0x6
0033 0092 0089  |    |		Action	Push_String_Extended,0x89					; "       figure_number_format=\x22~1.~~ ~~ \x22,"
0035 8406       |    |		Call	0x2,0x6
0036 0092 008a  |    |		Action	Push_String_Extended,0x8a					; "       figure_sep_string=\x22\x22,"
0038 8406       |    |		Call	0x2,0x6
0039 0092 008b  |    |		Action	Push_String_Extended,0x8b					; "       page_break_on_level_1,"
003b 8406       |    |		Call	0x2,0x6
003c 0092 008c  |    |		Action	Push_String_Extended,0x8c					; "       paragraph_number_format=\x22~a.~~ ~~ ~|~a.~~ ~~ ~|~a.~~ ~~ ~|~a.~~ ~~ ~|~a.~~ ~~ ~|~a.~~ ~~ ~|~a.~~ ~~ ~|\x22,"
003e 8406       |    |		Call	0x2,0x6
003f 0092 008d  |    |		Action	Push_String_Extended,0x8d					; "       separate_table_and_figure_numbers,"
0041 8406       |    |		Call	0x2,0x6
0042 0092 008e  |    |		Action	Push_String_Extended,0x8e					; "       single_level_figure_numbers,"
0044 8406       |    |		Call	0x2,0x6
0045 0092 008f  |    |		Action	Push_String_Extended,0x8f					; "       single_level_table_numbers,"
0047 8406       |    |		Call	0x2,0x6
0048 0092 0090  |    |		Action	Push_String_Extended,0x90					; "       table_caption_above,"
004a 8406       |    |		Call	0x2,0x6
004b 0092 0091  |    |		Action	Push_String_Extended,0x91					; "       table_caption_string=\x22Table \x22,"
004d 8406       |    |		Call	0x2,0x6
004e 0092 0092  |    |		Action	Push_String_Extended,0x92					; "       table_line_mode=all_lines,"
0050 8406       |    |		Call	0x2,0x6
0051 0092 0093  |    |		Action	Push_String_Extended,0x93					; "       table_label_format=\x22~I.~~ ~~ \x22,"
0053 8406       |    |		Call	0x2,0x6
0054 0092 0094  |    |		Action	Push_String_Extended,0x94					; "       table_number_format=\x22~I.~~ ~~ \x22,"
0056 8406       |    |		Call	0x2,0x6
0057 0092 0095  |    |		Action	Push_String_Extended,0x95					; "       table_percentage_sizes,"
0059 8406       |    |		Call	0x2,0x6
005a 0092 0096  |    |		Action	Push_String_Extended,0x96					; "       table_print_caption,"
005c 8406       |    |		Call	0x2,0x6
005d 0092 0097  |    |		Action	Push_String_Extended,0x97					; "       table_print_number,"
005f 8406       |    |		Call	0x2,0x6
0060 0092 0098  |    |		Action	Push_String_Extended,0x98					; "       table_repeat_caption,"
0062 8406       |    |		Call	0x2,0x6
0063 0092 0099  |    |		Action	Push_String_Extended,0x99					; "       table_repeat_headings,"
0065 8406       |    |		Call	0x2,0x6
0066 0092 009a  |    |		Action	Push_String_Extended,0x9a					; "       table_sep_string=\x22\x22,"
0068 8406       |    |		Call	0x2,0x6
0069 0092 009b  |    |		Action	Push_String_Extended,0x9b					; "       toc_indent_size=0,"
006b 8406       |    |		Call	0x2,0x6
006c 0092 009c  |    |		Action	Push_String_Extended,0x9c					; "       tp_title_space_after=1line)"
006e 8406       |    |		Call	0x2,0x6
006f 0092 009d  |    |		Action	Push_String_Extended,0x9d					; "~string_macro(global_appendix_number_format=\x22~|~10~+.~|~1~+.~|~1~+.~|~1~+.~|~1\x22)"
0071 8406       |    |		Call	0x2,0x6
0072 0092 009e  |    |		Action	Push_String_Extended,0x9e					; "~string_macro(global_section_number_format=\x22~1.~|~1~+.~|~1~+.~|~1~+.~|~1~+.~|~1\x22)"
0074 8406       |    |		Call	0x2,0x6
0075 0092 009f  |    |		Action	Push_String_Extended,0x9f					; "~exec[~setup(appendix_number_format=\x22~global_appendix_number_format\x22,"
0077 8406       |    |		Call	0x2,0x6
0078 0092 00a0  |    |		Action	Push_String_Extended,0xa0					; "             section_number_format=\x22~global_section_number_format\x22,"
007a 8406       |    |		Call	0x2,0x6
007b 0092 00a1  |    |		Action	Push_String_Extended,0xa1					; "             toc_appendix_number_format=\x22~global_appendix_number_format\x22,"
007d 8406       |    |		Call	0x2,0x6
007e 0092 00a2  |    |		Action	Push_String_Extended,0xa2					; "             toc_section_number_format=\x22~global_section_number_format\x22)]"
0080 8406       |    |		Call	0x2,0x6
0081 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0082 ; --------------------------------------------------------------------------------------
0082 ; STRING TABLE
0082 ; --------------------------------------------------------------------------------------
0082 0044       | D  |		.STRTAB	0x0044->0x00a4							; "~comment(Rational Publishing Interface: Compose)"
0083 0072       | r  |		.STRTAB	0x0072->0x00bc							; "~comment(Prolog generated by "
0084 008d       |    |		.STRTAB	0x008d->0x00ca							; " on "
0085 008f       |    |		.STRTAB	0x008f->0x00cc							; "~setup(center_appendix_title=true,"
0086 00af       |    |		.STRTAB	0x00af->0x00dd							; "       indented_pp_indent=0.5inches,"
0087 00d1       |    |		.STRTAB	0x00d1->0x00ef							; "       indented_pp_margin_align=false,"
0088 00f5       |    |		.STRTAB	0x00f5->0x0102							; "       figure_label_format=\x22~1\x22,"
0089 0113       |    |		.STRTAB	0x0113->0x0112							; "       figure_number_format=\x22~1.~~ ~~ \x22,"
008a 0139       | 9  |		.STRTAB	0x0139->0x0126							; "       figure_sep_string=\x22\x22,"
008b 0153       | S  |		.STRTAB	0x0153->0x0134							; "       page_break_on_level_1,"
008c 016e       | n  |		.STRTAB	0x016e->0x0143							; "       paragraph_number_format=\x22~a.~~ ~~ ~|~a.~~ ~~ ~|~a.~~ ~~ ~|~a.~~ ~~ ~|~a.~~ ~~ ~|~a.~~ ~~ ~|~a.~~ ~~ ~|\x22,"
008d 01db       |    |		.STRTAB	0x01db->0x017a							; "       separate_table_and_figure_numbers,"
008e 0202       |    |		.STRTAB	0x0202->0x018f							; "       single_level_figure_numbers,"
008f 0223       | #  |		.STRTAB	0x0223->0x01a0							; "       single_level_table_numbers,"
0090 0243       | C  |		.STRTAB	0x0243->0x01b1							; "       table_caption_above,"
0091 025c       | \  |		.STRTAB	0x025c->0x01bf							; "       table_caption_string=\x22Table \x22,"
0092 027f       |    |		.STRTAB	0x027f->0x01d1							; "       table_line_mode=all_lines,"
0093 029e       |    |		.STRTAB	0x029e->0x01e2							; "       table_label_format=\x22~I.~~ ~~ \x22,"
0094 02c2       |    |		.STRTAB	0x02c2->0x01f5							; "       table_number_format=\x22~I.~~ ~~ \x22,"
0095 02e7       |    |		.STRTAB	0x02e7->0x0208							; "       table_percentage_sizes,"
0096 0303       |    |		.STRTAB	0x0303->0x0217							; "       table_print_caption,"
0097 031c       |    |		.STRTAB	0x031c->0x0225							; "       table_print_number,"
0098 0334       | 4  |		.STRTAB	0x0334->0x0232							; "       table_repeat_caption,"
0099 034e       | N  |		.STRTAB	0x034e->0x0240							; "       table_repeat_headings,"
009a 0369       | i  |		.STRTAB	0x0369->0x024e							; "       table_sep_string=\x22\x22,"
009b 0382       |    |		.STRTAB	0x0382->0x025c							; "       toc_indent_size=0,"
009c 0399       |    |		.STRTAB	0x0399->0x0268							; "       tp_title_space_after=1line)"
009d 03b9       |    |		.STRTAB	0x03b9->0x0279							; "~string_macro(global_appendix_number_format=\x22~|~10~+.~|~1~+.~|~1~+.~|~1~+.~|~1\x22)"
009e 0407       |    |		.STRTAB	0x0407->0x02a1							; "~string_macro(global_section_number_format=\x22~1.~|~1~+.~|~1~+.~|~1~+.~|~1~+.~|~1\x22)"
009f 0456       | V  |		.STRTAB	0x0456->0x02ca							; "~exec[~setup(appendix_number_format=\x22~global_appendix_number_format\x22,"
00a0 0499       |    |		.STRTAB	0x0499->0x02ec							; "             section_number_format=\x22~global_section_number_format\x22,"
00a1 04da       |    |		.STRTAB	0x04da->0x030e							; "             toc_appendix_number_format=\x22~global_appendix_number_format\x22,"
00a2 0521       | !  |		.STRTAB	0x0521->0x0332							; "             toc_section_number_format=\x22~global_section_number_format\x22)]"
00a3 0567       | g  |		.STREND 0x0567->0x0356
00a4 7e63 6f6d  |~com|		.STRTAB_STRINGS
0357 0000       |    |		.XXX[0x1]
0358 ; --------------------------------------------------------------------------------------
0358 ; Debug Table
0358 ; --------------------------------------------------------------------------------------
0358 0004 0012  |    |		.DEBUG4	0x0004,0x0012,0xc7aa,0x0000,0x0001,0x0000
035e 0000 0000  |    |		.BLANK	0000[0xa2]