let integral_type name ty bitsize =
  let min = Num.num_of_big_int (min_value_of_integral_type ~bitsize ty) in
  let max = Num.num_of_big_int (max_value_of_integral_type ~bitsize ty) in
  mkdecl (JCDenum_type(name,min,max)) Loc.dummy_position