let define_option {group=group} name help option_class default =
  (new cp_custom_type option_class ~group name default help)