(*
    Title: 	FileH - Definitions
    LastEdit:	"Thu Sep 13 15:33:45 1984"
    Author: 	Mick Jordan
		Cambridge University Computer Laboratory

    Key file handling
*)

DEFINITION MODULE FileH;

FROM Streams IMPORT Stream;
FROM SystemTypes IMPORT String;

EXPORT QUALIFIED OpenKeyFile;

PROCEDURE OpenKeyFile(name: String; VAR fname: ARRAY OF CHAR): Stream;
(*  returns full-name of file opened in 'fname'.
*)

END FileH  .

