refine error message for bad use of expanded expression

svn: r11005
This commit is contained in:
Matthew Flatt 2008-07-31 12:08:40 +00:00
parent e7c3919d72
commit 9d4949093c

View File

@ -5285,7 +5285,8 @@ scheme_compile_expand_expr(Scheme_Object *form, Scheme_Comp_Env *env,
}
} else {
scheme_wrong_syntax(NULL, NULL, SCHEME_PTR1_VAL(var),
"expanded syntax not in its original context");
"expanded syntax not in its original lexical context"
" (extra bindings or marks in the current context)");
}
}