aboutsummaryrefslogtreecommitdiff
path: root/Tests/Object.mt
diff options
context:
space:
mode:
Diffstat (limited to 'Tests/Object.mt')
-rw-r--r--Tests/Object.mt8
1 files changed, 8 insertions, 0 deletions
diff --git a/Tests/Object.mt b/Tests/Object.mt
index 3345fb2..2ac151c 100644
--- a/Tests/Object.mt
+++ b/Tests/Object.mt
@@ -69,3 +69,11 @@ Test[
,
TestID->"JoinObjectField-Exists"
]
+
+Test[
+ ApplyToObjectField[NewObject[Obj, {"Key1" -> 1, "Key2" -> 2}], "Key1", g]
+ ,
+ Obj["Key1" -> g[1], "Key2" -> 2]
+ ,
+ TestID->"ApplyToObjectField"
+]