Copyright (C) 1994, Digital Equipment Corp. INTERFACE OpSys; EXCEPTION Error; PROCEDURE GetHostName (): TEXT RAISES {Error}; END OpSys.