msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

started a testsuite

Browse Source
This commit is contained in:
krangelov
2021-08-05 20:45:08 +02:00
parent 36e87668e0
commit 87f1e24384
4 changed files with 20 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
src/runtime/haskell/tests/basic.hs Normal file
View File

@@ -0,0 +1,6 @@
import Test.HUnit
import PGF2
main = do
gr <- readPGF "tests/basic.pgf"
runTestTTAndExit (TestCase (assertEqual "abstract names" "basic" (abstractName gr)))