sig val dingbatmap : (string * int list) list val glyphmap : (string * int list) list val truetypemap : (string * int list) list end