From 6583827f4e1767140cfdc0cf547069d708122574 Mon Sep 17 00:00:00 2001 From: Alex Shinn Date: Wed, 7 May 2014 15:19:49 -0400 Subject: [PATCH] -t is a noop flag if not compiled with SEXP_USE_MODULES --- main.c | 2 ++ 1 file changed, 2 insertions(+) diff --git a/main.c b/main.c index 841a5be8..0a855063 100644 --- a/main.c +++ b/main.c @@ -533,6 +533,7 @@ void run_main (int argc, char **argv) { mods_loaded = 1; load_init(0); arg = ((argv[i][2] == '\0') ? argv[++i] : argv[i]+2); +#if SEXP_USE_MODULES suffix = strrchr(arg, '.'); sym = sexp_intern(ctx, suffix + 1, -1); *(char*)suffix = '\0'; @@ -543,6 +544,7 @@ void run_main (int argc, char **argv) { tmp = check_exception(ctx, sexp_eval_string(ctx, "(environment '(chibi trace))", -1, sexp_meta_env(ctx))); tmp = sexp_env_ref(ctx, tmp, sexp_intern(ctx, "trace-cell", -1), 0); check_exception(ctx, sexp_apply(ctx, tmp, sym)); +#endif break; default: fprintf(stderr, "unknown option: %s\n", argv[i]);