!***COPYRIGHT (C) 1974, 1975, 1976, 1977 DIGITAL EQUIPMENT CORP., MAYNARD, MASS.*** ! EXTERNAL DECLARATIONS FOR UTILITY, TTY I/O, AND FILE I/O ROUTINES EXTERNAL % UTILITY ROUTINES % ZERO, ! ZEROS BLOCKS OF MEMORY CMPASC, ! COMPARES ASCII STRINGS CMPVAR, ! COMPARES VARYING STRINGS KEYCHK, ! CHECKS IF A STRING IS A KEYWORD ERTEXT, ! PRINT ERROR TEXTS ALLOC, ! ALLOCATE WORK AREAS FREE, ! FREE ALL WORK AREAS SEMI, ! SCANS FOR A ";" FROM THE TTY CNVCHR, ! CONVERTS BINARY NUMBERS TO VARYING CHARACTER STRINGS GETREP, ! GETS A REPORT BLOCK BYTOFF, ! FORMS A BYTE POINTER WITH AN OFFSET DUPL, ! DUPLICATES CHARACTERS COPYA, ! COPIES ASCII STRINGS CNVSIX, ! CONVERTS ASCII TO SIXBIT PRTSPC, ! PRINTS "FOR FILE DEV:FILE.EXT[PPN]" CNVBDT, ! CONVERTS DATE UUO TO CHARACTER STRING CNVBTM, ! CONVERTS MSTIME UUO TO CHARACTER STRING MSTIME, ! DOES MSTIME UUO DATE, ! DOES DATE UUO GETPPN, ! DOES GETPPN UUO PJOB, ! DOES PJOB UUO INIT, ! PERFORMS GENERAL INITIALIZATIONS CNVBIN, ! CONVERTS STRING TO BINARY NUMBER, REVERSE OF CNVCHR ADDBYT, ! LIKE BYTOFF, BUT ADDS CHARS TO A BYTE PTR % TTY I/O ROUTINES % TTYCLR, ! CLEAR INPUT BUFFER TTYINC, ! INPUT A CHARACTER TTYINT, ! INPUT A TOKEN TTYOTL, ! OUTPUT A TTYOTC, ! OUTPUT A CHARACTER TTYOTS, ! OUTPUT A STRING TTYOTN, ! OUTPUT A STRING WITH TTYOSX, ! OUTPUT A SIXBIT WORD TTYOVR, ! OUTPUT A VARYING STRING % FILE I/O ROUTINES % GETFIL, ! OPENS A FILE INBYT, ! FILE INPUT ROUTINE OTBYT, ! FILE OUTOUT ROUTINE CLOFIL, ! CLOSES A FILE RESET, ! DOES RESET UUO BUFSIZ, ! DOES DEVSIZ UUO FOR BUFFER SIZE GETBUF, ! ALLOCATES BUFFER RINGS % PRINT UTILITY ROUTINES % PUTLIN, ! PRINTS A LINE PUTSKP, ! PRINTS A NULL LINE (CRLF) PUTPAG, ! INSERTS FORMFEED AND PRINTS REPORT HEADER COLUMN, ! SETS NEXT OUTPUT COLUMN UPDATE, ! INSETS STRING IN LINE AND UPDATES THINGS INITLN, ! INITIALIZES PRINTLINE BLOCKS MAKHDR; ! MAKES PAGE HEADERS FOR REPORTS ! END OF EXTERNAL ROUTINE DECLARATIONS