fix: avoid incomplete record updates in Eq tests for GHC 9.12

Author: Unisay

plutus-tx/test/Eq/Spec.hs

@@ -52,8 +52,8 @@ unitTests =
   let v1 :: SomeLargeADT () BuiltinString () () () = SomeLargeADT1 1 () Tx.True "foobar" () ()
       v2 :: SomeLargeADT () () () () () = SomeLargeADT2
       v3 :: SomeLargeADT () () () () Integer = SomeLargeADT3 1 2 3 4 5
-      v3Error1 = v3 {f1 = 0, f2 = error ()} -- mismatch comes first, error comes later
-      v3Error2 = v3 {f1 = error (), f2 = 0} -- error comes first, mismatch later
+      v3Error1 = SomeLargeADT3 0 (error ()) 3 4 5 -- mismatch comes first, error comes later
+      v3Error2 = SomeLargeADT3 (error ()) 0 3 4 5 -- error comes first, mismatch later
       v4 :: SomeVoid = undefined
       v5 = MyNewtype 42
       v6 = MyNewtype 99