Searched refs:sexp_return (Results 1 – 1 of 1) sorted by relevance
| /dports/lang/chibi-scheme/chibi-scheme-0.10/ |
| H A D | eval.c | 812 #define sexp_return(res, val) do {res=val; goto cleanup;} while (0) macro
821 sexp_return(res, sexp_compile_error(ctx, "bad lambda syntax", x)); in analyze_lambda()
825 sexp_return(res, sexp_compile_error(ctx, "non-symbol parameter", x)); in analyze_lambda()
827 sexp_return(res, sexp_compile_error(ctx, "duplicate parameter", x)); in analyze_lambda()
832 sexp_return(res, sexp_compile_error(ctx, "duplicate parameter", x)); in analyze_lambda()
836 if (sexp_exceptionp(res)) sexp_return(res, res); in analyze_lambda()
843 if (sexp_exceptionp(ctx2)) sexp_return(res, ctx2); in analyze_lambda()
849 if (sexp_exceptionp(body)) sexp_return(res, body); in analyze_lambda()
866 if (sexp_exceptionp(value)) sexp_return(res, value); in analyze_lambda()
869 if (sexp_exceptionp(tmp)) sexp_return(res, tmp); in analyze_lambda()
[all …]
|