diff --git a/src/Juvix/Compiler/Concrete/Translation/FromParsed/Analysis/Scoping.hs b/src/Juvix/Compiler/Concrete/Translation/FromParsed/Analysis/Scoping.hs index 38a81039b2..6e94de77ad 100644 --- a/src/Juvix/Compiler/Concrete/Translation/FromParsed/Analysis/Scoping.hs +++ b/src/Juvix/Compiler/Concrete/Translation/FromParsed/Analysis/Scoping.hs @@ -1563,8 +1563,8 @@ checkSections sec = topBindings helper failMaybe $ mkRec ^? constructorRhs - . _ConstructorRhsRecord - . to mkRecordNameSignature + . _ConstructorRhsRecord + . to mkRecordNameSignature let info = RecordInfo { _recordInfoSignature = fs,