diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2024-06-01 16:13:39 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2024-06-01 16:13:39 (GMT) |
| commit | 4a25523bd51f705a6a6aad227de13267caef05dc (patch) | |
| tree | 528ef69b321212a720a4ab82576c88bfcee3621e /generic/tclParse.h | |
| parent | 4b02aec22c3f21d2039edd7f7143abe460fdb5b4 (diff) | |
| download | tcl-4a25523bd51f705a6a6aad227de13267caef05dc.zip tcl-4a25523bd51f705a6a6aad227de13267caef05dc.tar.gz tcl-4a25523bd51f705a6a6aad227de13267caef05dc.tar.bz2 | |
Some tidying up, mostly of indentation
Diffstat (limited to 'generic/tclParse.h')
| -rw-r--r-- | generic/tclParse.h | 25 |
1 files changed, 14 insertions, 11 deletions
diff --git a/generic/tclParse.h b/generic/tclParse.h index b28ac8c..1381b30 100644 --- a/generic/tclParse.h +++ b/generic/tclParse.h @@ -1,18 +1,21 @@ /* - * Minimal set of shared macro definitions and declarations so that multiple + * Minimal set of shared flag definitions and declarations so that multiple * source files can make use of the parsing table in tclParse.c */ -#define TYPE_NORMAL 0 -#define TYPE_SPACE 0x1 -#define TYPE_COMMAND_END 0x2 -#define TYPE_SUBS 0x4 -#define TYPE_QUOTE 0x8 -#define TYPE_CLOSE_PAREN 0x10 -#define TYPE_CLOSE_BRACK 0x20 -#define TYPE_BRACE 0x40 -#define TYPE_OPEN_PAREN 0x80 -#define TYPE_BAD_ARRAY_INDEX (TYPE_OPEN_PAREN|TYPE_CLOSE_PAREN|TYPE_QUOTE|TYPE_BRACE) +enum ParseTypeFlags { + TYPE_NORMAL = 0, + TYPE_SPACE = 0x1, + TYPE_COMMAND_END = 0x2, + TYPE_SUBS = 0x4, + TYPE_QUOTE = 0x8, + TYPE_CLOSE_PAREN = 0x10, + TYPE_CLOSE_BRACK = 0x20, + TYPE_BRACE = 0x40, + TYPE_OPEN_PAREN = 0x80, + TYPE_BAD_ARRAY_INDEX = ( + TYPE_OPEN_PAREN | TYPE_CLOSE_PAREN | TYPE_QUOTE | TYPE_BRACE) +}; #define CHAR_TYPE(c) tclCharTypeTable[(unsigned char)(c)] |