| Richard Levitte | 537c982 | 2011-03-19 10:58:14 +0000 | [diff] [blame] | 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 | |
