diff --git a/.gitignore b/.gitignore index 9b55e739..7fbb8291 100644 --- a/.gitignore +++ b/.gitignore @@ -19,7 +19,7 @@ bower_components/ node_modules tmp/ .stack-work/ -output +# output tests/purs/docs/docs/ core-tests/full-core-docs.md tests/support/package-lock.json diff --git a/tests/TestPurus.hs b/tests/TestPurus.hs index e829e715..47c7b09f 100644 --- a/tests/TestPurus.hs +++ b/tests/TestPurus.hs @@ -22,7 +22,7 @@ shouldPassTests = do uplc1 <- runPIR misc "main" writeFile "./tests/purus/passing/Misc/output/Lib/main.plc" (show uplc1) uplc2 <- runPIR misc "minus" - writeFile "./tests/purus/passing/Misc/output/Lib/main.plc" (show uplc2) + writeFile "./tests/purus/passing/Misc/output/Lib/fakeminus.plc" (show uplc2) runPurus :: P.CodegenTarget -> FilePath -> IO () runPurus target dir = do diff --git a/tests/purus/passing/Misc/output/Lib/fakeminus.plc b/tests/purus/passing/Misc/output/Lib/fakeminus.plc new file mode 100644 index 00000000..b128c4f5 --- /dev/null +++ b/tests/purus/passing/Misc/output/Lib/fakeminus.plc @@ -0,0 +1 @@ +Program {_progAnn = Original (), _progVer = Version {_versionMajor = 1, _versionMinor = 1, _versionPatch = 0}, _progTerm = LamAbs (Original ()) (Name {_nameText = "v", _nameUnique = Unique {unUnique = 86}}) (TyBuiltin (Original ()) (SomeTypeIn DefaultUniInteger)) (LamAbs (Original ()) (Name {_nameText = "v1", _nameUnique = Unique {unUnique = 87}}) (TyBuiltin (Original ()) (SomeTypeIn DefaultUniInteger)) (Constant (Original ()) (Some (ValueOf DefaultUniInteger 42))))} \ No newline at end of file diff --git a/tests/purus/passing/Misc/output/Lib/main.plc b/tests/purus/passing/Misc/output/Lib/main.plc index b128c4f5..9c872e41 100644 --- a/tests/purus/passing/Misc/output/Lib/main.plc +++ b/tests/purus/passing/Misc/output/Lib/main.plc @@ -1 +1 @@ -Program {_progAnn = Original (), _progVer = Version {_versionMajor = 1, _versionMinor = 1, _versionPatch = 0}, _progTerm = LamAbs (Original ()) (Name {_nameText = "v", _nameUnique = Unique {unUnique = 86}}) (TyBuiltin (Original ()) (SomeTypeIn DefaultUniInteger)) (LamAbs (Original ()) (Name {_nameText = "v1", _nameUnique = Unique {unUnique = 87}}) (TyBuiltin (Original ()) (SomeTypeIn DefaultUniInteger)) (Constant (Original ()) (Some (ValueOf DefaultUniInteger 42))))} \ No newline at end of file +Program {_progAnn = Original (), _progVer = Version {_versionMajor = 1, _versionMinor = 1, _versionPatch = 0}, _progTerm = Constant (Original ()) (Some (ValueOf DefaultUniInteger 2))} \ No newline at end of file