X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Ffd-stream.lisp;h=41d8d97fd704a3a270725d62abb97da5eb586fa4;hb=212ef8043aeaceaa627f2924e04554fbc37b8ee1;hp=22c3190e0db9437b62b3181997ef40a397e57aea;hpb=cea4896b2482b7b2b429c1631d774b4cfbc0efba;p=sbcl.git diff --git a/src/code/fd-stream.lisp b/src/code/fd-stream.lisp index 22c3190..41d8d97 100644 --- a/src/code/fd-stream.lisp +++ b/src/code/fd-stream.lisp @@ -11,10 +11,17 @@ (in-package "SB!IMPL") +;;; FIXME: Wouldn't it be clearer to just have the structure +;;; definition be DEFSTRUCT FILE-STREAM (instead of DEFSTRUCT +;;; FD-STREAM)? That way we'd have TYPE-OF and PRINT-OBJECT refer to +;;; these objects as FILE-STREAMs (the ANSI name) instead of the +;;; internal implementation name FD-STREAM, and there might be other +;;; benefits as well. (deftype file-stream () 'fd-stream) ;;;; buffer manipulation routines +;;; FIXME: Is it really good to maintain this pool separate from the GC? (defvar *available-buffers* () #!+sb-doc "List of available buffers. Each buffer is an sap pointing to