mirror of
https://github.com/ashinn/chibi-scheme.git
synced 2025-07-10 14:37:34 +02:00
fixing TYPE_DEFS=0
This commit is contained in:
parent
47add027d6
commit
07c5c7a6f8
2 changed files with 3 additions and 3 deletions
|
@ -337,7 +337,7 @@
|
|||
#endif
|
||||
|
||||
#ifndef SEXP_USE_GLOBAL_TYPES
|
||||
#define SEXP_USE_GLOBAL_TYPES (! SEXP_USE_TYPE_DEFS)
|
||||
#define SEXP_USE_GLOBAL_TYPES 0
|
||||
#endif
|
||||
|
||||
#ifndef SEXP_USE_GLOBAL_SYMBOLS
|
||||
|
|
4
sexp.c
4
sexp.c
|
@ -129,13 +129,13 @@ static struct sexp_type_struct _sexp_type_specs[] = {
|
|||
struct sexp_struct *sexp_type_specs = _sexp_type_specs;
|
||||
#endif
|
||||
|
||||
#define SEXP_INIT_NUM_TYPES (SEXP_NUM_CORE_TYPES*2)
|
||||
|
||||
#if SEXP_USE_TYPE_DEFS
|
||||
|
||||
#if SEXP_USE_GLOBAL_TYPES
|
||||
static sexp_uint_t sexp_num_types = SEXP_NUM_CORE_TYPES;
|
||||
static sexp_uint_t sexp_type_array_size = SEXP_NUM_CORE_TYPES;
|
||||
#else
|
||||
#define SEXP_INIT_NUM_TYPES (SEXP_NUM_CORE_TYPES*2)
|
||||
#endif
|
||||
|
||||
sexp sexp_register_type_op (sexp ctx sexp_api_params(self, n), sexp name,
|
||||
|
|
Loading…
Add table
Reference in a new issue