crypto/vms_rms.h

   1
   2 #ifdef NAML$C_MAXRSS
   3
   4 # define CC_RMS_NAMX cc$rms_naml
   5 # define FAB_NAMX fab$l_naml
   6 # define FAB_OR_NAML( fab, naml) naml
   7 # define FAB_OR_NAML_DNA naml$l_long_defname
   8 # define FAB_OR_NAML_DNS naml$l_long_defname_size
   9 # define FAB_OR_NAML_FNA naml$l_long_filename
  10 # define FAB_OR_NAML_FNS naml$l_long_filename_size
  11 # define NAMX_ESA naml$l_long_expand
  12 # define NAMX_ESL naml$l_long_expand_size
  13 # define NAMX_ESS naml$l_long_expand_alloc
  14 # define NAMX_NOP naml$b_nop
  15 # define SET_NAMX_NO_SHORT_UPCASE( nam) nam.naml$v_no_short_upcase = 1
  16
  17 # if __INITIAL_POINTER_SIZE == 64
  18 #  define NAMX_DNA_FNA_SET(fab) fab.fab$l_dna = (__char_ptr32) -1; \
  19    fab.fab$l_fna = (__char_ptr32) -1;
  20 # else /* __INITIAL_POINTER_SIZE == 64 */
  21 #  define NAMX_DNA_FNA_SET(fab) fab.fab$l_dna = (char *) -1; \
  22    fab.fab$l_fna = (char *) -1;
  23 # endif /* __INITIAL_POINTER_SIZE == 64 [else] */
  24
  25 # define NAMX_MAXRSS NAML$C_MAXRSS
  26 # define NAMX_STRUCT NAML
  27
  28 #else /* def NAML$C_MAXRSS */
  29
  30 # define CC_RMS_NAMX cc$rms_nam
  31 # define FAB_NAMX fab$l_nam
  32 # define FAB_OR_NAML( fab, naml) fab
  33 # define FAB_OR_NAML_DNA fab$l_dna
  34 # define FAB_OR_NAML_DNS fab$b_dns
  35 # define FAB_OR_NAML_FNA fab$l_fna
  36 # define FAB_OR_NAML_FNS fab$b_fns
  37 # define NAMX_ESA nam$l_esa
  38 # define NAMX_ESL nam$b_esl
  39 # define NAMX_ESS nam$b_ess
  40 # define NAMX_NOP nam$b_nop
  41 # define NAMX_DNA_FNA_SET(fab)
  42 # define NAMX_MAXRSS NAM$C_MAXRSS
  43 # define NAMX_STRUCT NAM
  44 # ifdef NAM$M_NO_SHORT_UPCASE
  45 #  define SET_NAMX_NO_SHORT_UPCASE( nam) naml.naml$v_no_short_upcase = 1
  46 # else /* def NAM$M_NO_SHORT_UPCASE */
  47 #  define SET_NAMX_NO_SHORT_UPCASE( nam)
  48 # endif /* def NAM$M_NO_SHORT_UPCASE [else] */
  49
  50 #endif /* def NAML$C_MAXRSS [else] */
  51