Last modified on Mon Mar 09 19:04:37 PST 1992 by muller modified on Mon Nov 19 23:46:25 1990 by mjordan
UNSAFE MODULE; IMPORT Ctypes; PROCEDURE Uerror GetFrom_sys_errlist (n: INTEGER): Ctypes.char_star RAISES {}= BEGIN <* ASSERT 0 <= n AND n <= Max *> RETURN sys_errlist[n] END GetFrom_sys_errlist; BEGIN END Uerror.