| 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 */ |