From 64c1c09e57f627046cec4d5f20b9b4b953307235 Mon Sep 17 00:00:00 2001 From: "Kevin M. Rosenberg" Date: Sat, 2 Aug 2003 22:19:37 +0000 Subject: [PATCH] r5442: *** empty log message *** --- byte-stream.lisp | 7 ++++++- kmrcl.asd | 3 ++- 2 files changed, 8 insertions(+), 2 deletions(-) diff --git a/byte-stream.lisp b/byte-stream.lisp index 36f77e7..d65387f 100644 --- a/byte-stream.lisp +++ b/byte-stream.lisp @@ -7,7 +7,7 @@ ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: June 2003 ;;;; -;;;; $Id: byte-stream.lisp,v 1.1 2003/07/05 02:32:08 kevin Exp $ +;;;; $Id: byte-stream.lisp,v 1.2 2003/08/02 22:19:37 kevin Exp $ ;;;; ;;;; Works for CMUCL, SBCL, and AllergoCL only ;;;; @@ -21,6 +21,8 @@ (in-package #:kmrcl) +;; Intial CMUCL version by OnShored. Ported to SBCL by Kevin Rosenberg + #+(or cmu sbcl) (progn (defstruct (byte-array-output-stream @@ -174,6 +176,9 @@ Make-Byte-Array-Output-Stream since the last call to this function." ) ;; progn + +;;; Simple streams implementation by Kevin Rosenberg + #+allegro (progn diff --git a/kmrcl.asd b/kmrcl.asd index 1c9801f..ec8b297 100644 --- a/kmrcl.asd +++ b/kmrcl.asd @@ -7,7 +7,7 @@ ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Apr 2000 ;;;; -;;;; $Id: kmrcl.asd,v 1.47 2003/07/31 17:11:44 kevin Exp $ +;;;; $Id: kmrcl.asd,v 1.48 2003/08/02 22:19:37 kevin Exp $ ;;;; ;;;; This file, part of KMRCL, is Copyright (c) 2002 by Kevin M. Rosenberg ;;;; @@ -33,6 +33,7 @@ :components ((:file "package") (:file "ifstar" :depends-on ("package")) + (:file "byte-stream" :depends-on ("package")) (:file "macros" :depends-on ("package")) (:file "functions" :depends-on ("macros")) (:file "lists" :depends-on ("macros")) -- 2.34.1