From 738cb3ac9af81e5896f90568e751b81bdaef074e Mon Sep 17 00:00:00 2001 From: Alex Shinn Date: Wed, 27 Feb 2013 08:48:13 +0900 Subject: [PATCH] Fixed typo for building ast w/o threads - #if not #ifdef. --- lib/chibi/ast.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lib/chibi/ast.c b/lib/chibi/ast.c index 359f7caa..07469058 100644 --- a/lib/chibi/ast.c +++ b/lib/chibi/ast.c @@ -336,7 +336,7 @@ static sexp sexp_gc_op (sexp ctx, sexp self, sexp_sint_t n) { return sexp_make_unsigned_integer(ctx, sum_freed); } -#ifdef SEXP_USE_GREEN_THREADS +#if SEXP_USE_GREEN_THREADS static sexp sexp_set_atomic (sexp ctx, sexp self, sexp_sint_t n, sexp new) { sexp res = sexp_global(ctx, SEXP_G_ATOMIC_P); sexp_global(ctx, SEXP_G_ATOMIC_P) = new; @@ -485,7 +485,7 @@ sexp sexp_init_library (sexp ctx, sexp self, sexp_sint_t n, sexp env, const char sexp_define_foreign(ctx, env, "object-size", 1, sexp_object_size); sexp_define_foreign_opt(ctx, env, "integer->immediate", 2, sexp_integer_to_immediate, SEXP_FALSE); sexp_define_foreign(ctx, env, "gc", 0, sexp_gc_op); -#ifdef SEXP_USE_GREEN_THREADS +#if SEXP_USE_GREEN_THREADS sexp_define_foreign(ctx, env, "%set-atomic!", 1, sexp_set_atomic); #endif sexp_define_foreign(ctx, env, "string-contains", 2, sexp_string_contains);