sig
  type os_type = Win32 | Unix | Cygwin
  exception Error of string
  val get_os_type : ExtUtils.Utils.os_type
  val replicate : int -> '-> 'a list
  val apply : ('-> 'b) -> '-> 'b
  val apply' : '-> ('-> 'b) -> 'b
  type 'a cfun = '-> '-> int
  val comp : 'ExtUtils.Utils.cfun
  val compare_2_tup :
    'ExtUtils.Utils.cfun * 'ExtUtils.Utils.cfun ->
    'a * '-> 'a * '-> int
  val compare_3_tup :
    'ExtUtils.Utils.cfun * 'ExtUtils.Utils.cfun * 'ExtUtils.Utils.cfun ->
    'a * 'b * '-> 'a * 'b * '-> int
  val fixpoint : ('-> 'a) -> '-> 'a
  val compare_to_equal : ('-> '-> int) -> '-> '-> bool
  val flip : ('-> '-> 'c) -> '-> '-> 'c
end