Jeremy Hylton | 3e0055f | 2005-10-20 19:59:25 +0000 | [diff] [blame] | 1 | #ifndef Py_ASDL_H |
| 2 | #define Py_ASDL_H |
| 3 | |
| 4 | typedef PyObject * identifier; |
| 5 | typedef PyObject * string; |
| 6 | typedef PyObject * object; |
| 7 | |
Thomas Wouters | 49fd7fa | 2006-04-21 10:40:58 +0000 | [diff] [blame] | 8 | #ifndef __cplusplus |
Jeremy Hylton | 3e0055f | 2005-10-20 19:59:25 +0000 | [diff] [blame] | 9 | typedef enum {false, true} bool; |
Thomas Wouters | 49fd7fa | 2006-04-21 10:40:58 +0000 | [diff] [blame] | 10 | #endif |
Jeremy Hylton | 3e0055f | 2005-10-20 19:59:25 +0000 | [diff] [blame] | 11 | |
| 12 | /* It would be nice if the code generated by asdl_c.py was completely |
| 13 | independent of Python, but it is a goal the requires too much work |
| 14 | at this stage. So, for example, I'll represent identifiers as |
| 15 | interned Python strings. |
| 16 | */ |
| 17 | |
| 18 | /* XXX A sequence should be typed so that its use can be typechecked. */ |
| 19 | |
Jeremy Hylton | 3e0055f | 2005-10-20 19:59:25 +0000 | [diff] [blame] | 20 | typedef struct { |
| 21 | int size; |
Jeremy Hylton | 3e0055f | 2005-10-20 19:59:25 +0000 | [diff] [blame] | 22 | void *elements[1]; |
| 23 | } asdl_seq; |
| 24 | |
Thomas Wouters | 49fd7fa | 2006-04-21 10:40:58 +0000 | [diff] [blame] | 25 | typedef struct { |
| 26 | int size; |
| 27 | int elements[1]; |
| 28 | } asdl_int_seq; |
| 29 | |
Neal Norwitz | adb69fc | 2005-12-17 20:54:49 +0000 | [diff] [blame] | 30 | asdl_seq *asdl_seq_new(int size, PyArena *arena); |
Thomas Wouters | 49fd7fa | 2006-04-21 10:40:58 +0000 | [diff] [blame] | 31 | asdl_int_seq *asdl_int_seq_new(int size, PyArena *arena); |
Jeremy Hylton | 3e0055f | 2005-10-20 19:59:25 +0000 | [diff] [blame] | 32 | |
Jeremy Hylton | 3e0055f | 2005-10-20 19:59:25 +0000 | [diff] [blame] | 33 | #define asdl_seq_GET(S, I) (S)->elements[(I)] |
Jeremy Hylton | a829313 | 2006-02-28 17:58:27 +0000 | [diff] [blame] | 34 | #define asdl_seq_LEN(S) ((S) == NULL ? 0 : (S)->size) |
| 35 | #ifdef Py_DEBUG |
Jeremy Hylton | 3e0055f | 2005-10-20 19:59:25 +0000 | [diff] [blame] | 36 | #define asdl_seq_SET(S, I, V) { \ |
| 37 | int _asdl_i = (I); \ |
| 38 | assert((S) && _asdl_i < (S)->size); \ |
| 39 | (S)->elements[_asdl_i] = (V); \ |
| 40 | } |
Jeremy Hylton | 3e0055f | 2005-10-20 19:59:25 +0000 | [diff] [blame] | 41 | #else |
Jeremy Hylton | 3e0055f | 2005-10-20 19:59:25 +0000 | [diff] [blame] | 42 | #define asdl_seq_SET(S, I, V) (S)->elements[I] = (V) |
Jeremy Hylton | 3e0055f | 2005-10-20 19:59:25 +0000 | [diff] [blame] | 43 | #endif |
Jeremy Hylton | 3e0055f | 2005-10-20 19:59:25 +0000 | [diff] [blame] | 44 | |
Jeremy Hylton | 3e0055f | 2005-10-20 19:59:25 +0000 | [diff] [blame] | 45 | #endif /* !Py_ASDL_H */ |