GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-23 19:42:50 -06:00
Code Issues Packages Projects Releases Wiki Activity

bugfix to the previous patches

Browse Source
This commit is contained in:
krasimir
2009-05-22 21:30:34 +00:00
parent e5399f2d0e
commit 3763b98e89
1 changed files with 0 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
src/GF/Compile/Rename.hs
View File

@@ -259,7 +259,6 @@ renamePattern env patt = case patt of
PV x -> do case renid (Vr x) of PV x -> do case renid (Vr x) of
Ok (QC m c) -> return (PP m c [],[]) Ok (QC m c) -> return (PP m c [],[])
Ok (Q m c) -> Bad $ render (text "data constructor expected but" <+> ppTerm Qualified 0 (Q m c) <+> text "is found instead")
_ -> return (patt, [x]) _ -> return (patt, [x])
PR r -> do PR r -> do