Previous: prsedt Up: ../plot79_p.html Next: prseol
SUBROUTINE PRSEHR (BUFFER,BEGBUF,ENDBUF,MAXBUF) C$ (Parse Internal - Edit, Help, and Recognition Characters) C$ Given a text buffer, BUFFER(*), containing ASCII ordinals, C$ process entries BUFFER(BEGBUF) .. BUFFER(ENDBUF), C$ converting edit, help, and recognition sequences to C$ internal codes and implementing their actions. C$ C$ Letter-case in an editing character pair is not C$ significant, but is preserved. Editing characters are C$ deleted from the buffer. Note that a quoted editing C$ character has no editing function and is preserved. A 0 C$ repeat count is equivalent to a repeat count of 1, and a C$ repeat count followed by a quoted character applies to the C$ quoted character, not to the quote sequence. C$ C$ The substitutions are carried out by replacing the first C$ character of an edit character pair by the deleted C$ character flag, DELCHR, so BEGBUF is unchanged on return. C$ The second character of a pair is replaced by EDPAIR. C$ ENDBUF will be increased up to the limit of MAXBUF in C$ response to any repeat counts. If ENDBUF = MAXBUF on C$ return, trailing characters have been dropped from the C$ buffer. It is assumed that BUFFER(MAXBUF+1) is addressable C$ and contains a special marker that is not in the ASCII C$ range 0..127. On return, ENDBUF is reduced if necessary to C$ guarantee that BUFFER(ENDBUF) does not contain DELCHR, C$ thereby freeing buffer space. C$ (19-NOV-82)