asdl.h 1.2 KB
Newer Older
Jeremy Hylton's avatar
Jeremy Hylton committed
1 2 3 4 5
#ifndef Py_ASDL_H
#define Py_ASDL_H

typedef PyObject * identifier;
typedef PyObject * string;
6
typedef PyObject * bytes;
Jeremy Hylton's avatar
Jeremy Hylton committed
7
typedef PyObject * object;
8
typedef PyObject * singleton;
Victor Stinner's avatar
Victor Stinner committed
9
typedef PyObject * constant;
Jeremy Hylton's avatar
Jeremy Hylton committed
10 11 12 13 14 15 16 17 18 19

/* It would be nice if the code generated by asdl_c.py was completely
   independent of Python, but it is a goal the requires too much work
   at this stage.  So, for example, I'll represent identifiers as
   interned Python strings.
*/

/* XXX A sequence should be typed so that its use can be typechecked. */

typedef struct {
20
    Py_ssize_t size;
Jeremy Hylton's avatar
Jeremy Hylton committed
21 22 23
    void *elements[1];
} asdl_seq;

24
typedef struct {
25
    Py_ssize_t size;
26 27 28
    int elements[1];
} asdl_int_seq;

29 30
asdl_seq *_Py_asdl_seq_new(Py_ssize_t size, PyArena *arena);
asdl_int_seq *_Py_asdl_int_seq_new(Py_ssize_t size, PyArena *arena);
Jeremy Hylton's avatar
Jeremy Hylton committed
31 32

#define asdl_seq_GET(S, I) (S)->elements[(I)]
33 34
#define asdl_seq_LEN(S) ((S) == NULL ? 0 : (S)->size)
#ifdef Py_DEBUG
35 36 37 38
#define asdl_seq_SET(S, I, V) \
    do { \
        Py_ssize_t _asdl_i = (I); \
        assert((S) != NULL); \
39
        assert(0 <= _asdl_i && _asdl_i < (S)->size); \
Jeremy Hylton's avatar
Jeremy Hylton committed
40
        (S)->elements[_asdl_i] = (V); \
41
    } while (0)
Jeremy Hylton's avatar
Jeremy Hylton committed
42 43 44 45 46
#else
#define asdl_seq_SET(S, I, V) (S)->elements[I] = (V)
#endif

#endif /* !Py_ASDL_H */