home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Global Amiga Experience
/
globalamigaexperience.iso
/
compressed
/
development
/
clusterdemo.dms
/
clusterdemo.adf
/
Modules.lha
/
modules
/
txt
/
CiabResource.def
< prev
next >
Wrap
Text File
|
1994-05-25
|
1KB
|
39 lines
|##########|
|#MAGIC #|CLABLLHE
|#PROJECT #|"IMPORTALL"
|#PATHS #|"StdProject"
|#FLAGS #|xx-x-x--x-----x-----------------
|#USERSW #|--------------------------------
|#USERMASK#|--------------------------------
|#SWITCHES#|x-xx-x----------
|##########|
DEFINITION MODULE CiabResource;
(* $A- *)
FROM Exec IMPORT InterruptPtr,Resource,ResourcePtr,Interrupt,IntVector;
FROM Hardware IMPORT CiaIcrFlagSet,IntFlagSet,CiaIcrFlags;
FROM System IMPORT Regs;
TYPE
VAR
CiabBase : ResourcePtr;
LIBRARY CiabBase BY -18
PROCEDURE AbleIcr(mask IN D0 : CiaIcrFlagSet): CiaIcrFlagSet;
LIBRARY CiabBase BY -6
PROCEDURE AddICRVector(icrBit IN D0 : CiaIcrFlags;
interrupt IN A1 : InterruptPtr):InterruptPtr;
LIBRARY CiabBase BY -12
PROCEDURE RemICRVector(icrBit IN D0 : CiaIcrFlags;
interrupt IN A1 : InterruptPtr);
LIBRARY CiabBase BY -24
PROCEDURE SetICR(mask IN D0 : CiaIcrFlagSet):CiaIcrFlagSet;
GROUP
All = CiabBase,AbleIcr,AddICRVector,RemICRVector,SetICR;
END CiabResource.