let
compare =
Hstring
.compare