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

Expand higher-order abstract syntax in SimpleToFCFG.

Browse Source
This commit is contained in:
bjorn
2008-02-05 14:33:22 +00:00
parent 9b104373e6
commit ef50209983
2 changed files with 63 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/GF/Formalism/FCFG.hs
+4 -2
View File
@@ -16,7 +16,7 @@ module GF.Formalism.FCFG
, FPath
, FCat
, fcatString, fcatInt, fcatFloat
, fcatString, fcatInt, fcatFloat, fcatVar
-- * Symbol
, FIndex
@@ -52,10 +52,12 @@ type FToken = String
type FPath = [FIndex]
type FCat = Int
fcatString, fcatInt, fcatFloat :: Int
fcatString, fcatInt, fcatFloat, fcatVar :: Int
fcatString = (-1)
fcatInt = (-2)
fcatFloat = (-3)
fcatVar = (-4)
------------------------------------------------------------
-- Symbol