Changed to new package system.

s48/banana/AUTHORS

@@ -1 +1 @@
-Taylor Campbell
+Copyright (c) 2003 Taylor Campbell

s48/banana/NEWS

@@ -0,0 +1,2 @@
+version 0.1
+* New package system.

s48/banana/load.scm

@@ -43,3 +43,18 @@
    ;; Generally just for debugging or manual testing.
    (prettify-byte (proc (:exact-integer) :string))
    (prettify-byte-vector (proc (:value) :string))))
+
+(define-structures ((banana banana-interface)
+                    (banana-extras banana-extras-interface))
+  (open scheme
+        define-record-types
+        conditions
+        exceptions
+        signals
+        handle
+        bitwise
+        byte-vectors
+        ascii
+        srfi-1
+        srfi-6)
+  (files banana))

s48/banana/packages.scm

@@ -1,14 +0,0 @@
-(define-structures ((banana banana-interface)
-                    (banana-extras banana-extras-interface))
-  (open scheme
-        define-record-types
-        conditions
-        exceptions
-        signals
-        handle
-        bitwise
-        byte-vectors
-        ascii
-        srfi-1
-        srfi-6)
-  (files banana))

s48/banana/pkg-def.scm

@@ -0,0 +1,7 @@
+(define-package "banana"
+  (0 1)
+  ()
+  (install-file "load.scm" 'base)
+  (install-file "README" 'doc)
+  (install-string (COPYING) "COPYING" 'doc)
+  (install-file "banana.scm" 'scheme))