From 612dcf12050326c7b8a58e702fc6f0107d764d98 Mon Sep 17 00:00:00 2001
From: Simon Marlow <marlowsd@gmail.com>
Date: Thu, 1 Jul 2010 14:27:27 +0000
Subject: [PATCH] unqualify Float and Double

---
 GHC/Ptr.lhs |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/GHC/Ptr.lhs b/GHC/Ptr.lhs
index 8087c77..6e57e2b 100644
--- a/GHC/Ptr.lhs
+++ b/GHC/Ptr.lhs
@@ -79,7 +79,7 @@ data FunPtr a = FunPtr Addr# deriving (Eq, Ord)
 -- a function type with zero or more arguments where
 --
 -- * the argument types are /marshallable foreign types/,
---   i.e. 'Char', 'Int', 'Prelude.Double', 'Prelude.Float',
+--   i.e. 'Char', 'Int', 'Double', 'Float',
 --   'Bool', 'Data.Int.Int8', 'Data.Int.Int16', 'Data.Int.Int32',
 --   'Data.Int.Int64', 'Data.Word.Word8', 'Data.Word.Word16',
 --   'Data.Word.Word32', 'Data.Word.Word64', @'Ptr' a@, @'FunPtr' a@,
-- 
1.7.10.4