Mercurial > cpython-lru_cache-weakref
view Python/asdl.c @ 45919:855c4290dfd7 legacy-trunk
Fix the tcl-8.4.18.1 path and make sure we cd into the right directory when building tcl/tk.
| author | Trent Nelson <trent.nelson@snakebite.org> |
|---|---|
| date | Wed, 19 Mar 2008 08:06:03 +0000 |
| parents | 1b5b16cdbe0e |
| children | 8cbe0bd93c28 |
line wrap: on
line source
#include "Python.h" #include "asdl.h" asdl_seq * asdl_seq_new(int size, PyArena *arena) { asdl_seq *seq = NULL; size_t n = sizeof(asdl_seq) + (size ? (sizeof(void *) * (size - 1)) : 0); seq = (asdl_seq *)PyArena_Malloc(arena, n); if (!seq) { PyErr_NoMemory(); return NULL; } memset(seq, 0, n); seq->size = size; return seq; } asdl_int_seq * asdl_int_seq_new(int size, PyArena *arena) { asdl_int_seq *seq = NULL; size_t n = sizeof(asdl_seq) + (size ? (sizeof(int) * (size - 1)) : 0); seq = (asdl_int_seq *)PyArena_Malloc(arena, n); if (!seq) { PyErr_NoMemory(); return NULL; } memset(seq, 0, n); seq->size = size; return seq; }
