From: hachti Date: Thu, 10 Feb 2005 01:27:37 +0000 (+0000) Subject: *** empty log message *** X-Git-Url: http://gitweb.hachti.de/?a=commitdiff_plain;h=8acc03e2c9cabeffe39ddf10f6832a35ebe29d87;p=h316.git *** empty log message *** --- diff --git a/lib/iolib/Makefile b/lib/iolib/Makefile index de1dfa9..0804d3c 100644 --- a/lib/iolib/Makefile +++ b/lib/iolib/Makefile @@ -1,27 +1,26 @@ # Skript, das die neue Bibliothek zusammenbauen soll -OWN = i$$pa o$$al o$$la o$$pb o$$pl - +OWN = o$$al o$$la o$$pl o$$pb i$$pa OWN_1=$(foreach obj, $(OWN),$(obj).asm) OWN_2=$(OWN_1:.asm=.obj) OWN_3=$(shell echo $(subst $$,\$$,$(OWN)) | dd conv=ucase 2>/dev/null) -#$(subst abcdefghijklmnopqrstuvwxyz,ABCDEFGHIJKLMNOPQRSTUVWXYZ,$(OWN)) - - -ORG_USE=I$$AB I$$AI O$$AB O$$AI +ORG_USE=I$$AB I$$AI O$$AI O$$AB + ASM=$H316/bin/asm ########################################## -all: iolib +all: io.lib -iolib: $(foreach org, $(ORG_USE), original/$(org)) $(OWN_3) +io.lib: $(foreach org, $(ORG_USE), original/$(org)) $(OWN_3) @echo Baue Bibliothek endgültig zusammen. cat $(subst $$,\$$,\ - $(foreach og, $(ORG_USE),original/$(og))\ - $(OWN_3)) $(H316)/snippets/endseq \ - > iolib || rm iolib + $(OWN_3)\ + $(foreach og, $(ORG_USE),original/$(og))\ + )\ + $(H316)/snippets/endseq \ + > io.lib || rm io.lib obj object objects : $(OWN_2) @@ -32,7 +31,7 @@ $(OWN_2):%.obj:src/%.asm asm $(subst $$,\$$,$^) clean: - rm -f *.obj $(subst $$,\$$,$(OWN_3) $(foreach obj,$(OWN_2),src/$(obj))) iolib *.lst + @rm -f *.obj $(subst $$,\$$,$(OWN_3) $(foreach obj,$(OWN_2),src/$(obj))) io.lib *.lst ########### .PHONY: clean all obj object objects diff --git a/lib/iolib/original/I$AB b/lib/iolib/original/I$AB index 0c37ab9..cec7b89 100644 Binary files a/lib/iolib/original/I$AB and b/lib/iolib/original/I$AB differ diff --git a/lib/iolib/original/I$AI b/lib/iolib/original/I$AI index 04d03f4..0cb21be 100644 Binary files a/lib/iolib/original/I$AI and b/lib/iolib/original/I$AI differ diff --git a/lib/iolib/original/O$AB b/lib/iolib/original/O$AB index 5220c0c..0ecc892 100644 Binary files a/lib/iolib/original/O$AB and b/lib/iolib/original/O$AB differ diff --git a/lib/iolib/original/O$AH b/lib/iolib/original/O$AH index f3c7a91..811f930 100644 Binary files a/lib/iolib/original/O$AH and b/lib/iolib/original/O$AH differ diff --git a/lib/iolib/original/O$AI b/lib/iolib/original/O$AI index dd8185f..19bb62e 100644 Binary files a/lib/iolib/original/O$AI and b/lib/iolib/original/O$AI differ diff --git a/lib/iolib/src/i$pa.asm b/lib/iolib/src/i$pa.asm index a5e3033..78c758f 100644 --- a/lib/iolib/src/i$pa.asm +++ b/lib/iolib/src/i$pa.asm @@ -49,7 +49,11 @@ * . . * DEC TAB (N) * -* +* NOTICE +* +* THE CHARACTER SEQUENCE 'ABS' HAS BEEN REPLACED BY 'DBS' BECAUSE THE +* ASSEMBLER SHOWED STRANGE BEHAVIOUR +* ******************************************************************************** * * EXPORTED LABELS @@ -136,7 +140,7 @@ NAC JST NSRT INSERT IN CHARACTER POSITION TAB CRA CLEAR A-REGISTER SUB NTAB TAB COUNT SNZ NZ, SKIP - JMP NOTB Z, NO TABS + JMP NOTB Z, NO TDBS * STA 0 INDEX REGISTER LDA TABL TAB TABLE LINK @@ -215,10 +219,10 @@ TABI BSZ 1 TABLE POINTER * CHANGEABLE PARAMETERS LIM DEC 80 BUFFER LIMIT (DEFAULT IS 80) NTAB DEC 4 TAB COUNT (DEFAULT IS 4) -TABL DAC TABS TAB TABLE LINK (DEFAULT IS TABS) +TABL DAC TDBS TAB TABLE LINK (DEFAULT IS TDBS) * * DAP-16 TAB SETTINGS -TABS DEC 6 OPERATION FIELD +TDBS DEC 6 OPERATION FIELD DEC 12 VARIABLE FIELD DEC 30 COMMENTS FIELD DEC 73 IDENTIFICATION FIELD diff --git a/lib/iolib/src/o$pl.asm b/lib/iolib/src/o$pl.asm index 535184d..043b10e 100644 --- a/lib/iolib/src/o$pl.asm +++ b/lib/iolib/src/o$pl.asm @@ -21,7 +21,6 @@ * PUT LISTINGS ONTO PAPER TAPE. USAGE LIKE O$LA AND O$LH * * -* * STORAGE * * 266 (OCTAL) @@ -44,7 +43,7 @@ SUBR O$P2,SPC EMPTY LINES BETWEEN HEADING AND MAIN TEXT SUBR O$P3,PGS PURE TEXT LINES PER PAGE ********************************************************************** - REL RELOCATABLE + REL RELOCATABLE ********************************************* * CONFIGURATION HDS DEC 1 EMPTY LINES BEFORE HEADING