fpuio.def 496 B

123456789101112
  1. DEFINITION MODULE FpuIO;
  2. (* gm2/PIM floating-point I/O. V3 models REAL and LONGREAL as the same
  3. 8-byte type, so both read/write paths are the same. *)
  4. PROCEDURE ReadReal (VAR x : LONGREAL);
  5. PROCEDURE ReadLongReal (VAR x : LONGREAL);
  6. PROCEDURE WriteReal (x : LONGREAL; width, decimals : CARDINAL);
  7. PROCEDURE WriteLongReal (x : LONGREAL; width, decimals : CARDINAL);
  8. PROCEDURE WriteLongInt (x : LONGINT; width : CARDINAL);
  9. PROCEDURE WriteLongCard (x : LONGCARD; width : CARDINAL);
  10. END FpuIO.