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

table size in synopsis

Browse Source
This commit is contained in:
aarne
2007-09-07 08:44:26 +00:00
parent 0c1a16b0f8
commit 90f19d769d
4 changed files with 56 additions and 55 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
lib/resource-1.0/doc/MkSynopsis.hs
View File

@@ -127,7 +127,8 @@ mkCatTable isBeg rs =
(if isBeg then ("|| Category | Explanation | Example ||" :) else id)
(map mk1 rs)
where
mk1 (name,typ,ex) = unwords ["|", ttf name, "|", typ, "|", ex, "|"]
mk1 (name,typ,ex) = unwords ["|", ttf name, "|", typ, "|", typo ex, "|"]
typo ex = if take 1 ex == "\"" then itf (init (tail ex)) else ex
synopsis = "synopsis.txt"
commonAPI = "../abstract/Common.gf"