home *** CD-ROM | disk | FTP | other *** search
- |##########|
- |#MAGIC #|DBBCMDKO
- |#PROJECT #|""
- |#PATHS #|"EGSProject"
- |#FLAGS #|xx---x--x-----x-----------------
- |#USERSW #|--------------------------------
- |#USERMASK#|--------------------------------
- |#SWITCHES#|x--x-x----------
- |##########|
- $$ConstChk:=FALSE
- (* $V- $R- $S- $N- *)
- IMPLEMENTATION MODULE EGSAlphaBlit;
-
- FROM Exec IMPORT OpenLibrary,CloseLibrary;
- FROM Exceptions IMPORT CouldNotOpenLibrary;
-
-
- BEGIN
- EABlitBase:=OpenLibrary("egsalphablit.library",0);
- ASSERT(EABlitBase#NIL,CouldNotOpenLibrary);
- CLOSE
- IF EABlitBase#NIL THEN
- CloseLibrary(EABlitBase);EABlitBase:=NIL
- END;
- END EGSAlphaBlit.
-
-
-