(* Copyright (C) 1992, Digital Equipment Corporation *) (* All rights reserved. *) (* See the file COPYRIGHT for a full description. *) (* *) (* by Steve Glassman, Mark Manasse and Greg Nelson *) (* Last modified on Mon Feb 24 13:56:56 PST 1992 by muller *) (* modified on Wed Sep 11 15:18:17 PDT 1991 by msm *) <*PRAGMA LL*> INTERFACE Env; IMPORT Text; PROCEDURE Get(e: Text.T; VAR res: Text.T): BOOLEAN RAISES {}; (* If e is an environment variable, res is set to its value, and TRUE is * returned. If e is not an environment variable, res is unchanged, and * FALSE is returned. *) END Env.