ソースを参照

screwed up checkoot

Mark VandenBrink 12 年 前
コミット
44c5472f5f
5 ファイル変更0 行追加64 行削除
  1. 0 3
      Makefile
  2. 0 34
      README
  3. 0 7
      build.xcvb
  4. 0 10
      trivial-gray-streams-test.asd
  5. 0 10
      trivial-gray-streams.asd

+ 0 - 3
Makefile

@@ -1,3 +0,0 @@
-.PHONY: clean
-clean:
-	rm -f *.fasl *.x86f *.fas *.ufsl *.lib *.pfsl

+ 0 - 34
README

@@ -1,34 +0,0 @@
-trivial-gray-streams
-====================
-
-This system provides an extremely thin compatibility layer for gray
-streams.  It is nearly *too* trivial for a complete package, except that
-I have copy&pasted this code into enough projects now that I decided to
-factor it out once again now, and then *never* have to touch it again.
-
-
-How to use it
-=============
-
-1. Use the package TRIVIAL-GRAY-STREAMS instead of whatever
-   implementation-specific package you would have to use otherwise to
-   get at gray stream symbols.
-2. For STREAM-READ-SEQUENCE and STREAM-WRITE-SEQUENCE, notice that we
-   use two required arguments and allow additional keyword arguments.
-   So the lambda list when defining a method on either function should look
-   like this:
-     (stream sequence start end &key)
-
-
-Extensions
-==========
-
-Generic function STREAM-READ-SEQUENCE (stream sequence start end &key)
-Generic function STREAM-WRITE-SEQUENCE (stream sequence start end &key)
-
-        See above.
-
-Generic function STREAM-FILE-POSITION (stream) => file position
-Generic function (SETF STREAM-FILE-POSITION) (position-spec stream) => successp
-
-        Will only be called by ABCL, ACL, LispWorks, CCL, CLISP, SBCL and MOCL.

+ 0 - 7
build.xcvb

@@ -1,7 +0,0 @@
-#+xcvb
-(module
-  (:fullname "trivial-gray-streams"
-   :depends-on
-    ("package"
-     "streams")
-   :supersedes-asdf ("trivial-gray-streams")))

+ 0 - 10
trivial-gray-streams-test.asd

@@ -1,10 +0,0 @@
-;;; -*- mode: lisp -*-
-
-(defsystem :trivial-gray-streams-test
-  :version "2.0"
-  :depends-on (:trivial-gray-streams)
-  :pathname #P"test/"
-  :serial t
-  :components ((:file "package")
-               (:file "test-framework")
-               (:file "test")))

+ 0 - 10
trivial-gray-streams.asd

@@ -1,10 +0,0 @@
-;;; -*- mode: lisp -*-
-
-(defsystem :trivial-gray-streams
-  :description "Compatibility layer for Gray Streams (see http://www.cliki.net/Gray%20streams)."
-  :license "MIT"
-  :author "David Lichteblau"
-  :maintainer "Anton Vodonosov <avodonosov@yandex.ru>"
-  :version "2.0"
-  :serial t
-  :components ((:file "package") (:file "streams")))