Merge pull request #41 from omasanori/miscompare

Fix a bug due to the operator precedence of C.
This commit is contained in:
Yuichi Nishiwaki 2014-09-19 21:00:31 +09:00
commit 6c8b74b612
1 changed files with 1 additions and 1 deletions

2
lib.c
View File

@ -158,7 +158,7 @@ export(pic_state *pic, pic_value spec)
} else { /* (export (rename a b)) */ } else { /* (export (rename a b)) */
if (! pic_list_p(spec)) if (! pic_list_p(spec))
goto fail; goto fail;
if (! pic_length(pic, spec) == 3) if (! (pic_length(pic, spec) == 3))
goto fail; goto fail;
if (! pic_eq_p(pic_car(pic, spec), pic_sym_value(sRENAME))) if (! pic_eq_p(pic_car(pic, spec), pic_sym_value(sRENAME)))
goto fail; goto fail;