diff options
| author | Eugen Wissner <belka@caraus.de> | 2024-08-02 00:09:57 +0300 |
|---|---|---|
| committer | Eugen Wissner <belka@caraus.de> | 2024-08-02 00:09:57 +0300 |
| commit | 5f8d9abe76187669cd7d4f691a2c40db2b4c8a6f (patch) | |
| tree | 26e9f18c2b73c7533c674070f1df21e2a6ff6268 /tests/Language/Elna/ParserSpec.hs | |
| parent | d4471ca2fa765c8c4c4f1e8bec59fc0c441eb824 (diff) | |
| download | elna-5f8d9abe76187669cd7d4f691a2c40db2b4c8a6f.tar.gz | |
Require trailing semicolon for type declarations
Diffstat (limited to 'tests/Language/Elna/ParserSpec.hs')
| -rw-r--r-- | tests/Language/Elna/ParserSpec.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/Language/Elna/ParserSpec.hs b/tests/Language/Elna/ParserSpec.hs index c230797..6c91a11 100644 --- a/tests/Language/Elna/ParserSpec.hs +++ b/tests/Language/Elna/ParserSpec.hs @@ -25,12 +25,12 @@ spec = it "parses type definition for a type starting like array" $ let expected = Program [TypeDefinition "t" $ NamedType "arr"] - actual = parse programP "" "type t = arr" + actual = parse programP "" "type t = arr;" in actual `shouldParse` expected it "parses array type definition" $ let expected = Program [TypeDefinition "t" $ ArrayType 10 (NamedType "int")] - actual = parse programP "" "type t = array[10] of int" + actual = parse programP "" "type t = array[10] of int;" in actual `shouldParse` expected it "parses parameters" $ |