@@ -993,8 +993,7 @@ let builtins =
Hashtbl.replace h k v;
VBool (not old);
);
- "hadd", Fun4 (fun h k v cmp ->
- if cmp <> VNull then assert false;
+ "hadd", Fun3 (fun h k v ->
let h = vhash h in
let old = Hashtbl.mem h k in
Hashtbl.add h k v;
@@ -232,7 +232,7 @@ class Socket {
var i = 0;
while( i < a.length ){
r[i] = a[i].__s;
- __dollar__hadd(c,a[i].__s,a[i],null);
+ __dollar__hadd(c,a[i].__s,a[i]);
i += 1;
}
return r;