diff --git a/src/mzscheme/src/eval.c b/src/mzscheme/src/eval.c index ac36f09901..8da7938dca 100644 --- a/src/mzscheme/src/eval.c +++ b/src/mzscheme/src/eval.c @@ -3258,6 +3258,8 @@ Scheme_Object *scheme_sfs(Scheme_Object *o, SFS_Info *info, int max_let_depth) { int init, i; + return o; + SFS_LOG(printf("sfs %d\n", SCHEME_TYPE(o))); if (!info) {