home *** CD-ROM | disk | FTP | other *** search
/ TestDrive Super Store 2.3 / TESTDRIVE_2.ISO / realizer / lib / stdbits.rlz < prev    next >
Encoding:
Text File  |  1992-09-30  |  897 b   |  26 lines
  1. '***********************************************************************
  2. '    StdBits.rlz                              
  3. '
  4. '    Standard Bitwise Logical Function Library
  5. '
  6. '    Copyright ⌐ 1991-1992 Computer Associates International, Inc.
  7. '    All rights reserved.
  8. '
  9. '***********************************************************************
  10.  
  11. IF QVar(%%StdBits, _Defined) THEN
  12.     EXIT MACRO
  13. END IF
  14. %%StdBits = 1
  15.  
  16. EXTERNAL "standard" FUNC BitAnd(DWORD, DWORD) AS DWORD
  17. EXTERNAL "standard" FUNC BitOr(DWORD, DWORD) AS DWORD
  18. EXTERNAL "standard" FUNC BitXor(DWORD, DWORD) AS DWORD
  19. EXTERNAL "standard" FUNC BitLShift(DWORD, DWORD) AS DWORD
  20. EXTERNAL "standard" FUNC BitRShift(DWORD, DWORD) AS DWORD
  21. EXTERNAL "standard" FUNC BitNot(DWORD) AS DWORD
  22. EXTERNAL "standard" FUNC BitSet(DWORD, DWORD) AS DWORD
  23. EXTERNAL "standard" FUNC BitClear(DWORD, DWORD) AS DWORD
  24. EXTERNAL "standard" FUNC BitTest(DWORD, DWORD) AS DWORD
  25.  
  26.