(*
    Title: 	UnixVersion - Definitions
    LastEdit:	"Thu Mar 29 11:32:25 1984"
    Author: 	Mick Jordan
		Cambridge University Computer Laboratory
*)

DEFINITION MODULE UnixVersion;

EXPORT QUALIFIED GetUnixVersion, UNIXVERSION;

TYPE UNIXVERSION = 
  (UnKnown,     (*  M2UNIX unset or unknown value *)
   BSD41,       (*  Berkeley 4.1 *)
   BSD42        (*  Berkely 4.2 *)
  );

PROCEDURE GetUnixVersion(): UNIXVERSION;
(*  return the version of Unix which we are running under
    from the environment variable M2UNIX
*)

END UnixVersion.
