rdr 2.0.1 · OCaml Package

val find : 'a -> [> `Name of 'a ] as 'b list list -> 'b list

type mach_export_data =
  [ GoblinSymbol.symbol_datum
  | `Reexport of [ `As of string * string | `From of string ]
  | `Stub of int * int
  | `Flags of int ]
    list

val export_info_to_mach_export_data : 
  'a ->
  'b ->
  MachExports.export_info ->
  [> `Flags of int
  | `Kind of GoblinSymbol.symbol_kind
  | `Lib of 'b * 'b
  | `Name of 'a
  | `Offset of int
  | `PrintableData of string
  | `Reexport of [> `As of string * string | `From of string ]
  | `Stub of int * int ]
    list

val find_reexport : [> `Reexport of 'a ] list -> [> `Reexport of 'a ]

val find_stub : [> `Stub of 'a ] list -> 'a

val find_flags : [> `Flags of 'a ] list -> 'a

val mach_export_data_to_export_info : 
  [> `Flags of int
  | `Offset of int
  | `Reexport of [< `As of string * string | `From of string ]
  | `Stub of int * int ]
    list ->
  MachExports.export_info

val mach_export_datum_to_string : 
  ?use_kind:bool ->
  ?use_flags:bool ->
  ?use_lib:bool ->
  [< `Flags of int
  | `Kind of GoblinSymbol.symbol_kind
  | `Lib of string * string
  | `Name of string
  | `Offset of int
  | `PrintableData of string
  | `Reexport of [< `As of string * string | `From of string ]
  | `Size of int
  | `Stub of int * int ] ->
  string

val mach_export_datum_ordinal : 
  [< `Flags of 'a
  | `Kind of GoblinSymbol.symbol_kind
  | `Lib of string * string
  | `Name of string
  | `Offset of int
  | `PrintableData of string
  | `Reexport of [< `As of 'b * 'c | `From of 'd ]
  | `Size of int
  | `Stub of 'e ] ->
  int

val sort_mach_export_data : 
  [< `Flags of 'b & 'c
  | `Kind of GoblinSymbol.symbol_kind
  | `Lib of string * string
  | `Name of string
  | `Offset of int
  | `PrintableData of string
  | `Reexport of
    [< `As of 'd * 'e | `From of 'f ] & [< `As of 'g * 'h | `From of 'i ]
  | `Size of int
  | `Stub of 'j & 'k ] as 'a
    list ->
  'a list

val mach_export_data_to_string : 
  ?use_kind:bool ->
  ?use_flags:bool ->
  ?use_lib:bool ->
  mach_export_data ->
  string

val mach_export_data_to_symbol_data : 
  [> GoblinSymbol.symbol_datum ] as 'a list ->
  'a list

val print : mach_export_data list -> unit

val print_mach_export_data : 
  ?simple:bool ->
  ?goblin:bool ->
  mach_export_data ->
  unit

val empty : 'a list

package rdr