artemist/mes
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

More error handling on apply_env.

Browse source 
* mes.c (apply_env): Assert if applying *unspecified*.
This commit is contained in:
Jan Nieuwenhuizen 2016-10-30 15:42:50 +01:00
parent 332d2655cf
commit ad717d4bba
1 changed files with 1 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
mes.c
View file

@ -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);
}