From 848705ff3958b140cde0f7883fba62f540ea3542 Mon Sep 17 00:00:00 2001
From: sof <unknown>
Date: Fri, 20 Jun 1997 09:09:38 +0000
Subject: [PATCH] [project @ 1997-06-20 09:09:38 by sof] Added Eval (a->b)
instance
---
ghc/lib/ghc/PrelBase.lhs | 2 ++
1 file changed, 2 insertions(+)
diff --git a/ghc/lib/ghc/PrelBase.lhs b/ghc/lib/ghc/PrelBase.lhs
index 97ac8c35ee92..aa8ee6f8e833 100644
--- a/ghc/lib/ghc/PrelBase.lhs
+++ b/ghc/lib/ghc/PrelBase.lhs
@@ -632,6 +632,8 @@ data Integer = J# Int# Int# ByteArray#
%*********************************************************
\begin{code}
+instance Eval (a -> b)
+
instance Show (a -> b) where
showsPrec p f = showString "<<function>>"
showList ls = showList__ (showsPrec 0) ls
--
GitLab