home *** CD-ROM | disk | FTP | other *** search
/ Global Amiga Experience / globalamigaexperience.iso / compressed / development / clusterdemo.dms / clusterdemo.adf / Modules.lha / modules / txt / MathIEEEResource.def < prev    next >
Text File  |  1994-05-25  |  1KB  |  40 lines
  1. |##########|
  2. |#MAGIC   #|BIJLBFLF
  3. |#PROJECT #|"IMPORTALL"
  4. |#PATHS   #|"StdProject"
  5. |#FLAGS   #|xx-x-x--x-----x-----------------
  6. |#USERSW  #|--------------------------------
  7. |#USERMASK#|--------------------------------
  8. |#SWITCHES#|x-xx-x----------
  9. |##########|
  10. DEFINITION MODULE MathIEEEResource;
  11. (* $A- *)
  12. FROM System IMPORT PROC;
  13. FROM Exec   IMPORT Node;
  14.  
  15. TYPE
  16.   MathIEEEResourceFlags    = (dblbas,dbltrans,sglbas,sgltrans,extbas,
  17.                               exttrans,makeMeWord = 15);
  18.   MathIEEEResourceFlagSet  = SET OF MathIEEEResourceFlags;
  19.  
  20.   MathIEEEResourcePtr      = POINTER TO MathIEEEResource;
  21.   MathIEEEResource         = RECORD OF Node;
  22.                                flags        : MathIEEEResourceFlagSet;
  23.                                baseAddr     : ANYPTR;
  24.                                dblBasInit,
  25.                                dblTransInit,
  26.                                sglBasInit,
  27.                                sglTransInit,
  28.                                extBasInit,
  29.                                extTransInit : PROC
  30.                              END;
  31.  
  32. VAR
  33.   MathBase  : MathIEEEResourcePtr;
  34.  
  35. GROUP
  36.   All  = MathIEEEResourceFlags,MathIEEEResourceFlagSet,MathIEEEResource,
  37.          MathIEEEResourcePtr,MathBase;
  38.  
  39. END MathIEEEResource.
  40.