1
1
mirror of https://github.com/github/semantic.git synced 2024-12-22 22:31:36 +03:00
semantic/src/Category.hs

38 lines
876 B
Haskell
Raw Normal View History

module Category where
2015-11-18 22:23:35 +03:00
import Prologue
2016-06-23 16:55:48 +03:00
import Data.Hashable
import Data.String
2015-11-18 22:23:35 +03:00
2016-02-05 00:35:42 +03:00
-- | A standardized category of AST node. Used to determine the semantics for
-- | semantic diffing and define comparability of nodes.
data Category
-- | The top-level branch node.
= Program
2016-06-04 01:37:40 +03:00
-- | A node indicating syntax errors.
| Error
2016-02-06 00:59:38 +03:00
-- | An operator with 2 operands.
| BinaryOperator
2016-02-05 00:35:42 +03:00
-- | A literal key-value data structure.
2016-02-06 00:59:38 +03:00
| DictionaryLiteral
2016-02-14 05:01:52 +03:00
-- | A pair, e.g. of a key & value
| Pair
2016-02-06 00:54:08 +03:00
-- | A call to a function.
| FunctionCall
-- | A string literal.
| StringLiteral
-- | An integer literal.
| IntegerLiteral
-- | A symbol literal.
| SymbolLiteral
2016-03-03 07:01:46 +03:00
-- | An array literal.
| ArrayLiteral
2016-02-05 00:35:42 +03:00
-- | A non-standard category, which can be used for comparability.
| Other String
deriving (Eq, Generic, Ord, Show)
2016-06-23 16:55:48 +03:00
2016-06-23 23:25:49 +03:00
-- Instances
2016-06-23 16:55:48 +03:00
instance Hashable Category