|
Last change
on this file since 7848656 was 7258c6a, checked in by Thomas Lopatic <thomas@…>, 8 years ago |
|
Use standard integer types.
|
-
Property mode
set to
100644
|
|
File size:
1.1 KB
|
| Rev | Line | |
|---|
| [f40a309] | 1 | /*
|
|---|
| 2 | =============================================================================
|
|---|
| 3 | cmeta.h -- C-Meta parser macro header
|
|---|
| 4 | Version 3 -- 1987-04-30 -- D.N. Lynx Crowe
|
|---|
| 5 | =============================================================================
|
|---|
| 6 | */
|
|---|
| 7 |
|
|---|
| [7258c6a] | 8 | extern void CMinit(int8_t *ip);
|
|---|
| 9 | extern int16_t CMstat(int8_t *msg);
|
|---|
| 10 | extern int16_t CMchr(int8_t c);
|
|---|
| 11 | extern int16_t CMuchr(int8_t c);
|
|---|
| 12 | extern int16_t CMstr(int8_t *s);
|
|---|
| 13 | extern int16_t CMustr(int8_t *s);
|
|---|
| 14 | extern int16_t CMlong(void);
|
|---|
| 15 | extern int16_t CMdig(void);
|
|---|
| 16 | extern int16_t CMlist(int8_t *l[]);
|
|---|
| 17 | extern int16_t CMulist(int8_t *l[]);
|
|---|
| 18 |
|
|---|
| 19 | extern int16_t QQsw;
|
|---|
| 20 | extern int16_t QQanch;
|
|---|
| 21 |
|
|---|
| 22 | extern int8_t *QQin;
|
|---|
| 23 | extern int8_t *QQip;
|
|---|
| 24 | extern int8_t *QQop;
|
|---|
| 25 |
|
|---|
| 26 | extern int32_t QQnum;
|
|---|
| 27 | extern int16_t QQlnum;
|
|---|
| 28 | extern int8_t QQchr;
|
|---|
| 29 | extern int8_t QQdig;
|
|---|
| 30 |
|
|---|
| 31 | extern int8_t QQstr[];
|
|---|
| [f40a309] | 32 |
|
|---|
| 33 | #define CM_CHR(c) CMchr(c)
|
|---|
| 34 | #define CM_UCHR(c) CMuchr(c)
|
|---|
| 35 |
|
|---|
| 36 | #define CM_STR(s) CMstr(s)
|
|---|
| 37 | #define CM_USTR(s) CMustr(s)
|
|---|
| 38 |
|
|---|
| 39 | #define CM_NUM CMlong()
|
|---|
| 40 | #define CM_DIG CMdig()
|
|---|
| 41 |
|
|---|
| 42 | #define CM_LIST(l) CMlist(l)
|
|---|
| 43 | #define CM_ULIST(l) CMulist(l)
|
|---|
| 44 |
|
|---|
| 45 | #define CM_OK return(QQsw = TRUE)
|
|---|
| 46 | #define CM_NOGO return(QQsw = FALSE)
|
|---|
| 47 |
|
|---|
| 48 | #define CM_DBLK if (!QQanch) while (*QQip EQ ' ') ++QQip
|
|---|
Note:
See
TracBrowser
for help on using the repository browser.