home *** CD-ROM | disk | FTP | other *** search
/ Programmer Power Tools / Programmer Power Tools.iso / microcrn / issue_48.arc / RLEDCOMP.ARC / RLEDCOMP.DEF < prev    next >
Encoding:
Text File  |  1989-05-18  |  1.0 KB  |  27 lines
  1. DEFINITION MODULE RleDComp;
  2.  
  3. IMPORT SYSTEM;
  4. IMPORT FileSystem;
  5.  
  6. (*
  7.    Michael S. Hunt   April 4, 1989
  8.    released into the public domain
  9. *)
  10.  
  11.  
  12. PROCEDURE RleCompBuff (src : ARRAY OF CHAR;
  13.               VAR dest : ARRAY OF CHAR;
  14.                       repeatCode : CHAR;
  15.               srcSize : CARDINAL;
  16.                       VAR destSize : CARDINAL);
  17.  
  18. PROCEDURE RleDecompBuff (src : ARRAY OF CHAR;
  19.             srcSize : CARDINAL;
  20.             VAR dest: ARRAY OF CHAR);
  21.  
  22. PROCEDURE RleCompFile (VAR sFil, dFil : FileSystem.File; repeatCode : CHAR);
  23.  
  24. PROCEDURE RleDecompFile (VAR sFil, dFil: FileSystem.File);
  25.  
  26. END RleDComp.