home *** CD-ROM | disk | FTP | other *** search
/ Simtel MSDOS 1992 September / Simtel20_Sept92.cdr / msdos / ega / egatest.arc / POINTLIB.DEF < prev    next >
Text File  |  1986-12-22  |  287b  |  9 lines
  1. DEFINITION MODULE PointLib;
  2.  
  3. EXPORT QUALIFIED Point, BumpPointY, BumpPointX, MakePoint;
  4.  
  5.   TYPE Point = RECORD x,y : INTEGER END;
  6.   PROCEDURE MakePoint (VAR p : Point; x, y : INTEGER);
  7.   PROCEDURE BumpPointY (VAR p : Point);
  8.   PROCEDURE BumpPointX (VAR p : Point);
  9. END PointLib.