From d2613e07901bfad6936462c45816b8bdcb03472d Mon Sep 17 00:00:00 2001 From: sof <unknown> Date: Fri, 5 Feb 1999 10:21:16 +0000 Subject: [PATCH] [project @ 1999-02-05 10:21:15 by sof] PrelErr.hi-boot: record exports as coming from a .hi-boot file. --- ghc/lib/std/PrelErr.hi-boot | 7 ++++--- ghc/lib/std/PrelException.hi-boot | 2 +- 2 files changed, 5 insertions(+), 4 deletions(-) diff --git a/ghc/lib/std/PrelErr.hi-boot b/ghc/lib/std/PrelErr.hi-boot index 7871a4105b22..7f4b628aedb6 100644 --- a/ghc/lib/std/PrelErr.hi-boot +++ b/ghc/lib/std/PrelErr.hi-boot @@ -6,6 +6,7 @@ -- It doesn't need to give "error" a type signature, -- because it's wired into the compiler --------------------------------------------------------------------------- - -__interface PrelErr 1 where -__export PrelErr error parError; + +__interface PrelErr 2 0 where +__export ! PrelErr error parError; + diff --git a/ghc/lib/std/PrelException.hi-boot b/ghc/lib/std/PrelException.hi-boot index 85561ba42abc..cd7ab02e26f5 100644 --- a/ghc/lib/std/PrelException.hi-boot +++ b/ghc/lib/std/PrelException.hi-boot @@ -5,7 +5,7 @@ -- for PrelException.hi. --------------------------------------------------------------------------- -__interface PrelException 1 where +__interface PrelException 1 0 where __export ! PrelException ioError catch; 1 ioError :: __forall [a] => PrelIOBase.IOError -> PrelIOBase.IO a ; 1 catch :: __forall [a] => PrelIOBase.IO a -> (PrelIOBase.IOError -> PrelIOBase.IO a) -> PrelIOBase.IO a ; -- GitLab