<<>> <> <> <> <> <<>> DIRECTORY CStrings USING [ CString ]; UXEnviron: CEDAR DEFINITIONS ~ { CString: TYPE ~ CStrings.CString; <> <> <> <> FindEnv: PROC [ name: CString, offset: INT32 ] RETURNS [ value: CString ] ~ TRUSTED MACHINE CODE { "XR_findenv" }; GetEnv: PROC [ name: CString ] RETURNS [ value: CString ] ~ TRUSTED MACHINE CODE { "XR_getenv" }; SetEnv: PROC [ name: CString, value: CString, rewrite: BOOL ] RETURNS [ new: BOOL ] ~ TRUSTED MACHINE CODE { "XR_setenv" }; UnsetEnv: PROC [ name: CString ] ~ TRUSTED MACHINE CODE { "XR_unsetenv" }; }.