home *** CD-ROM | disk | FTP | other *** search
- OPT MODULE
- OPT EXPORT
- -> Module created with E:bin/fd2module from YAECv18 package.
- OPT NDDC
- #macro AllocUnit(unitNum) IS (D0:=unitNum) BUT (A6:=diskbase) BUT ASM ' jsr -6(a6)'
- #macro FreeUnit(unitNum) IS (D0:=unitNum) BUT (A6:=diskbase) BUT ASM ' jsr -12(a6)'
- #macro GetUnit(unitPointer) IS (A1:=unitPointer) BUT (A6:=diskbase) BUT ASM ' jsr -18(a6)'
- #macro GiveUnit() IS (A6:=diskbase) BUT ASM ' jsr -24(a6)'
- #macro GetUnitID(unitNum) IS (D0:=unitNum) BUT (A6:=diskbase) BUT ASM ' jsr -30(a6)'
- -> ------ new for V37 ------
- #macro ReadUnitID(unitNum) IS (D0:=unitNum) BUT (A6:=diskbase) BUT ASM ' jsr -36(a6)'
-