home *** CD-ROM | disk | FTP | other *** search
/ Aminet 18 / aminetcdnumber181997.iso / Aminet / dev / m2 / CycloneModules.lha / modules / txt / AmigaLib.def < prev    next >
Text File  |  1996-08-22  |  814b  |  27 lines
  1. DEFINITION MODULE AmigaLib;
  2.  
  3. FROM SYSTEM IMPORT ADDRESS;
  4. IMPORT Reg,ud:UtilityD,id:IntuitionD;
  5.  
  6. VAR RangeSeed:CARDINAL;
  7.  
  8. PROCEDURE FastRand(seed{Reg.D0}:LONGINT):LONGINT;
  9. PROCEDURE RangeRand(maxValue{Reg.D5}:LONGINT):CARDINAL;
  10.  
  11. PROCEDURE CallHookA(hook{Reg.A0}:ud.HookPtr;object{Reg.A2}:ADDRESS;
  12.                     message{Reg.A1}:ADDRESS):ADDRESS;
  13.  
  14. PROCEDURE DoMethodA(obj{Reg.A2}:ADDRESS; msg{Reg.A1}:ADDRESS):ADDRESS;
  15.  
  16. PROCEDURE DoSuperMethodA(cl{Reg.A0}:id.IClassPtr;obj{Reg.A2}:ADDRESS;
  17.                          msg{Reg.A1}:ADDRESS):ADDRESS;
  18.  
  19. PROCEDURE CoerceMethodA(cl{Reg.A0}:id.IClassPtr;obj{Reg.A2}:ADDRESS;
  20.                          msg{Reg.A1}:id.Msg):ADDRESS;
  21.  
  22.  
  23. PROCEDURE SetSuperAttrsA(cl{Reg.A0}:id.IClassPtr;obj{Reg.A2}:ADDRESS;
  24.                          tags{Reg.A1}:ud.Tag):ADDRESS;
  25.  
  26. END AmigaLib.
  27.