diff options
| author | Juan J. Martinez <jjm@usebox.net> | 2022-09-12 08:01:09 +0100 |
|---|---|---|
| committer | Juan J. Martinez <jjm@usebox.net> | 2022-09-12 08:01:09 +0100 |
| commit | b78d4f28adee1d0dab1dd7626650a3c767cd7cb8 (patch) | |
| tree | 268eab7bb2ccdbc739ee454964ba8ff5c730ea19 /test | |
| parent | df9f7c237f61ab0e3aeae28be3d6187d273d1996 (diff) | |
| download | micro-lang-hs-b78d4f28adee1d0dab1dd7626650a3c767cd7cb8.tar.gz micro-lang-hs-b78d4f28adee1d0dab1dd7626650a3c767cd7cb8.zip | |
Some checks
Diffstat (limited to 'test')
| -rw-r--r-- | test/Language.hs | 11 |
1 files changed, 10 insertions, 1 deletions
diff --git a/test/Language.hs b/test/Language.hs index 6e15525..84c10b4 100644 --- a/test/Language.hs +++ b/test/Language.hs @@ -416,6 +416,14 @@ testCaseE17 = \1 + false;\n" E.TypeError +testCaseE18 = + TestLabel "div by 0" $ + TestCase $ + expectError + "module main\n\ + \1 / 0;\n" + E.InvalidOperation + language = [ testCase2, testCase3, @@ -452,5 +460,6 @@ language = testCaseE14, testCaseE15, testCaseE16, - testCaseE17 + testCaseE17, + testCaseE18 ] |