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