@@ -62,7 +62,7 @@ data FastWeakBag a = FastWeakBag
62#ifdef ghcjs_HOST_OS
62#ifdef ghcjs_HOST_OS
63newtype FastWeakBagTicket a = FastWeakBagTicket JSVal
63newtype FastWeakBagTicket a = FastWeakBagTicket JSVal
65−data FastWeakBagTicket a = forall FastWeakBagTicket
65+data FastWeakBagTicket a = FastWeakBagTicket
66 { _weakBagTicket_weakItem :: {-# UNPACK #-} !(Weak a)
66 { _weakBagTicket_weakItem :: {-# UNPACK #-} !(Weak a)
67 , _weakBagTicket_item :: {-# NOUNPACK #-} !a
67 , _weakBagTicket_item :: {-# NOUNPACK #-} !a