Context Navigation

cmeta.h@ 7258c6a

Last change on this file since 7258c6a 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

Line
1	/*
2	=============================================================================
3	cmeta.h -- C-Meta parser macro header
4	Version 3 -- 1987-04-30 -- D.N. Lynx Crowe
5	=============================================================================
6	*/
7
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[];
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.