GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-21 18:59:32 -06:00
Code Issues Packages Projects Releases Wiki Activity

the automatically generated printnames were just junks. Now we store printnames only if they are explicitly specified.

Browse Source
This commit is contained in:
krasimir
2010-06-18 10:19:05 +00:00
parent fd3cddcf5e
commit 5dfc9bbc0b
2 changed files with 9 additions and 37 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/runtime/haskell/PGF/Macros.hs
View File

@@ -115,7 +115,7 @@ contextLength ty = case ty of
-- | Show the printname of function or category
showPrintName :: PGF -> Language -> CId -> String
showPrintName pgf lang id = lookMap "?" id $ printnames $ lookMap (error "no lang") lang $ concretes pgf
showPrintName pgf lang id = lookMap (showCId id) id $ printnames $ lookMap (error "no lang") lang $ concretes pgf
term0 :: CId -> Term
term0 = TM . showCId