mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-05-15 06:02:55 -06:00
Putting def definitions in place.
This commit is contained in:
@@ -1,7 +1,5 @@
|
||||
module SkelGFC where
|
||||
|
||||
import Ident
|
||||
|
||||
-- Haskell module generated by the BNF converter
|
||||
|
||||
import AbsGFC
|
||||
@@ -13,7 +11,7 @@ failure x = Bad $ "Undefined case: " ++ show x
|
||||
|
||||
transIdent :: Ident -> Result
|
||||
transIdent x = case x of
|
||||
_ -> failure x
|
||||
Ident str -> failure x
|
||||
|
||||
|
||||
transCanon :: Canon -> Result
|
||||
@@ -83,6 +81,7 @@ transExp x = case x of
|
||||
EProd id exp0 exp -> failure x
|
||||
EAbs id exp -> failure x
|
||||
EAtom atom -> failure x
|
||||
EData -> failure x
|
||||
EEq equations -> failure x
|
||||
|
||||
|
||||
|
||||
Reference in New Issue
Block a user