home *** CD-ROM | disk | FTP | other *** search
/ Fresh Fish 2 / FFMCD02.bin / new / dev / misc / p2c / home / system.m2 < prev    next >
Text File  |  1993-12-21  |  803b  |  47 lines
  1.  
  2. (* Declarations for Modula-2 built-in objects *)
  3.  
  4. (* Note: All functions with unusual syntaxes are not included here *)
  5.  
  6.  
  7.  
  8. DEFINITION MODULE SYSTEM;   (*PERMANENT*)
  9.  
  10. TYPE
  11.    PROC = PROCEDURE;
  12.    ADDRESS = POINTER TO WORD;
  13.  
  14. FUNCTION  CAP(c : CHAR) : CHAR;
  15. FUNCTION  CHR(i : INTEGER) : CHAR;
  16. FUNCTION  ODD(i : INTEGER) : BOOLEAN;
  17. FUNCTION  ROUND(x : REAL) : INTEGER;
  18. FUNCTION  TRUNC(x : REAL) : INTEGER;
  19. (* Other things are defined internally to p2c *)
  20.  
  21. END;
  22.  
  23.  
  24.  
  25. DEFINITION MODULE InOut;
  26.  
  27.  
  28.  
  29. END;
  30.  
  31.  
  32.  
  33. DEFINITION MODULE MathLib0;
  34.  
  35. FUNCTION  arctan(x : REAL) : REAL;
  36. FUNCTION  cos(x : REAL) : REAL;
  37. FUNCTION  entier(x : REAL) : INTEGER;
  38. FUNCTION  exp(x : REAL) : REAL;
  39. FUNCTION  ln(x : REAL) : REAL;
  40. FUNCTION  real(i : INTEGER) : REAL;
  41. FUNCTION  sin(x : REAL) : REAL;
  42. FUNCTION  sqrt(x : REAL) : REAL;
  43.  
  44. END.
  45.  
  46.  
  47.