fix parsing

anoma · Nov 22, 2024 · 5e4c18f · 5e4c18f
1 parent 5578a49
commit 5e4c18f
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/Juvix/Compiler/Concrete/Translation/FromSource.hs b/src/Juvix/Compiler/Concrete/Translation/FromSource.hs
@@ -481,7 +481,7 @@ derivingInstance = do
   _derivingFunLhs <- functionDefinitionLhs opts Nothing
   unless (isJust (_derivingFunLhs ^. funLhsInstance)) $
     parseFailure off "Expected `deriving instance`"
-  unless (isJust (_derivingFunLhs ^. funLhsPattern)) $
+  unless (isNothing (_derivingFunLhs ^. funLhsPattern)) $
     parseFailure off "Patterns not allowed for `deriving instance`"
   return Deriving {..}