From 87b55df10f00fd23d89a89bfb7c4354ff455d83d Mon Sep 17 00:00:00 2001
From: aarne <unknown>
Date: Tue, 11 Jan 2005 15:06:12 +0000
Subject: -val optimization

---
 src/GF/Source/AbsGF.hs | 1 +
 1 file changed, 1 insertion(+)

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

diff --git a/src/GF/Source/AbsGF.hs b/src/GF/Source/AbsGF.hs
index 0a14d2e98..5a144f20f 100644
--- a/src/GF/Source/AbsGF.hs
+++ b/src/GF/Source/AbsGF.hs
@@ -167,6 +167,7 @@ data Exp =
  | EQCons Ident Ident
  | EApp Exp Exp
  | ETable [Case]
+ | EVTable Exp [Exp]
  | ETTable Exp [Case]
  | ECase Exp [Case]
  | EVariants [Exp]
-- 
cgit v1.2.3