DEFINITION MODULE P1IOStr;

FROM MCBase IMPORT Constval;

EXPORT QUALIFIED PutStrCh, InitString, TermString;

    PROCEDURE PutStrCh(ch: CHAR);
      (* put character into stringbuffer *)
    PROCEDURE InitString;
      (* initalisation of string area *)
    PROCEDURE TermString(VAR length: CARDINAL; VAR val: Constval);

END P1IOStr .
