From 9a756a3ac10128bc60708d4f41e2379450adf57c Mon Sep 17 00:00:00 2001
From: aarne <unknown>
Date: Thu, 26 May 2005 13:18:17 +0000
Subject: romance Inf ; %, included

---
 src/GF/Source/AbsGF.hs | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

(limited to 'src/GF/Source/AbsGF.hs')

diff --git a/src/GF/Source/AbsGF.hs b/src/GF/Source/AbsGF.hs
index 143957102..a92313f0b 100644
--- a/src/GF/Source/AbsGF.hs
+++ b/src/GF/Source/AbsGF.hs
@@ -41,13 +41,13 @@ data ModType =
 data ModBody =
    MBody Extend Opens [TopDef]
  | MWith Ident [Open]
- | MWithE [Ident] Ident [Open]
+ | MWithE [Included] Ident [Open]
  | MReuse Ident
  | MUnion [Included]
   deriving (Eq,Ord,Show)
 
 data Extend =
-   Ext [Ident]
+   Ext [Included]
  | NoExt
   deriving (Eq,Ord,Show)
 
@@ -76,6 +76,7 @@ data QualOpen =
 data Included =
    IAll Ident
  | ISome Ident [Ident]
+ | IMinus Ident [Ident]
   deriving (Eq,Ord,Show)
 
 data Def =
-- 
cgit v1.2.3