diff --git a/s48/concurrency/AUTHORS b/s48/concurrency/AUTHORS
index 2df1b32..c8931a5 100644
--- a/s48/concurrency/AUTHORS
+++ b/s48/concurrency/AUTHORS
@@ -1 +1 @@
-Martin Gasbichler
+Copyright (c) 2003 Martin Gasbichler
diff --git a/s48/concurrency/NEWS b/s48/concurrency/NEWS
new file mode 100644
index 0000000..26f793c
--- /dev/null
+++ b/s48/concurrency/NEWS
@@ -0,0 +1,2 @@
+version 0.0
+* New package system.
diff --git a/s48/concurrency/interfaces.scm b/s48/concurrency/interfaces.scm
deleted file mode 100644
index 9bc9f90..0000000
--- a/s48/concurrency/interfaces.scm
+++ /dev/null
@@ -1,8 +0,0 @@
-(define-interface semaphores-interface
-  (export make-semaphore
-	  semaphore-post
-	  semaphore-wait
-	  with-semaphore-posted))
-
-(define-interface with-lock-interface
-  (export with-lock))
\ No newline at end of file
diff --git a/s48/concurrency/load.scm b/s48/concurrency/load.scm
new file mode 100644
index 0000000..2d0a4fc
--- /dev/null
+++ b/s48/concurrency/load.scm
@@ -0,0 +1,18 @@
+(define-interface semaphores-interface
+  (export make-semaphore
+	  semaphore-post
+	  semaphore-wait
+	  with-semaphore-posted))
+
+(define-interface with-lock-interface
+  (export with-lock))(define-structure semaphores semaphores-interface
+  (open scheme
+	locks
+	with-lock
+	define-record-types)
+  (files semaphore))
+
+(define-structure with-lock with-lock-interface
+  (open scheme 
+	locks)
+  (files with-lock))
\ No newline at end of file
diff --git a/s48/concurrency/packages.scm b/s48/concurrency/packages.scm
deleted file mode 100644
index b1da288..0000000
--- a/s48/concurrency/packages.scm
+++ /dev/null
@@ -1,11 +0,0 @@
-(define-structure semaphores semaphores-interface
-  (open scheme
-	locks
-	with-lock
-	define-record-types)
-  (files semaphore))
-
-(define-structure with-lock with-lock-interface
-  (open scheme 
-	locks)
-  (files with-lock))
\ No newline at end of file
diff --git a/s48/concurrency/pkg-def.scm b/s48/concurrency/pkg-def.scm
new file mode 100644
index 0000000..e9667eb
--- /dev/null
+++ b/s48/concurrency/pkg-def.scm
@@ -0,0 +1,9 @@
+(define-package "concurrency"
+  (0 0)
+  ()
+  (install-file "load.scm" 'base)
+  (install-file "README" 'doc)
+  (install-file "NEWS" 'doc)
+  (install-string (COPYING) "COPYING" 'doc)
+  (install-file "semaphore.scm" 'scheme)
+  (install-file "with-lock.scm" 'scheme))