steps towards an NLG language

This commit is contained in:
Krasimir Angelov committed 2024-04-07 10:39:43 +02:00
1 parent 81717e7822
commit f637abe92e
6 files changed
+162 -141

No files matched your search

+1
View File
@@ -33,6 +33,7 @@ cSOFT_BIND = identS "SOFT_BIND"
cSOFT_SPACE = identS "SOFT_SPACE"
cCAPIT = identS "CAPIT"
cALL_CAPIT = identS "ALL_CAPIT"
cHtml = identS "Html"
isPredefCat :: Ident -> Bool
isPredefCat c = elem c [cInt,cString,cFloat]