Parent Directory | Revision Log | Patch
revision 1.53 by ttn, Thu Mar 14 03:47:43 2002 UTC | revision 1.54 by xxhanwen, Sat Jul 20 14:08:34 2002 UTC | |
---|---|---|
# | Line 187 SCM_DEFINE (scm_make_soft_port, "make-so | Line 187 SCM_DEFINE (scm_make_soft_port, "make-so |
187 | { | { |
188 | scm_t_port *pt; | scm_t_port *pt; |
189 | SCM z; | SCM z; |
190 | SCM_VALIDATE_VECTOR_LEN (1,pv,5); | SCM_VALIDATE_VECTOR_LEN (1, pv,5); |
191 | SCM_VALIDATE_STRING (2, modes); | SCM_VALIDATE_STRING (2, modes); |
192 | z = scm_cell (scm_tc16_sfport, 0); | z = scm_cell (scm_tc16_sfport, 0); |
193 | SCM_DEFER_INTS; | SCM_DEFER_INTS; |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |