X-Git-Url: http://gitweb.hachti.de/?a=blobdiff_plain;f=lib%2Fiolib%2Fsrc%2Fi%24pa.asm;h=dc656b538fa4f3ef3d08bcf06fbd8d3fa372a67d;hb=c6be4ceec9e04d59a5538fa5c7b8464f42f8dd98;hp=a5e3033dd295f33fd6bf848132737f6a505eae03;hpb=c08e22bbb226696a64764be9b466a02a3ab0d93f;p=h316.git

diff --git a/lib/iolib/src/i$pa.asm b/lib/iolib/src/i$pa.asm
index a5e3033..dc656b5 100644
--- a/lib/iolib/src/i$pa.asm
+++ b/lib/iolib/src/i$pa.asm
@@ -18,7 +18,7 @@
 *
 * PURPOSE
 *
-*    TO READ ASCII SOURCE TEXT FROM HIGH SPEED PAPTER TAPE READER
+*    TO READ ASCII SOURCE TEXT FROM HIGH SPEED PAPER TAPE READER
 *
 *
 * RESTRICTIONS
@@ -38,8 +38,8 @@
 *             CALL I$PA
 *             DAC (BUFFER ADDRESS)
 *
-*    I$PI - CONFIGURE O$PA
-*             CALL O$PI
+*    I$PI - CONFIGURE I$PA
+*             CALL I$PI
 *             DEC (NUMBER OF WORDS IN DATA BUFFER)
 *             DEC (NUMBER OF TABS IN FOLLOWING TABLE, IF ANY)
 *             DEC TAB (1)
@@ -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