diff --git a/eval.c b/eval.c index 828cf8a2..58a5ee1e 100644 --- a/eval.c +++ b/eval.c @@ -2078,7 +2078,7 @@ sexp sexp_make_standard_env_op (sexp ctx, sexp self, sexp_sint_t n, sexp version sexp_gc_var1(env); sexp_gc_preserve1(ctx, env); env = sexp_make_primitive_env(ctx, version); - if (! sexp_exceptionp(env)) env = sexp_load_standard_env(ctx, env, version); + if (! sexp_exceptionp(env)) env = sexp_load_standard_env(ctx, env, SEXP_SEVEN); sexp_gc_release1(ctx); return env; }