
Go to the source code of this file.
Defines | |
| #define | FALSE_OPTION (0) |
| #define | TRUE_OPTION (-1) |
| #define | MAX_TRUNCATION_BITS 47 |
| #define | MAKE_DEFAULT_NAME(NAME, STR, SUFFIX) |
| #define FALSE_OPTION (0) |
Definition at line 42 of file cmd_line.m.
| #define MAKE_DEFAULT_NAME | ( | NAME, | |||
| STR, | |||||
| SUFFIX | ) |
{ char *_nmp, *_stp; \
_nmp = NAME; \
_stp = strrchr (STR, SLASH); \
_stp = (_stp == NULL) ? STR : _stp+1; \
while (*_nmp++ = *_stp++) ; \
_stp = strrchr (NAME, DOT); \
if (_stp != NULL && \
(EQUAL_STRS(_stp, ".f") || EQUAL_STRS(_stp, ".F"))) { \
strcpy (++_stp, SUFFIX); \
} \
else if (_stp != NULL && \
(EQUAL_STRS(_stp, ".f90") || EQUAL_STRS(_stp, ".F90"))) { \
strcpy (++_stp, SUFFIX); \
} \
else if (_stp != NULL && EQUAL_STRS(_stp, ".i")) { \
strcpy (++_stp, SUFFIX); \
} \
else { \
_nmp--; \
*_nmp++ = DOT; \
strcpy (_nmp++, SUFFIX); \
} \
}
Definition at line 69 of file cmd_line.m.
Referenced by set_prog_file_names().
| #define MAX_TRUNCATION_BITS 47 |
Definition at line 50 of file cmd_line.m.
Referenced by process_t_option().
| #define TRUE_OPTION (-1) |
Definition at line 43 of file cmd_line.m.
1.6.1