added set-port-handler! for set-port-buffering

1999-10-22 21:36:35 +00:00 · 1999-10-22 21:36:35 +00:00 · 50d36014ba
parent 4ca964b9ea
commit 50d36014ba
1 changed files with 1 additions and 1 deletions
--- a/scheme/vm/arch.scm
+++ b/scheme/vm/arch.scm
@ -440,7 +440,7 @@
      (shared-binding-is-import?)
      (shared-binding-ref shared-binding-set!))
    (port port? make-port
-      (port-handler)
+      (port-handler set-port-handler!)
      (port-status  set-port-status!)
      (port-lock    set-port-lock!)
      (port-locked? set-port-locked?!)