class BinData::SanitizedParameters

def must_be_integer(*keys)
  keys.each do |key|
    if has_parameter?(key)
      parameter = self[key]
      unless Symbol === parameter or
             parameter.respond_to? :arity or
             parameter.respond_to? :to_int
        raise ArgumentError, "parameter '#{key}' in #{@the_class} must " +
                             "evaluate to an integer, got #{parameter.class}"
      end
    end
  end
end