MINICERN/packlib/zebra/zebra/q_locf.inc

   1 *
   2 * $Id$
   3 *
   4 * $Log$
   5 * Revision 1.2  1997/03/14 17:22:25  mclareni
   6 * WNT mods
   7 *
   8 * Revision 1.1.1.1.2.1  1997/01/21 11:34:16  mclareni
   9 * All mods for Winnt 96a on winnt branch
  10 *
  11 * Revision 1.1.1.1  1996/03/06 10:46:52  mclareni
  12 * Zebra
  13 *
  14 *
  15 #ifndef CERNLIB_ZEBRA_Q_LOCF_INC
  16 #define CERNLIB_ZEBRA_Q_LOCF_INC
  17 *
  18 *
  19 * q_locf.inc
  20 *
  21 #if defined(CERNLIB_CRAY)
  22       LOCF (IZLOC) = LOC (IZLOC)
  23 #elif defined(CERNLIB_QFMSOFT_TEST)
  24 *    This is very dangerous since the DWORD address may be odd too  !!!
  25       LOCF (IZLOC) = LOC (IZLOC)/4
  26 #endif
  27
  28 #endif