diff options
Diffstat (limited to 'stdlib/nativeint.ml')
| -rw-r--r-- | stdlib/nativeint.ml | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/stdlib/nativeint.ml b/stdlib/nativeint.ml index 94c4b9490..7412bca04 100644 --- a/stdlib/nativeint.ml +++ b/stdlib/nativeint.ml @@ -51,3 +51,4 @@ external of_string: string -> nativeint = "caml_nativeint_of_string" type t = nativeint let compare (x: t) (y: t) = Pervasives.compare x y +let equal (x: t) (y: t) = compare x y = 0 |