diff options
author | Péter Diviánszky <divipp@gmail.com> | 2016-02-26 12:32:18 +0100 |
---|---|---|
committer | Péter Diviánszky <divipp@gmail.com> | 2016-02-26 12:32:18 +0100 |
commit | 5ea5e05a87c76d80194dbdfac177994aa870b783 (patch) | |
tree | bc1c27ab28fa248b343c13e949caa3ab9a3caaa9 /ddl/Definitions.hs | |
parent | c0d38528840c15998c02ef8e04a0a7b7be34ad5d (diff) |
add Range type
Diffstat (limited to 'ddl/Definitions.hs')
-rw-r--r-- | ddl/Definitions.hs | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/ddl/Definitions.hs b/ddl/Definitions.hs index 04f461c..1849ed2 100644 --- a/ddl/Definitions.hs +++ b/ddl/Definitions.hs | |||
@@ -459,12 +459,17 @@ mesh = do | |||
459 | ] | 459 | ] |
460 | 460 | ||
461 | typeInfo = do | 461 | typeInfo = do |
462 | data_ "TypeInfo" $ do | 462 | data_ "Range" $ do |
463 | constR_ "TypeInfo" | 463 | constR_ "Range" |
464 | [ "startLine" #:: Int | 464 | [ "startLine" #:: Int |
465 | , "startColumn" #:: Int | 465 | , "startColumn" #:: Int |
466 | , "endLine" #:: Int | 466 | , "endLine" #:: Int |
467 | , "endColumn" #:: Int | 467 | , "endColumn" #:: Int |
468 | ] | ||
469 | |||
470 | data_ "TypeInfo" $ do | ||
471 | constR_ "TypeInfo" | ||
472 | [ "range" #:: "Range" | ||
468 | , "text" #:: String | 473 | , "text" #:: String |
469 | ] | 474 | ] |
470 | 475 | ||