From 412f848e681e3c94c635f65638310a13d675449e Mon Sep 17 00:00:00 2001
From: Pierre-Marie Pédrot
Date: Sun, 2 Mar 2014 00:03:37 +0100
Subject: Removing generic equality in Syntax plugin.

---
 interp/notation_ops.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'interp/notation_ops.ml')

diff --git a/interp/notation_ops.ml b/interp/notation_ops.ml
index 5066e2e225..f6afbe48a4 100644
--- a/interp/notation_ops.ml
+++ b/interp/notation_ops.ml
@@ -473,7 +473,7 @@ let rec subst_notation_constr subst bound raw =
     | _ -> knd
     in
     let nsolve = Option.smartmap (Genintern.generic_substitute subst) solve in
-    if nsolve == solve && nknd = knd then raw
+    if nsolve == solve && nknd == knd then raw
     else NHole (nknd, nsolve)
 
   | NCast (r1,k) ->
-- 
cgit v1.2.3