(* Copyright (C) 1989, Digital Equipment Corporation *) (* All rights reserved. *) (* See the file COPYRIGHT for a full description. *) (* Last modified on Sun Jun 10 05:45:18 1990 by muller *) (* modified on Thu Nov 2 18:18:07 1989 by kalsow *) INTERFACE Parse; IMPORT Formatter, Ctypes; TYPE Style = {SRC, EMULLER}; <*EXTERNAL*> PROCEDURE initParser (inputFile : Ctypes.char_star; output : Formatter.T; calledFromEmacs : BOOLEAN; allowLowerCase : BOOLEAN; initialOffset : INTEGER; style : Style); <*EXTERNAL*> PROCEDURE yyparse (); END Parse.