git.iko.soy/generic-lens
on master help sign in
Remove 'confusing' as it kills performance for large types (I don't yet know why)
2a4fec2Csongor Kiss
src/Data/Generics/Product/Types.hs+1−1
compare with master
unifiedsplit
@@ -50,7 +50,7 @@ class HasTypes a s where
50instance
50instance
51 ( Hastypes' (Interesting s a) a s
51 ( Hastypes' (Interesting s a) a s
52 ) => HasTypes a s where
52 ) => HasTypes a s where
53− types = confusing (types' @(Interesting s a))
53+ types = types' @(Interesting s a)
54 {-# INLINE types #-}
54 {-# INLINE types #-}
55
55
56class Hastypes' (t :: Bool) a s where
56class Hastypes' (t :: Bool) a s where