rdr 2.0.1 · OCaml Package

type symbol_kind =

| Export
| Import
| Local
| Debug
| Other

type symbol_datum = [

| `Name of string
| `Offset of int
| `Size of int
| `Lib of string * string
| `Kind of symbol_kind
| `PrintableData of string

]

type t = symbol_datum list

val kORDINAL_LEFT : int

val kORDINAL_CENTER : int

val kORDINAL_RIGHT : int

val kORDINAL_RIGHTMOST : int

val symbol_datum_ordinal : 
  [> `Kind of 'a
  | `Lib of 'b
  | `Name of 'c
  | `Offset of 'd
  | `PrintableData of 'e
  | `Size of 'f ] ->
  int

val symbol_kind_to_string : symbol_kind -> string

val symbol_datum_to_string : 
  ?use_kind:bool ->
  ?use_lib:bool ->
  ?use_printable:bool ->
  [> `Kind of symbol_kind
  | `Lib of 'a * string
  | `Name of string
  | `Offset of int
  | `PrintableData of string
  | `Size of int ] ->
  string

val sort_symbol_data : 
  [> `Kind of 'b
  | `Lib of 'c
  | `Name of 'd
  | `Offset of 'e
  | `PrintableData of 'f
  | `Size of 'g ] as 'a
    list ->
  'a list

val find_symbol_name : [> `Name of 'a ] list -> 'a

val find_symbol_lib : [> `Lib of 'a * 'b ] list -> 'a * 'b

val find_symbol_offset : [> `Offset of 'a ] list -> 'a

val find_symbol_printable : [> `PrintableData of 'a ] list -> 'a

val find_symbol_size : [> `Size of int ] list -> int

val find_symbol_kind : [> `Kind of 'a ] list -> 'a

val symbol_data_to_string : 
  ?basic_export:bool ->
  [> `Kind of symbol_kind
  | `Lib of 'a * string
  | `Name of string
  | `Offset of int
  | `PrintableData of string
  | `Size of int ]
    list ->
  string

val print_symbol_data : 
  ?with_lib:bool ->
  ?like_goblin:bool ->
  ?like_nlist:bool ->
  [> `Kind of symbol_kind
  | `Lib of string * string
  | `Name of string
  | `Offset of int
  | `Size of int ]
    list ->
  unit

val sort_symbols_with : 
  (([> `Lib of 'a * 'b | `Name of 'c | `Offset of 'd ] list ->
     [> `Lib of 'a * 'b | `Name of 'c | `Offset of 'd ] list ->
     int) ->
    'e ->
    'f) ->
  ?compare_libs:bool ->
  'e ->
  'f

val sort_symbols : 
  ?compare_libs:bool ->
  [> `Lib of 'b * 'c | `Name of 'd | `Offset of 'e ] as 'a list list ->
  'a list list

val compute_size : 
  int ->
  [> `Offset of int | `Size of int ] as 'a list list ->
  'a list list

val to_goblin_export : 
  [> `Name of string | `Offset of int | `Size of int ] list ->
  GoblinExport.t

val from_goblin_export : 
  GoblinExport.t ->
  libname:'a ->
  libinstall_name:'b ->
  [> `Kind of symbol_kind
  | `Lib of 'a * 'b
  | `Name of string
  | `Offset of int
  | `Size of int ]
    list

val to_goblin_import : 
  [> `Lib of string * string
  | `Name of string
  | `Offset of int
  | `Size of int ]
    list ->
  GoblinImport.t

package rdr