|
|
1.1 ! root 1: .pa 1 ! 2: .he 'GETC, GETW, FOPEN (III)'3/15/72'GETC, GETW, FOPEN (III)' ! 3: .ti 0 ! 4: NAME getw, getc, fopen -- buffered input ! 5: .sp ! 6: .ti 0 ! 7: SYNOPSIS mov $filename,r0 ! 8: .br ! 9: jsr r5,fopen; iobuf ! 10: ! 11: jsr r5,getc; iobuf ! 12: .br ! 13: (character in r0) ! 14: ! 15: jsr r5,getw; iobuf ! 16: .br ! 17: (word in r0) ! 18: .sp ! 19: .ti 0 ! 20: DESCRIPTION These routines are used to provide a buffered input ! 21: facility. ! 22: iobuf_____ is the address of a 518(10) byte buffer area whose ! 23: contents are maintained by these routines. Its format is: ! 24: .sp ! 25: .nf ! 26: ioptr: .=.+2 / file descriptor ! 27: .=.+2 / characters left in buffer ! 28: .=.+2 / ptr to next character ! 29: .=.+512. / the buffer ! 30: .sp ! 31: .fi ! 32: fopen_____ may be called initially to open the file. On return, ! 33: the error bit (c-bit) is set if the open failed. ! 34: If fopen_____ is never called, get___ will read from the standard ! 35: input file. ! 36: .sp ! 37: getc____ returns the next byte from the file in r0. The ! 38: error bit is set on end of file or a read error. ! 39: .sp ! 40: getw____ returns the next word in r0. getc____ and getw____ ! 41: may be used alternately; there are no odd/even ! 42: problems. ! 43: .sp ! 44: iobuf_____ must be provided by the user; it must be on a word boundary. ! 45: ! 46: To reuse the same buffer for another file, it is sufficient ! 47: to close the original file and call fopen_____ again. ! 48: .sp ! 49: .ti 0 ! 50: FILES kept in /lib/liba.a ! 51: .sp ! 52: .ti 0 ! 53: SEE ALSO open(II), read(II), putc(III) ! 54: .sp ! 55: .ti 0 ! 56: DIAGNOSTICS c-bit set on EOF or error ! 57: .sp ! 58: .ti 0 ! 59: BUGS --
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.