home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #27 / NN_1992_27.iso / spool / alt / sources / 2600 / splayItem.def < prev   
Encoding:
Modula Definition  |  1992-11-21  |  505 b   |  28 lines
  1. DEFINITION MODULE splayItem;
  2. (*
  3.      Title:        
  4.     Last Edit:    Sun Nov 22 12:31:05 1992
  5.     Author:        Johan Persson at my9
  6.  
  7. *)
  8.   TYPE
  9.      T = INTEGER;
  10.  
  11.   PROCEDURE cmp(a:T; b:T): INTEGER;
  12.   (* Returns:       cmp(a,b) = 0  => a=b
  13.            cmp(a,b) = 1  => a>b
  14.            cmp(a,b) = -1 => a<b
  15.   *)
  16.   
  17.   PROCEDURE create(VAR a:T);
  18.   (* Post: A new object has been created 
  19.   *) 
  20.   
  21.   PROCEDURE destroy(VAR a:T);
  22.   (* Pre: create(a)
  23.      Post: All memory occupied by 'a' has been returned.
  24.            a = NIL 
  25.   *)
  26.   
  27. END splayItem.
  28.