(* ---------------------------------------------------------------------------- * $Id: maskpathsea.md,v 1.1 1995/03/06 16:31:22 pesch Exp $ * ---------------------------------------------------------------------------- * This file is part of MAS. * ---------------------------------------------------------------------------- * Copyright (c) 1995 Universitaet Passau * ---------------------------------------------------------------------------- * $Log: maskpathsea.md,v $ * Revision 1.1 1995/03/06 16:31:22 pesch * New function masReadOpen. Opens a file using kpathsea if available. * In this case the environment variable MASINPUTS is used as search path, * when opening files for reading. * * ---------------------------------------------------------------------------- *) FOREIGN MODULE maskpathsea; (* kpathsearch Foreign Module. *) PROCEDURE masReadOpen(file: ARRAY OF CHAR): IO_tFile; (* MAS Read Open file is the name of a file which is opened for reading using the kpse_path_search function of the kpathsearch library. The file is returned *) END maskpathsea. (* -EOF- *)