3 ;;; This code is in the public domain.
5 ;;; The cmucl implementation of simple-streams was done by Paul Foley,
6 ;;; who placed the code in the public domain. Sbcl port by Rudi
9 ;;; This is just for compatibility with Franz demo code
11 (:use "SB-SIMPLE-STREAM")
12 (:import-from "SB-SIMPLE-STREAM"
13 "BUFFER" "BUFFPOS" "BUFFER-PTR"
14 "OUT-BUFFER" "MAX-OUT-POS"
15 "INPUT-HANDLE" "OUTPUT-HANDLE"
19 (use-package "SB-SIMPLE-STREAMS")