-- File CIFExtIODefs.mesa
-- Written by Dan Fitzpatrick, June 1980
-- Last updated: December 21, 1981  2:57 PM

-- CIF Circuit Extractor I/O Routines

DIRECTORY

StreamDefs: FROM "StreamDefs" USING[DiskHandle, StreamHandle];

CIFExtIODefs: 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];

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];

OpenFile: PUBLIC PROCEDURE [str:STRING, ch:CHARACTER] RETURNS[stream:DiskHandle];

CloseStream: PUBLIC PROCEDURE [stream:DiskHandle];

DeleteFile: PUBLIC PROCEDURE [s:STRING];

END.
(635)\151b9B66b12B41b16B49b15B50b17B50b15B50b8B66b9B61b9B59b10B54b7B60b7B65b7B40b7B48b9B74b12B41b10B