File tree Expand file tree Collapse file tree 2 files changed +9
-0
lines changed Expand file tree Collapse file tree 2 files changed +9
-0
lines changed Original file line number Diff line number Diff line change @@ -204,6 +204,10 @@ symbolVerifiers =
204
204
assertSort
205
205
[assertSort, acceptAnySort, acceptAnySort]
206
206
)
207
+ ,
208
+ ( Map. updateAllKey
209
+ , Builtin. verifySymbol assertSort [assertSort, assertSort]
210
+ )
207
211
,
208
212
( Map. in_keysKey
209
213
, Builtin. verifySymbol Bool. assertSort [acceptAnySort, assertSort]
@@ -486,6 +490,7 @@ builtinFunctions key
486
490
| key == Map. elementKey = Just $ Builtin. functionEvaluator evalElement
487
491
| key == Map. unitKey = Just $ Builtin. functionEvaluator evalUnit
488
492
| key == Map. updateKey = Just $ Builtin. functionEvaluator evalUpdate
493
+ | key == Map. updateAllKey = Just $ Builtin. notImplemented
489
494
| key == Map. in_keysKey = Just $ Builtin. functionEvaluator evalInKeys
490
495
| key == Map. keysKey = Just $ Builtin. functionEvaluator evalKeys
491
496
| key == Map. keys_listKey = Just $ Builtin. functionEvaluator evalKeysList
Original file line number Diff line number Diff line change @@ -34,6 +34,7 @@ module Kore.Builtin.Map.Map (
34
34
removeKey ,
35
35
unitKey ,
36
36
updateKey ,
37
+ updateAllKey ,
37
38
sizeKey ,
38
39
valuesKey ,
39
40
inclusionKey ,
@@ -73,6 +74,9 @@ unitKey = "MAP.unit"
73
74
updateKey :: IsString s => s
74
75
updateKey = " MAP.update"
75
76
77
+ updateAllKey :: IsString s => s
78
+ updateAllKey = " MAP.updateAll"
79
+
76
80
in_keysKey :: IsString s => s
77
81
in_keysKey = " MAP.in_keys"
78
82
You can’t perform that action at this time.
0 commit comments