From 4e35f7e5ecfebb2503a516c84e4b7d932731a94d Mon Sep 17 00:00:00 2001
From: krasimir <krasimir@chalmers.se>
Date: Wed, 9 Jun 2010 10:21:13 +0000
Subject: filter the duplications when doing 'l -table'

---
 src/runtime/haskell/PGF/Macros.hs | 1 +
 1 file changed, 1 insertion(+)

(limited to 'src/runtime/haskell/PGF/Macros.hs')

diff --git a/src/runtime/haskell/PGF/Macros.hs b/src/runtime/haskell/PGF/Macros.hs
index 328bf369d..dea535af7 100644
--- a/src/runtime/haskell/PGF/Macros.hs
+++ b/src/runtime/haskell/PGF/Macros.hs
@@ -229,6 +229,7 @@ data BracketedTokn
   = LeafKS [String]
   | LeafKP [String] [Alternative]
   | Bracket_ CId {-# UNPACK #-} !FId {-# UNPACK #-} !LIndex [Expr] [BracketedTokn]    -- Invariant: the list is not empty
+  deriving Eq
 
 type LinTable = Array.Array LIndex [BracketedTokn]
 
-- 
cgit v1.2.3