@@ -57,9 +57,9 @@ let a = Null.Value(1)
57
57
let b = Null.null
58
58
let c = Null.Value(2)
59
59
60
- assertEqual( Null.equal(a, b, Int.equal), false)
61
- assertEqual( Null.equal(a, c, Int.equal), false)
62
- assertEqual( Null.equal(Null.null, Null.null, Int.equal), true)
60
+ Null.equal(a, b, Int.equal) == false
61
+ Null.equal(a, c, Int.equal) == false
62
+ Null.equal(Null.null, Null.null, Int.equal) == true
63
63
```
64
64
*/
65
65
let equal : (t <'a >, t <'b >, ('a , 'b ) => bool ) => bool
@@ -75,13 +75,13 @@ let b = Null.null
75
75
let c = Null.Value(2)
76
76
77
77
// A value is greater than null
78
- assertEqual( Null.compare(a, b, Int.compare), Stdlib_Ordering.greater)
78
+ Null.compare(a, b, Int.compare) == Stdlib_Ordering.greater
79
79
// A value is less than null
80
- assertEqual( Null.compare(b, a, Int.compare), Stdlib_Ordering.less)
80
+ Null.compare(b, a, Int.compare) == Stdlib_Ordering.less
81
81
// A null is equal to null
82
- assertEqual( Null.compare(Null.null, Null.null, Int.compare), Stdlib_Ordering.equal)
82
+ Null.compare(Null.null, Null.null, Int.compare) == Stdlib_Ordering.equal
83
83
// The compare function is used if both are `Null.Value`
84
- assertEqual( Null.compare(a, c, Int.compare), Stdlib_Ordering.less)
84
+ Null.compare(a, c, Int.compare) == Stdlib_Ordering.less
85
85
```
86
86
*/
87
87
let compare : (t <'a >, t <'b >, ('a , 'b ) => Stdlib_Ordering .t ) => Stdlib_Ordering .t
0 commit comments