/[guile]/guile/guile-scsh/newports.scm
ViewVC logotype

Diff of /guile/guile-scsh/newports.scm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.3 by ghouston, Mon Aug 6 22:18:23 2001 UTC revision 1.4 by ghouston, Sat Oct 26 21:34:03 2002 UTC
# Line 32  Line 32 
32          with-current-input-port with-current-output-port          with-current-input-port with-current-output-port
33          with-current-error-port          with-current-error-port
34          set-current-input-port! set-current-output-port!          set-current-input-port! set-current-output-port!
35          set-current-error-port!)          set-current-error-port!
36            with-error-output-port* with-error-output-port)
37    
38  (define (fdport? x)  (define (fdport? x)
39    (and (or (input-port? x)    (and (or (input-port? x)

Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26