Listing:

    1  DEFINITION MODULE MemCompress;
    2  (*
    3   *  REPERTOIRE
    4   *  Release 1.6
    5   *  By Charles Bradford and Cole Brecheen
    6   *  (c) Copyright 1985-1992 PMI
    7   *  Green Bay, Wisconsin
    8   *  All rights reserved
    9   *  (414) 468-6040
   10   *
   11   *  $Header:   D:/logfiles/defs/memcompr.dev   1.4   30 Dec 1990 18:02:16   coleb  $
   12   *
   13   *)
   14  
   15  
   16    FROM SYSTEM IMPORT ADDRESS;
   17  
   18    TYPE
   19      CompressError = (NoCompressError,
   20        AllocationFailed,
   21          CompressedTooLarge, Corruption);
   22  
   23    VAR
   24      ErrorFlag: CompressError;
*****                 ^ not supported yet
   25  
   26    PROCEDURE Compress(InAddress: ADDRESS; InSize:
   27        CARDINAL; VAR OutAddress: ADDRESS; VAR
   28        OutSize: CARDINAL; OutAlloc: BOOLEAN):
   29        BOOLEAN;
   30  
   31    PROCEDURE Decompress(InAddress: ADDRESS; InSize:
   32        CARDINAL; OutAddress: ADDRESS; OutSize:
   33        CARDINAL);
   34  
   35    PROCEDURE Init();
   36  
   37  END MemCompress.
*****      ^ not supported yet

    2 errors