updated tests

Author: zeme-wana

plutus-tx-plugin/test/Budget/9.6/matchAsDataE.pir.golden

@@ -48,7 +48,10 @@
                      {all dead. integer}
                      (/\dead -> 1)
                      (/\dead ->
-                        Unit_match (error {Unit}) {integer} (error {integer}))
+                        let
+                          !defaultBody : integer = error {integer}
+                        in
+                        Unit_match (error {Unit}) {integer} defaultBody)
                      {all dead. dead}))
            {all dead. dead}))
   (Constr 0 [I 1])

plutus-tx-plugin/test/Budget/9.6/matchAsDataE.uplc.golden

@@ -23,5 +23,7 @@
                                 (force ifThenElse
                                    (equalsInteger 1 ds)
                                    (delay 1)
-                                   (delay (case error [error])))) ])))) ])
+                                   (delay
+                                      ((\cse -> case cse [cse])
+                                         error)))) ])))) ])
       (Constr 0 [I 1])))