Add some missing parentheses in the conformance tests (#7254)

kwxm · web-flow · commit 3fae58292296 · 2025-07-31T15:03:01.000+01:00
diff --git a/plutus-conformance/test-cases/uplc/evaluation/term/constr/constr-09/constr-09.uplc b/plutus-conformance/test-cases/uplc/evaluation/term/constr/constr-09/constr-09.uplc
@@ -1,4 +1,4 @@
 -- Tag cannot exceeed 2^64-1 = maxBound :: Word64
 (program 1.1.0
-    (constr 18446744073709551616 (con string "Maximum tag plus one") (con unit ())
+    (constr 18446744073709551616 (con string "Maximum tag plus one") (con unit ()))
 )
diff --git a/plutus-conformance/test-cases/uplc/evaluation/term/constr/constr-10/constr-10.uplc b/plutus-conformance/test-cases/uplc/evaluation/term/constr/constr-10/constr-10.uplc
@@ -1,4 +1,4 @@
 -- Version check fails before tag check
 (program 1.0.0
-    (constr 18446744073709551616 (con string "Maximum tag plus one") (con unit ())
+    (constr 18446744073709551616 (con string "Maximum tag plus one") (con unit ()))
 )

Original file line number	Diff line number	Diff line change
`@@ -1,4 +1,4 @@`
`1`	`1`	`-- Tag cannot exceeed 2^64-1 = maxBound :: Word64`
`2`	`2`	`(program 1.1.0`
`3`		`- (constr 18446744073709551616 (con string "Maximum tag plus one") (con unit ())`
	`3`	`+ (constr 18446744073709551616 (con string "Maximum tag plus one") (con unit ()))`
`4`	`4`	`)`
Original file line number	Diff line number	Diff line change
`@@ -1,4 +1,4 @@`
`1`	`1`	`-- Version check fails before tag check`
`2`	`2`	`(program 1.0.0`
`3`		`- (constr 18446744073709551616 (con string "Maximum tag plus one") (con unit ())`
	`3`	`+ (constr 18446744073709551616 (con string "Maximum tag plus one") (con unit ()))`
`4`	`4`	`)`