Skip to content

Navigation Menu

Sign in
Appearance settings

Search code, repositories, users, issues, pull requests...

Provide feedback

We read every piece of feedback, and take your input very seriously.

Saved searches

Use saved searches to filter your results more quickly

Sign up
Appearance settings

Commit 67188e4

Browse files
TAIL_FORMS -> TAILCALL flag / SPECIAL_SYMBOLS fntype_t
1 parent 769869d commit 67188e4

File tree

2 files changed

+87
-60
lines changed

2 files changed

+87
-60
lines changed

‎extensions.hpp

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -101,7 +101,7 @@ object* sp_destructuring_bind (object* args, object* env) {
101101
object* body = cddr(args);
102102
destructure(structure, data, &env);
103103
protect(body);
104-
object* result = eval(tf_progn(body, env), env);
104+
object* result = progn_no_tc(body, env);
105105
unprotect();
106106
return result;
107107
}

0 commit comments

Comments
(0)

AltStyle によって変換されたページ (->オリジナル) /