From fb8777c9cb8770b7f755bf24624c2b244ac90a24 Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Fri, 15 Mar 2002 12:43:07 +0000
Subject: [PATCH] [project @ 2002-03-15 12:42:39 by simonmar] Convert to new
 syntax

---
 Data/Dynamic.hi-boot |    5 ++---
 GHC/Err.hi-boot      |   10 ++++++++--
 2 files changed, 10 insertions(+), 5 deletions(-)

diff --git a/Data/Dynamic.hi-boot b/Data/Dynamic.hi-boot
index d7c5410..7ab9f6a 100644
--- a/Data/Dynamic.hi-boot
+++ b/Data/Dynamic.hi-boot
@@ -1,3 +1,2 @@
-__interface "base" DataziDynamic 1 where
-__export DataziDynamic Dynamic ;
-data Dynamic;
+module Data.Dynamic where
+data Dynamic
diff --git a/GHC/Err.hi-boot b/GHC/Err.hi-boot
index 15fd3fd..862a24e 100644
--- a/GHC/Err.hi-boot
+++ b/GHC/Err.hi-boot
@@ -7,6 +7,12 @@
 --	because it's wired into the compiler
 ---------------------------------------------------------------------------
 
-__interface "core" GHCziErr 1 where
-__export GHCziErr error parError;
+module GHC.Err where
 
+-- We can't give an accurate type for error, because it mentions an open
+-- type variable, but fortunately it doesn't matter what type we
+-- give here because the compiler will use its wired-in version.  But we have
+-- to mention 'error' so that it gets exported from this .hi-boot
+-- file.
+error    :: GHC.Base.String -> a
+parError :: GHC.Base.String -> a
-- 
1.7.10.4