projects
/
mes.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
332d265
)
More error handling on apply_env.
author
Jan Nieuwenhuizen
<janneke@gnu.org>
Sun, 30 Oct 2016 14:42:50 +0000
(15:42 +0100)
committer
Jan Nieuwenhuizen
<janneke@gnu.org>
Mon, 12 Dec 2016 19:33:49 +0000
(20:33 +0100)
* mes.c (apply_env): Assert if applying *unspecified*.
mes.c
patch
|
blob
|
history
diff --git
a/mes.c
b/mes.c
index 19ffbfdaf9d9313cbe1c038186517c43c318f29a..cfd834d1bbb9b766652db27872f4b9fe6a2e0077 100644
(file)
--- a/
mes.c
+++ b/
mes.c
@@
-382,6
+382,7
@@
apply_env (scm *fn, scm *x, scm *a)
if (efn == &scm_f || efn == &scm_t) assert (!"apply bool");
if (efn->type == NUMBER) assert (!"apply number");
if (efn->type == STRING) assert (!"apply string");
+ if (efn == &scm_unspecified) assert (!"apply *unspecified*");
return apply_env (efn, x, a);
}