@@ -74,7 +74,7 @@ newtype Ignore a = Ignore a
74instance NFData (Ignore a) where
74instance NFData (Ignore a) where
75 rnf !_ = ()
75 rnf !_ = ()
77−instance NFData (SpiderEventHandle a) where
77+instance NFData (SpiderEventHandle x a) where
78 rnf !_ = ()
78 rnf !_ = ()
80instance NFData (Behavior t a) where
80instance NFData (Behavior t a) where