summaryrefslogtreecommitdiff
path: root/libraries/base/GHC/Weak.lhs
diff options
context:
space:
mode:
Diffstat (limited to 'libraries/base/GHC/Weak.lhs')
-rw-r--r--libraries/base/GHC/Weak.lhs8
1 files changed, 2 insertions, 6 deletions
diff --git a/libraries/base/GHC/Weak.lhs b/libraries/base/GHC/Weak.lhs
index e3109e1e7f..b3ae376f33 100644
--- a/libraries/base/GHC/Weak.lhs
+++ b/libraries/base/GHC/Weak.lhs
@@ -1,7 +1,6 @@
\begin{code}
{-# LANGUAGE Unsafe #-}
-{-# LANGUAGE CPP
- , NoImplicitPrelude
+{-# LANGUAGE NoImplicitPrelude
, BangPatterns
, MagicHash
, UnboxedTuples
@@ -95,10 +94,7 @@ finalizer to the box itself fails when the outer box is optimised away
by the compiler.
-}
-data Weak v = Weak (Weak# v)
-
-#include "Typeable.h"
-INSTANCE_TYPEABLE1(Weak,weakTc,"Weak")
+data Weak v = Weak (Weak# v) deriving Typeable
-- | Establishes a weak pointer to @k@, with value @v@ and a finalizer.
--