X-Git-Url: http://gitweb.hachti.de/?a=blobdiff_plain;f=lib%2Fiolib%2Fsrc%2Fi%24pa.asm;h=02a56d7239eb018942ee3103a2398141103e7f5c;hb=61655ba39f55913eaea68404e36e3c104b30b813;hp=78c758fe0e899c87ecf8fca76876fd83144326a2;hpb=8acc03e2c9cabeffe39ddf10f6832a35ebe29d87;p=h316.git

diff --git a/lib/iolib/src/i$pa.asm b/lib/iolib/src/i$pa.asm
index 78c758f..02a56d7 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)