use correct vars
This commit is contained in:
parent
b727567b6e
commit
8a7f61bf01
|
@ -402,7 +402,7 @@ analyze_procedure(analyze_state *state, pic_value name, pic_value formals, pic_v
|
|||
pop_scope(state);
|
||||
}
|
||||
else {
|
||||
pic_errorf(pic, "invalid formal syntax: ~s", args);
|
||||
pic_errorf(pic, "invalid formal syntax: ~s", formals);
|
||||
}
|
||||
|
||||
return pic_list7(pic, pic_obj_value(pic->sLAMBDA), name, args, locals, varg, captures, body);
|
||||
|
|
|
@ -622,7 +622,7 @@ xvfprintf(xFILE *stream, const char *fmt, va_list ap)
|
|||
case 'p':
|
||||
vp = va_arg(ap, void*);
|
||||
xfputs("0x", stream);
|
||||
xfile_printint(stream, dval, 16);
|
||||
xfile_printint(stream, (int)vp, 16);
|
||||
break;
|
||||
default:
|
||||
xputc(*(p-1), stream);
|
||||
|
|
Loading…
Reference in New Issue