MICROCERN/kerngen/ubnchx1.inc

   1 #if defined(CERNLIB_B64)
   2 C-  - PARAMETER    (MASK1  = X'FF00000000000000')
   3       PARAMETER    (MASK1  = -72057594037927936 )
   4 #elif defined(CERNLIB_B32)
   5 C-  - PARAMETER    (MASK1  = X'FF000000')
   6       PARAMETER    (MASK1  =  -16777216 )
   7 #endif