let type_long_long = make_c_type (Tbuiltin Tlonglong)