GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-24 02:12:50 -06:00
Code Issues Packages Projects Releases Wiki Activity

alternative prtType to help debugging overload resolution errors

Browse Source
This commit is contained in:
aarne
2008-08-20 06:44:58 +00:00
parent 7d83d90e51
commit 74373394a6
1 changed files with 1 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@@ -689,6 +689,7 @@ getOverload env@gr mt ot = case appForm ot of
checkWarn ("ignoring lock fields in resolving" +++ prt ot) checkWarn ("ignoring lock fields in resolving" +++ prt ot)
return (mkApp fun tts, val) return (mkApp fun tts, val)
([],[]) -> do ([],[]) -> do
---- let prtType _ = prt -- to debug grammars
raise $ "no overload instance of" +++ prt f +++ raise $ "no overload instance of" +++ prt f +++
"for" +++ unwords (map (prtType env) tys) +++ "among" ++++ "for" +++ unwords (map (prtType env) tys) +++ "among" ++++
unlines [" " ++ unwords (map (prtType env) ty) | (ty,_) <- typs] ++ unlines [" " ++ unwords (map (prtType env) ty) | (ty,_) <- typs] ++