From 688b72d518746dc0ba614c3e182372e9975f3cb1 Mon Sep 17 00:00:00 2001
From: Estevan Castilho <tevo@riajuu.net>
Date: Sat, 30 May 2026 01:09:44 +0000
Subject: Equality for materialized attributes

---
 lib/conventions.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'lib/conventions.ml')

diff --git a/lib/conventions.ml b/lib/conventions.ml
index a031014..9e18762 100644
--- a/lib/conventions.ml
+++ b/lib/conventions.ml
@@ -49,7 +49,7 @@ module AbstractValue = struct
        else Atom (string_of_float f)
     | Opaque -> Atom "<opaque>"
 
-  let equals a b =
+  let equal a b =
     match (type_of a, type_of b) with
     | (Int, Int) -> (Obj.obj a : int) = (Obj.obj b : int)
     | (String, String) -> (Obj.obj a : string) = (Obj.obj b : string)
-- 
cgit v1.2.3