| 123456789101112131415161718192021222324252627282930313233343536373839404142434445 |
- 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
|
