[Moved output forcing from RPC evaluator to the Scheme48 run-time system by using PERIODICALLY-FORCE-OUTPUT!, rather than hoping that the I/O would be finished by the time the RPC finishes.
Taylor Campbell <campbell@mumble.net>**20060423232948] {
hunk ./load.scm 65
-                               call-with-current-input-port))
+                               call-with-current-input-port
+                               periodically-force-output!))
hunk ./session.scm 279
-                (force-output (current-output-port))
hunk ./top.scm 56
+  ;++ What about the noise and error output ports?
hunk ./top.scm 58
-      (make-swank-output-port session-placeholder)
+      (let ((out (make-swank-output-port session-placeholder)))
+        (periodically-force-output! out)
+        out)
}
