let add_uniform state_set uniform values_list =
  add_uniform_internal state_set uniform
    (State_attribute.mask_of_values values_list)