home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 15 / 15.iso / s / s038 / 1.ddi / SUPP.LIF / UTILS.EXT < prev    next >
Encoding:
Text File  |  1992-07-06  |  295 b   |  15 lines
  1.  
  2. check$exception:    PROCEDURE    (sys$call$ptr,status)    EXTERNAL;
  3.     DECLARE    sys$call$ptr    POINTER,
  4.             status            WORD;
  5. END check$exception;
  6.  
  7. decrypt:    PROCEDURE    (char)    BYTE    EXTERNAL;
  8.     DECLARE    char    BYTE;
  9. END decrypt;
  10.  
  11. encrypt:    PROCEDURE    (char)    BYTE    EXTERNAL;
  12.     DECLARE    char    BYTE;
  13. END encrypt;
  14.  
  15.