diff options
Diffstat (limited to 'src/Data/JLD/Model/Keyword.hs')
| -rw-r--r-- | src/Data/JLD/Model/Keyword.hs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/Data/JLD/Model/Keyword.hs b/src/Data/JLD/Model/Keyword.hs index 10835a9..ab86164 100644 --- a/src/Data/JLD/Model/Keyword.hs +++ b/src/Data/JLD/Model/Keyword.hs | |||
| @@ -32,6 +32,7 @@ data Keyword | |||
| 32 | | KeywordJson | 32 | | KeywordJson |
| 33 | | KeywordLanguage | 33 | | KeywordLanguage |
| 34 | | KeywordList | 34 | | KeywordList |
| 35 | | KeywordMerged | ||
| 35 | | KeywordNest | 36 | | KeywordNest |
| 36 | | KeywordNone | 37 | | KeywordNone |
| 37 | | KeywordNull | 38 | | KeywordNull |
| @@ -68,6 +69,7 @@ instance Show Keyword where | |||
| 68 | KeywordJson -> "@json" | 69 | KeywordJson -> "@json" |
| 69 | KeywordLanguage -> "@language" | 70 | KeywordLanguage -> "@language" |
| 70 | KeywordList -> "@list" | 71 | KeywordList -> "@list" |
| 72 | KeywordMerged -> "@merged" | ||
| 71 | KeywordNest -> "@nest" | 73 | KeywordNest -> "@nest" |
| 72 | KeywordNone -> "@none" | 74 | KeywordNone -> "@none" |
| 73 | KeywordNull -> "@null" | 75 | KeywordNull -> "@null" |
| @@ -103,6 +105,7 @@ parseKeyword = \case | |||
| 103 | "@json" -> Just KeywordJson | 105 | "@json" -> Just KeywordJson |
| 104 | "@language" -> Just KeywordLanguage | 106 | "@language" -> Just KeywordLanguage |
| 105 | "@list" -> Just KeywordList | 107 | "@list" -> Just KeywordList |
| 108 | "@merged" -> Just KeywordMerged | ||
| 106 | "@nest" -> Just KeywordNest | 109 | "@nest" -> Just KeywordNest |
| 107 | "@none" -> Just KeywordNone | 110 | "@none" -> Just KeywordNone |
| 108 | "@null" -> Just KeywordNull | 111 | "@null" -> Just KeywordNull |