*unspecified* harder.

This commit is contained in:
Jan Nieuwenhuizen 2016-07-11 22:47:12 +02:00
parent 8c2d53eb32
commit 141012f5c0

1
mes.c
View file

@ -669,6 +669,7 @@ lookup (char *x, scm *a)
return make_number (atoi (x)); return make_number (atoi (x));
if (*x == '\'') return &scm_symbol_quote; if (*x == '\'') return &scm_symbol_quote;
if (!strcmp (x, scm_unspecified.name)) return &scm_unspecified;
if (!strcmp (x, scm_symbol_cond.name)) return &scm_symbol_cond; if (!strcmp (x, scm_symbol_cond.name)) return &scm_symbol_cond;
if (!strcmp (x, scm_symbol_quote.name)) return &scm_symbol_quote; if (!strcmp (x, scm_symbol_quote.name)) return &scm_symbol_quote;
if (!strcmp (x, scm_lambda.name)) return &scm_lambda; if (!strcmp (x, scm_lambda.name)) return &scm_lambda;