diff options
-rw-r--r-- | Tests/Kranc.mt | 14 | ||||
-rwxr-xr-x | Tests/RunTests.m | 26 |
2 files changed, 40 insertions, 0 deletions
diff --git a/Tests/Kranc.mt b/Tests/Kranc.mt new file mode 100644 index 0000000..301f95e --- /dev/null +++ b/Tests/Kranc.mt @@ -0,0 +1,14 @@ + +(* Mathematica Test File *) + +(****************************************************************) +(* CreateThorn *) +(****************************************************************) + +Test[ + CreateKrancThornTT[{}, "TestThorns", "CreateThorn", Calculations -> {}] + , + Null + , + TestID->"CreateThorn" +] diff --git a/Tests/RunTests.m b/Tests/RunTests.m new file mode 100755 index 0000000..99cae33 --- /dev/null +++ b/Tests/RunTests.m @@ -0,0 +1,26 @@ +#!/usr/bin/env math -script + +SetOptions[ $Output, FormatType -> OutputForm ]; + +<< MUnitRunner`; + +(****************************************************************) +(* Initialise *) +(****************************************************************) + +Kranc`KrancDirectory = FileNameJoin[{Directory[],".."}]; + +$Path = Join[$Path, + {Kranc`KrancDirectory <> "/Tools/CodeGen", + Kranc`KrancDirectory <> "/Tools/MathematicaMisc", + Kranc`KrancDirectory <> "/Tools/PirahaPeg"}]; +Needs["Errors`"]; +Needs["KrancThorn`"]; +(* (\* Needs["Profile`"]; *\) *) + +tests = { + "Kranc" +}; + +(Print["\n"]; TestRun[#<>".mt", Loggers -> {VerbosePrintLogger[]}, TestRunTitle -> #]) & /@ tests; +Print[]; |