conservatory
/
picrin
4
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

clarify some error messages

This commit is contained in:
Yuichi Nishiwaki 2014-02-11 21:36:11 +09:00
parent 634c9e0e2f
commit 855702716c
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/codegen.c
View File

@ -292,7 +292,7 @@ analyze_node(analyze_state *state, pic_value obj, bool tailpos)
depth = lookup_var(state, sym); depth = lookup_var(state, sym);
if (depth == -1) { if (depth == -1) {
pic_error(pic, "symbol: unbound variable"); pic_errorf(pic, "unbound variable %s", pic_symbol_name(pic, sym));
} }
/* at this stage, lref/cref/gref are not distinguished */ /* at this stage, lref/cref/gref are not distinguished */
return new_ref(state, depth, sym); return new_ref(state, depth, sym);
@ -301,7 +301,7 @@ analyze_node(analyze_state *state, pic_value obj, bool tailpos)
pic_value proc; pic_value proc;
if (! pic_list_p(pic, obj)) { if (! pic_list_p(pic, obj)) {
pic_error(pic, "invalid expression given"); pic_errorf(pic, "invalid expression given: ~S", obj);
} }
proc = pic_list_ref(pic, obj, 0); proc = pic_list_ref(pic, obj, 0);