diff options
| author | aarne <unknown> | 2005-02-04 19:17:57 +0000 |
|---|---|---|
| committer | aarne <unknown> | 2005-02-04 19:17:57 +0000 |
| commit | bc05653e825e082b70eebf2f420eb5a97610f56c (patch) | |
| tree | 66ddf9b72422f08f09f1b5a86a1bcd838d92baee /src/GF/Source/AbsGF.hs | |
| parent | b8b5139a8a8f8b0451061bacefc033b0bc768886 (diff) | |
resources and new instantiation syntax
Diffstat (limited to 'src/GF/Source/AbsGF.hs')
| -rw-r--r-- | src/GF/Source/AbsGF.hs | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/GF/Source/AbsGF.hs b/src/GF/Source/AbsGF.hs index 4bdc4c6fb..c8b218c2a 100644 --- a/src/GF/Source/AbsGF.hs +++ b/src/GF/Source/AbsGF.hs @@ -54,6 +54,7 @@ data ModType = data ModBody = MBody Extend Opens [TopDef] | MWith Ident [Open] + | MWithE [Ident] Ident [Open] | MReuse Ident | MUnion [Included] deriving (Eq,Ord,Show) @@ -65,7 +66,7 @@ data Extend = data Opens = NoOpens - | Opens [Open] + | OpenIn [Open] deriving (Eq,Ord,Show) data Open = @@ -138,7 +139,7 @@ data DataConstr = deriving (Eq,Ord,Show) data ParDef = - ParDef Ident [ParConstr] + ParDefDir Ident [ParConstr] | ParDefIndir Ident Ident | ParDefAbs Ident deriving (Eq,Ord,Show) |