all float numbers can be considered inexact rational numbers

This commit is contained in:
Yuichi Nishiwaki 2014-07-18 11:56:22 +09:00
parent 5c6e7f16c0
commit 4fad8f6f3e
1 changed files with 1 additions and 1 deletions

View File

@ -744,7 +744,7 @@ pic_init_number(pic_state *pic)
pic_defun(pic, "number?", pic_number_real_p);
pic_defun(pic, "complex?", pic_number_real_p);
pic_defun(pic, "real?", pic_number_real_p);
pic_defun(pic, "rational?", pic_number_integer_p);
pic_defun(pic, "rational?", pic_number_real_p);
pic_defun(pic, "integer?", pic_number_integer_p);
pic_gc_arena_restore(pic, ai);