Consider all siblings in UnevaluatedProperties

This cuts down on the number of errors when `UnevaluatedProperties`
fails.

Related:
- #157
- json-schema-org/json-schema-spec#1172

Author: davishmcclurg

lib/json_schemer/draft202012/vocab/unevaluated.rb

@@ -61,7 +61,7 @@ def validate(instance, instance_location, keyword_location, context)
             evaluated_keys = Set[]
 
             context.adjacent_results.each_value do |adjacent_result|
-              collect_evaluated_keys(adjacent_result, instance_location, evaluated_keys)
+              collect_evaluated_keys(adjacent_result, instance_location, evaluated_keys, true)
             end
 
             evaluated = instance.reject do |key, _value|
@@ -77,8 +77,8 @@ def validate(instance, instance_location, keyword_location, context)
 
         private
 
-          def collect_evaluated_keys(result, instance_location, evaluated_keys)
-            return unless result.valid && result.instance_location == instance_location
+          def collect_evaluated_keys(result, instance_location, evaluated_keys, force = false)
+            return unless force || (result.valid && result.instance_location == instance_location)
             case result.source
             when Applicator::Properties, Applicator::PatternProperties, Applicator::AdditionalProperties, UnevaluatedProperties
               evaluated_keys.merge(result.annotation)