diff --git a/ghc/tests/Makefile b/ghc/tests/Makefile
index 6e1444a8240b6b31667e939ddf835b10e97bced8..c23b02022dcb6245b17263bd876eed1aa2a0e6d9 100644
--- a/ghc/tests/Makefile
+++ b/ghc/tests/Makefile
@@ -7,6 +7,7 @@ SUBDIRS = \
 	codeGen \
 	deSugar \
 	deriving \
+	lib \
 	numeric \
 	reader \
 	rename \
diff --git a/ghc/tests/lib/Makefile b/ghc/tests/lib/Makefile
new file mode 100644
index 0000000000000000000000000000000000000000..200dada04ec652377bc5a64316cc0f3d04fb9a42
--- /dev/null
+++ b/ghc/tests/lib/Makefile
@@ -0,0 +1,9 @@
+#-----------------------------------------------------------------------------
+# $Id: Makefile,v 1.1 1998/05/22 11:47:23 simonm Exp $
+
+TOP = ..
+include $(TOP)/mk/boilerplate.mk
+
+SUBDIRS = should_run
+
+include $(TOP)/mk/target.mk
diff --git a/ghc/tests/lib/should_run/Makefile b/ghc/tests/lib/should_run/Makefile
new file mode 100644
index 0000000000000000000000000000000000000000..0a1d7e135727b5e5ed2d73f74c538b8d2a61f7dd
--- /dev/null
+++ b/ghc/tests/lib/should_run/Makefile
@@ -0,0 +1,13 @@
+#-----------------------------------------------------------------------------
+# $Id: Makefile,v 1.1 1998/05/22 11:47:25 simonm Exp $
+
+TOP = ../..
+include $(TOP)/mk/boilerplate.mk
+include $(TOP)/mk/should_run.mk
+
+SRC_HC_OPTS += -dcore-lint
+
+packedstring001_HC_OPTS = -syslib misc
+
+include $(TOP)/mk/target.mk
+
diff --git a/ghc/tests/lib/should_run/packedstring001.hs b/ghc/tests/lib/should_run/packedstring001.hs
new file mode 100644
index 0000000000000000000000000000000000000000..7ffce8ee3f08fbd233e4e7aa019140389e431b42
--- /dev/null
+++ b/ghc/tests/lib/should_run/packedstring001.hs
@@ -0,0 +1,10 @@
+module Main (main) where
+
+import Char (isSpace)
+import PackedString
+
+-- Bug in PackedString.lhs (fixed in rev 1.5)
+
+foo = packString "this is a test"
+main = print (filterPS (not.isSpace) foo)
+
diff --git a/ghc/tests/lib/should_run/packedstring001.stdout b/ghc/tests/lib/should_run/packedstring001.stdout
new file mode 100644
index 0000000000000000000000000000000000000000..fbd5abc3a05d2f0d42c1f9c7de858810e7ec555a
--- /dev/null
+++ b/ghc/tests/lib/should_run/packedstring001.stdout
@@ -0,0 +1 @@
+"thisisatest"