-- File CIFIODefs.mesa
-- Written by Dan Fitzpatrick and Martin Newell, June 1980
-- Last updated: August 20, 1980  1:51 PM

-- CIF  I/O Routines

DIRECTORY

StreamDefs: FROM "StreamDefs" USING[StreamHandle];

CIFIODefs: DEFINITIONS =

BEGIN
OPEN StreamDefs;

ReadStringDirect: PUBLIC PROCEDURE [t: STRING, s: StreamHandle];

ReadLineDirect: PUBLIC PROCEDURE [t: STRING, s: StreamHandle];

WriteStringDirect: PUBLIC PROCEDURE [t: STRING, s: StreamHandle];

WriteLineDirect: PUBLIC PROCEDURE [t: STRING, s: StreamHandle];

ReadLong: PUBLIC PROCEDURE [s: StreamHandle] RETURNS [LONG UNSPECIFIED];

ReadShort: PUBLIC PROCEDURE [s: StreamHandle] RETURNS [UNSPECIFIED];

WriteLong: PUBLIC PROCEDURE [n:LONG UNSPECIFIED, s: StreamHandle];

WriteShort: PUBLIC PROCEDURE [n:UNSPECIFIED, s: StreamHandle];

PutShort: PUBLIC PROCEDURE [i: UNSPECIFIED, s: StreamHandle];

GetShort: PUBLIC PROCEDURE [s:StreamHandle] RETURNS [UNSPECIFIED];

PutLong: PUBLIC PROCEDURE [i: LONG UNSPECIFIED, s: StreamHandle];

GetLong: PUBLIC PROCEDURE [s:StreamHandle] RETURNS [LONG UNSPECIFIED];

PutReal: PROCEDURE [r: REAL, s:StreamHandle];

GetReal: PROCEDURE [s:StreamHandle] RETURNS [r: REAL];

DeleteFile: PUBLIC PROCEDURE [s:STRING];

WriteLongDecimal: PUBLIC PROCEDURE[n: LONG CARDINAL];

END.
(635)\147b9B54b9B41b16B49b15B50b17B50b15B50b8B66b9B61b9B59b10B54b8B55b8B60b7B60b7B65b7B40b7B49b10B32b16B