let
type_unsigned_char = make_c_type (
Tbuiltin
Tuchar
)