home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / xc212os2.zip / DEF / realinou.def < prev    next >
Text File  |  1994-12-22  |  198b  |  11 lines
  1. (* Original module: N. Wirth, PIM-3, 1985 *)
  2. DEFINITION MODULE RealInOut;
  3.  
  4. VAR Done: BOOLEAN;
  5.  
  6. PROCEDURE ReadReal(VAR r: REAL);
  7.  
  8. PROCEDURE WriteReal(r: REAL; w: CARDINAL);
  9.  
  10. END RealInOut.
  11.