newline is not an element of (scheme write)

This commit is contained in:
Yuichi Nishiwaki 2013-12-10 05:59:03 -08:00
parent c67c81c1aa
commit d23f686485
1 changed files with 1 additions and 1 deletions

View File

@ -336,11 +336,11 @@ pic_init_port(pic_state *pic)
pic_defun(pic, "close-port", pic_port_close_port);
pic_defun(pic, "close-input-port", pic_port_close_port);
pic_defun(pic, "close-output-port", pic_port_close_port);
pic_defun(pic, "newline", pic_port_newline);
DEFLIBRARY(pic, "(scheme write)")
{
pic_defun(pic, "write", pic_port_write);
pic_defun(pic, "newline", pic_port_newline);
}
ENDLIBRARY(pic)
}