Collapse nodes with only one child and no additional text content

spec/runtime/languages/json/errors.txt

@@ -18,16 +18,16 @@ recovers from errors inside arrays
 [1, , 2]
 ---
 (value (array
-    (value (number))
+    (number)
     (ERROR)
-    (value (number))))
+    (number)))
 
 ==========================================
 recovers from errors inside objects
 ==========================================
 { "key1": 1, oops }
 ---
-(value (object (string) (value (number)) (ERROR)))
+(value (object (string) (number) (ERROR)))
 
 ==========================================
 recovers from errors inside nested objects
@@ -35,6 +35,6 @@ recovers from errors inside nested objects
 { "key1": { "key2": 1, 2 }, [, "key3": 3 }
 ---
 (value (object
-    (string) (value (object (string) (value (number)) (ERROR)))
+    (string) (object (string) (number) (ERROR))
     (ERROR)
-    (string) (value (number))))
+    (string) (number)))

spec/runtime/languages/json/main.txt

@@ -24,14 +24,11 @@ parses arrays
 ]
 ---
 (value (array
-    (value (number))
-    (value (null))
-    (value (true))
-    (value (false))
-    (value (object
-        (string) (value (string))
-    ))
-))
+    (number)
+    (null)
+    (true)
+    (false)
+    (object (string) (string))))
 
 ====================
 parses empty objects
@@ -49,7 +46,7 @@ parses long objects
 }
 ---
 (value (object
-	(string) (value (string))
-	(string) (value (number))
+	(string) (string)
+	(string) (number)
 ))