fix errer message of `u8-ready?`

This commit is contained in:
Sunrim KIM (keen) 2014-05-29 01:04:37 +09:00
parent bf1aa885ca
commit fc6a919914
1 changed files with 1 additions and 1 deletions

View File

@ -499,7 +499,7 @@ pic_port_byte_ready_p(pic_state *pic)
{ {
struct pic_port *port = pic_stdin(pic); struct pic_port *port = pic_stdin(pic);
assert_port_profile(port, PIC_PORT_IN | PIC_PORT_BINARY, PIC_PORT_OPEN, "char-ready?"); assert_port_profile(port, PIC_PORT_IN | PIC_PORT_BINARY, PIC_PORT_OPEN, "u8-ready?");
pic_get_args(pic, "|p", &port); pic_get_args(pic, "|p", &port);