This is the mail archive of the guile@cygnus.com mailing list for the guile project.
Index Nav: | [Date Index] [Subject Index] [Author Index] [Thread Index] | |
---|---|---|
Message Nav: | [Date Prev] [Date Next] | [Thread Prev] [Thread Next] |
> static int > set_element (SELECT_TYPE *set, SCM element, int arg) > { > int fd; > element = SCM_COERCE_OUTPORT (element); > if (SCM_NIMP (element) && SCM_FPORTP (element) && SCM_OPPORTP (element)) > ^^^^^^^^^^^^^^^^^^ > > should fix it. Done. Thanks, guys. 1998-10-19 Jim Blandy <jimb@zwingli.cygnus.com> * filesys.c (set_element, get_element): Make sure that `element' is a cell before applying SCM_FPORTP to it. (Thanks to Jost Boekemeier and Jorgen "forcer" Schaefer.)