package hack_parallel

  1. Overview
  2. Docs
package hack_parallel
Legend:
Page
Library
Module
Module type
Parameter
Class
Class type
Source

Source file hack_polymorphic_compare.ml

1
2
3
4
5
6
7
8
9
10
11
12
13
external compare   : 'a -> 'a -> int = "%compare"
external ascending : 'a -> 'a -> int = "%compare"
let descending x y = compare y x

let (<) = (<)
let (<=) = (<=)
let (>) = (>)
let (>=) = (>=)
let (=) = (=)
let (<>) = (<>)
let equal = (=)
let min = min
let max = max