Commit 4abece29 authored by Thomas Schilling's avatar Thomas Schilling
Browse files

Quickfix for warning.

parent ffaa27ac
......@@ -381,7 +381,7 @@ runAnnotation target expr = do
expr_ty <- newFlexiTyVarTy liftedTypeKind
-- Find the classes we want instances for in order to call toAnnotationWrapper
typeable_class <- tcLookupClass typeableClassName
_typeable_class <- tcLookupClass typeableClassName
data_class <- tcLookupClass dataClassName
-- Check the instances we require live in another module (we want to execute it..)
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment