home *** CD-ROM | disk | FTP | other *** search
/ Deutsche Edition 1 / Deutsche Edition 1.iso / amok / amok_lha / amok02.lha / M2Code / M2CodeDemo2 / Sort.def < prev    next >
Encoding:
Modula Definition  |  1993-08-16  |  538 b   |  16 lines
  1. DEFINITION MODULE Sort;
  2.  
  3. (*-------------------------------------------------------------------------*)
  4. (*                                                                         *)
  5. (*       Ein 1-Dimensionales CARDINAL-Feld der größe nach sortieren        *)
  6. (*                                                                         *)
  7. (*-------------------------------------------------------------------------*)
  8.  
  9. TYPE
  10.   FeldPtr = POINTER TO ARRAY[0..10000000H] OF CARDINAL;
  11.  
  12. PROCEDURE Sort(Field: FeldPtr; Size: LONGCARD);
  13.  
  14. END Sort.
  15.  
  16.