Changed to new package system.

s48/exceptions/AUTHORS

@@ -1,3 +1,2 @@
-Richard Kelsey
+Copyright (c) 2002 Richard Kelsey, Michael Sperber
-Michael Sperber
+Copyright (c) 2004 Eric Knauel
-(restart.scm and port to sunterlib by Eric Knauel)

s48/exceptions/NEWS

@@ -0,0 +1,5 @@
+version 0.1
+* restart.scm and port to sunterlib (Eric Knauel)
+
+version 0.0 2002-12-01
+* Upstream from Richard Kelsey, Michael Sperber

s48/exceptions/load.scm

@@ -26,3 +26,20 @@
   (export
    (raise-restartable :syntax)
    (restart :syntax)))
+
+(define-structure srfi-34 srfi-34-interface
+  (open scheme
+	signals)
+  (files srfi-34))
+
+(define-structure srfi-35 srfi-35-interface
+  (open scheme
+	signals
+	srfi-1
+	srfi-9)
+  (files srfi-35))
+
+(define-structure srfi-34-restart srfi-34-restart-interface
+  (open scheme
+	srfi-34 srfi-35)
+  (files restart))

s48/exceptions/packages.scm

@@ -1,16 +0,0 @@
-(define-structure srfi-34 srfi-34-interface
-  (open scheme
-	signals)
-  (files srfi-34))
-
-(define-structure srfi-35 srfi-35-interface
-  (open scheme
-	signals
-	srfi-1
-	srfi-9)
-  (files srfi-35))
-
-(define-structure srfi-34-restart srfi-34-restart-interface
-  (open scheme
-	srfi-34 srfi-35)
-  (files restart))

s48/exceptions/pkg-def.scm

@@ -0,0 +1,8 @@
+(define-package "exceptions"
+  (0 1)
+  ()
+  (install-file "load.scm" 'base)
+  (install-string (COPYING) "COPYING" 'doc)
+  (install-file "restart.scm" 'scheme)
+  (install-file "srfi-34.scm" 'scheme)
+  (install-file "srfi-35.scm" 'scheme))