git.iko.soy/rowtype-yoga/purescript-native
on fe44756 help sign in
rowtype-yoga/purescript-native/src/Language/PureScript/Declarations.hs
46 lines 1.5 kB history raw
1-----------------------------------------------------------------------------
2--
3-- Module : Language.PureScript.Declarations
4-- Copyright : (c) Phil Freeman 2013
5-- License : MIT
6--
7-- Maintainer : Phil Freeman <paf31@cantab.net>
8-- Stability : experimental
9-- Portability :
10--
11-- |
12--
13-----------------------------------------------------------------------------
15{-# LANGUAGE DeriveDataTypeable #-}
17module Language.PureScript.Declarations where
19import Language.PureScript.Values
20import Language.PureScript.Types
21import Language.PureScript.Names
22import Language.PureScript.Kinds
23import Language.PureScript.CodeGen.JS.AST
25import qualified Data.Data as D
27type Precedence = Integer
29data Associativity = Infixl | Infixr deriving (Show, D.Data, D.Typeable)
31data Fixity = Fixity Associativity Precedence deriving (Show, D.Data, D.Typeable)
33data Module = Module ProperName [Declaration] deriving (Show, D.Data, D.Typeable)
35data Declaration
36 = DataDeclaration ProperName [String] [(ProperName, Maybe Type)]
37 | DataBindingGroupDeclaration [(ProperName, [String], [(ProperName, Maybe Type)])]
38 | TypeSynonymDeclaration ProperName [String] Type
39 | TypeDeclaration Ident Type
40 | ValueDeclaration Ident [[Binder]] (Maybe Guard) Value
41 | BindingGroupDeclaration [(Ident, Value)]
42 | ExternDeclaration Ident (Maybe JS) Type
43 | ExternDataDeclaration ProperName Kind
44 | FixityDeclaration Fixity String
45 | ImportDeclaration ModuleName (Maybe [Either Ident ProperName])
46 deriving (Show, D.Data, D.Typeable)