home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Pascal / MAXONPASCAL2.DMS / in.adf / INCLUDE / battmem.lib < prev    next >
Encoding:
Text File  |  1994-07-25  |  492 b   |  18 lines
  1. {$if not def BATTMEM_LIB_H} CONST BATTMEM_LIB_H=0;
  2.  
  3. { *************************************************************
  4.   ** KickPascal-Include-Datei "battmem.lib" zu Kickstart 3.0 **
  5.   ************************************************************* }
  6.  
  7. VAR BattMemBase : Ptr;
  8.  
  9. LIBRARY BattMemBase:
  10.  
  11.  -6 : PROCEDURE ObtainBattSemaphore;
  12. -12 : PROCEDURE ReleaseBattSemaphore;
  13. -18 : FUNCTION  ReadBattMem(A0:Ptr; D0,D1:Long):Long;
  14. -24 : FUNCTION  WriteBattMem(A0:Ptr; D0,D1:Long):Long;
  15. END;
  16.  
  17. {$endif}
  18.