home *** CD-ROM | disk | FTP | other *** search
/ Aminet 18 / aminetcdnumber181997.iso / Aminet / dev / m2 / CycloneModules.lha / modules / txt / BulletL.def < prev    next >
Text File  |  1996-09-23  |  1KB  |  47 lines
  1. (*
  2. **    Cyclone Modula-2 Interface module:
  3. **    $VER: bullet_protos.h 38.0 (19.6.92)
  4. **    Includes Release 40.15
  5. **
  6. **    C prototypes. For use with 32 bit integers only.
  7. **
  8. **    (C) Copyright 1990-1993 Commodore-Amiga, Inc.
  9. **        All Rights Reserved
  10. **
  11. **      Interface module by Marcel Timmermans
  12. **      (C) Copyright 1995-1996 Marcel Timmermans
  13. **          All Rights Reserved
  14. *)
  15.  
  16. DEFINITION MODULE BulletL {"bullet.library",33};
  17.  
  18. (*$ Implementation- *)
  19.  
  20.  
  21. FROM SYSTEM IMPORT ADDRESS;
  22. IMPORT ed:ExecD,Reg,df:DiskfontD;
  23.  
  24.  
  25. VAR
  26.  BulletBase : ed.LibraryPtr;
  27.  
  28.  
  29. CONST
  30.  
  31.  bulletMinVersion=33;
  32.  bulletName="bullet.library";
  33.  
  34.  
  35. PROCEDURE OpenEngine():df.GlyphEnginePtr; CODE -30;
  36.  
  37. PROCEDURE CloseEngine(glyphEngine{Reg.A0}:df.GlyphEnginePtr); CODE -36;
  38.  
  39. PROCEDURE SetInfoA(glyphEngine{Reg.A0}:df.GlyphEnginePtr;tagList{Reg.A1}:ADDRESS):LONGCARD; CODE -42;
  40.  
  41. PROCEDURE ObtainInfoA(glyphEngine{Reg.A0}:df.GlyphEnginePtr;tagList{Reg.A1}:ADDRESS):LONGCARD; CODE -48;
  42.  
  43. PROCEDURE ReleaseInfoA(glyphEngine{Reg.A0}:df.GlyphEnginePtr;tagList{Reg.A1}:ADDRESS):LONGCARD; CODE -54;
  44.  
  45.  
  46. END BulletL.
  47.