Module Alpha

type 'a undoAlphaElement
type 'a alphaTableData
type 'a alphaTable = (string, (string, 'a alphaTableData Stdlib.ref) Stdlib.Hashtbl.t) Stdlib.Hashtbl.t
val newAlphaName : alphaTable:'a alphaTable -> ?⁠undolist:'a undoAlphaElement list Stdlib.ref -> lookupname:string -> data:'a -> string * 'a
val registerAlphaName : alphaTable:'a alphaTable -> ?⁠undolist:'a undoAlphaElement list Stdlib.ref -> lookupname:string -> data:'a -> unit
val getAlphaPrefix : lookupname:string -> string * string
val undoAlphaChanges : alphaTable:'a alphaTable -> undolist:'a undoAlphaElement list -> unit