From aa7668ef752c0bf2419780b2ec7581a29fa3afd1 Mon Sep 17 00:00:00 2001
From: aarne <aarne@chalmers.se>
Date: Fri, 24 Feb 2012 10:00:27 +0000
Subject: the Predef function eqVal to compare equality of parameter values

---
 src/compiler/GF/Grammar/Predef.hs | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'src/compiler/GF/Grammar/Predef.hs')

diff --git a/src/compiler/GF/Grammar/Predef.hs b/src/compiler/GF/Grammar/Predef.hs
index b77aea40e..44cc060ec 100644
--- a/src/compiler/GF/Grammar/Predef.hs
+++ b/src/compiler/GF/Grammar/Predef.hs
@@ -33,6 +33,7 @@ module GF.Grammar.Predef
           , cOccurs, cEqInt, cLessInt, cPlus, cShow, cRead
           , cToStr, cMapStr, cError
           , cToUpper, cToLower, cIsUpper
+          , cEqVal
 
           -- hacks
           , cMeta, cAs, cChar, cChars, cSeq, cAlt, cRep
@@ -129,6 +130,9 @@ cIsUpper = identC (BS.pack "isUpper")
 cEqStr :: Ident
 cEqStr = identC (BS.pack "eqStr")
 
+cEqVal :: Ident
+cEqVal = identC (BS.pack "eqVal")
+
 cOccur :: Ident
 cOccur = identC (BS.pack "occur")
 
-- 
cgit v1.2.3