Safe Haskell	None
Language	Haskell2010

AST.Term.TypeSig

Description

Type signatures

Synopsis

data TypeSig vars term k = TypeSig {
- _tsTerm :: k # term
- _tsType :: k # Scheme vars (TypeOf term)
}
tsType :: forall vars term k vars. Lens (TypeSig vars term k) (TypeSig vars term k) ((#) k (Scheme vars (TypeOf term))) ((#) k (Scheme vars (TypeOf term)))
tsTerm :: forall vars term k. Lens' (TypeSig vars term k) ((#) k term)
data family KWitness k :: (Knot -> Type) -> Type

Documentation

data TypeSig vars term k Source #

Constructors

TypeSig
Fields _tsTerm :: k # term _tsType :: k # Scheme vars (TypeOf term)

Instances

(MonadScopeLevel m, HasInferredType term, HasInferredValue (TypeOf term), KTraversable vars, KTraversable (InferOf term), KNodesConstraint (InferOf term) (Unify m), KNodesConstraint vars (MonadInstantiate m), Unify m (TypeOf term), Infer m (TypeOf term), Infer m term) => Infer m (TypeSig vars term) Source #
Instance details Defined in AST.Term.TypeSig Methods inferBody :: Tree (TypeSig vars term) (InferChild m k) -> m (Tree (TypeSig vars term) k, Tree (InferOf (TypeSig vars term)) (UVarOf m)) Source # inferContext :: Proxy m -> Proxy (TypeSig vars term) -> Dict (KNodesConstraint (TypeSig vars term) (Infer m), KNodesConstraint (InferOf (TypeSig vars term)) (Unify m)) Source #
KNodes (TypeSig vars term) Source #
Instance details Defined in AST.Term.TypeSig Associated Types type KNodesConstraint (TypeSig vars term) c :: Constraint Source # data KWitness (TypeSig vars term) a :: Type Source # Methods kLiftConstraint :: KNodesConstraint (TypeSig vars term) c => KWitness (TypeSig vars term) n -> Proxy c -> (c n -> r) -> r Source #
KPointed (TypeSig vars term) Source #
Instance details Defined in AST.Term.TypeSig Methods pureK :: (forall (n :: Knot -> Type). KWitness (TypeSig vars term) n -> Tree p n) -> Tree (TypeSig vars term) p Source #
KFunctor (TypeSig vars term) Source #
Instance details Defined in AST.Term.TypeSig Methods mapK :: (forall (n :: Knot -> Type). KWitness (TypeSig vars term) n -> Tree p n -> Tree q n) -> Tree (TypeSig vars term) p -> Tree (TypeSig vars term) q Source #
KApply (TypeSig vars term) Source #
Instance details Defined in AST.Term.TypeSig Methods zipK :: Tree (TypeSig vars term) p -> Tree (TypeSig vars term) q -> Tree (TypeSig vars term) (Product p q) Source #
KFoldable (TypeSig vars term) Source #
Instance details Defined in AST.Term.TypeSig Methods foldMapK :: Monoid a => (forall (n :: Knot -> Type). KWitness (TypeSig vars term) n -> Tree p n -> a) -> Tree (TypeSig vars term) p -> a Source #
KTraversable (TypeSig vars term) Source #
Instance details Defined in AST.Term.TypeSig Methods sequenceK :: Applicative f => Tree (TypeSig vars term) (ContainedK f p) -> f (Tree (TypeSig vars term) p) Source #
Constraints (TypeSig vars term k) Eq => Eq (TypeSig vars term k) Source #
Instance details Defined in AST.Term.TypeSig Methods (==) :: TypeSig vars term k -> TypeSig vars term k -> Bool # (/=) :: TypeSig vars term k -> TypeSig vars term k -> Bool #
Constraints (TypeSig vars term k) Ord => Ord (TypeSig vars term k) Source #
Instance details Defined in AST.Term.TypeSig Methods compare :: TypeSig vars term k -> TypeSig vars term k -> Ordering # (<) :: TypeSig vars term k -> TypeSig vars term k -> Bool # (<=) :: TypeSig vars term k -> TypeSig vars term k -> Bool # (>) :: TypeSig vars term k -> TypeSig vars term k -> Bool # (>=) :: TypeSig vars term k -> TypeSig vars term k -> Bool # max :: TypeSig vars term k -> TypeSig vars term k -> TypeSig vars term k # min :: TypeSig vars term k -> TypeSig vars term k -> TypeSig vars term k #
Constraints (TypeSig vars term k) Show => Show (TypeSig vars term k) Source #
Instance details Defined in AST.Term.TypeSig Methods showsPrec :: Int -> TypeSig vars term k -> ShowS # show :: TypeSig vars term k -> String # showList :: [TypeSig vars term k] -> ShowS #
Generic (TypeSig vars term k) Source #
Instance details Defined in AST.Term.TypeSig Associated Types type Rep (TypeSig vars term k) :: Type -> Type # Methods from :: TypeSig vars term k -> Rep (TypeSig vars term k) x # to :: Rep (TypeSig vars term k) x -> TypeSig vars term k #
Constraints (TypeSig vars term k) Binary => Binary (TypeSig vars term k) Source #
Instance details Defined in AST.Term.TypeSig Methods put :: TypeSig vars term k -> Put # get :: Get (TypeSig vars term k) # putList :: [TypeSig vars term k] -> Put #
Constraints (TypeSig vars term k) NFData => NFData (TypeSig vars term k) Source #
Instance details Defined in AST.Term.TypeSig Methods rnf :: TypeSig vars term k -> () #
Constraints (TypeSig vars term k) Pretty => Pretty (TypeSig vars term k) Source #
Instance details Defined in AST.Term.TypeSig Methods pPrintPrec :: PrettyLevel -> Rational -> TypeSig vars term k -> Doc # pPrint :: TypeSig vars term k -> Doc # pPrintList :: PrettyLevel -> [TypeSig vars term k] -> Doc #
data KWitness (TypeSig vars term) node Source #
Instance details Defined in AST.Term.TypeSig data KWitness (TypeSig vars term) node where W_TypeSig_term :: forall (vars :: Knot -> Type) (term :: Knot -> Type) (node :: Knot -> Type). KWitness (TypeSig vars term) term W_TypeSig_Scheme_vars_TypeOf_term :: forall (vars :: Knot -> Type) (term :: Knot -> Type) (node :: Knot -> Type). KWitness (TypeSig vars term) (Scheme vars (TypeOf term))
type InferOf (TypeSig v t) Source #
Instance details Defined in AST.Term.TypeSig type InferOf (TypeSig v t) = InferOf t
type KNodesConstraint (TypeSig vars term) constraint Source #
Instance details Defined in AST.Term.TypeSig type KNodesConstraint (TypeSig vars term) constraint = (constraint (Scheme vars (TypeOf term)), constraint term)
type Rep (TypeSig vars term k) Source #
Instance details Defined in AST.Term.TypeSig type Rep (TypeSig vars term k) = D1 (MetaData "TypeSig" "AST.Term.TypeSig" "syntax-tree-0.1.0.0-8tfou50n4eQ4Iq1dis9DWN" False) (C1 (MetaCons "TypeSig" PrefixI True) (S1 (MetaSel (Just "_tsTerm") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (k # term)) :*: S1 (MetaSel (Just "_tsType") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (k # Scheme vars (TypeOf term)))))

tsType :: forall vars term k vars. Lens (TypeSig vars term k) (TypeSig vars term k) ((#) k (Scheme vars (TypeOf term))) ((#) k (Scheme vars (TypeOf term))) Source #

tsTerm :: forall vars term k. Lens' (TypeSig vars term k) ((#) k term) Source #

data family KWitness k :: (Knot -> Type) -> Type Source #

KWitness k n is a witness that n is a node of k

Instances

data KWitness Pure node Source #
Instance details Defined in AST.Knot.Pure data KWitness Pure node where W_Pure_Pure :: forall (node :: Knot -> Type). KWitness Pure Pure
data KWitness Prune node Source #
Instance details Defined in AST.Knot.Prune data KWitness Prune node where W_Prune_Prune :: forall (node :: Knot -> Type). KWitness Prune Prune
data KWitness (ANode c) node Source #
Instance details Defined in AST.Combinator.ANode data KWitness (ANode c) node where W_ANode_c :: forall (c :: Knot -> Type) (node :: Knot -> Type). KWitness (ANode c) c
data KWitness (F f) node Source #
Instance details Defined in AST.Knot.Functor data KWitness (F f) node where W_F_F_f :: forall (f :: Type -> Type) (node :: Knot -> Type). KWitness (F f) (F f)
data KWitness (Ann a) node Source #
Instance details Defined in AST.Knot.Ann data KWitness (Ann a) node where W_Ann_Ann_a :: forall a (node :: Knot -> Type). KWitness (Ann a) (Ann a)
data KWitness (UnifyError t) n Source #
Instance details Defined in AST.Unify.Error data KWitness (UnifyError t) n where W_UnifyError_t :: forall (t :: Knot -> Type) (n :: Knot -> Type). KWitness (UnifyError t) t E_UnifyError_t :: forall (t :: Knot -> Type) (n :: Knot -> Type). KWitness t n -> KWitness (UnifyError t) n
data KWitness (FuncType typ) node Source #
Instance details Defined in AST.Term.FuncType data KWitness (FuncType typ) node where W_FuncType_typ :: forall (typ :: Knot -> Type) (node :: Knot -> Type). KWitness (FuncType typ) typ
data KWitness (LoadedNominalDecl t) n Source #
Instance details Defined in AST.Term.Nominal data KWitness (LoadedNominalDecl t) n = E_LoadedNominalDecl_Body (KRecWitness t n) \| E_LoadedNominalDecl_NomVarTypes (KWitness (NomVarTypes t) n)
data KWitness (NominalDecl typ) node Source #
Instance details Defined in AST.Term.Nominal data KWitness (NominalDecl typ) node = E_NominalDecl_Scheme_NomVarTypes_typ_typ (KWitness (Scheme (NomVarTypes typ) typ) node)
data KWitness (App expr) node Source #
Instance details Defined in AST.Term.App data KWitness (App expr) node where W_App_expr :: forall (expr :: Knot -> Type) (node :: Knot -> Type). KWitness (App expr) expr
data KWitness (ScopeTypes t) node Source #
Instance details Defined in AST.Term.NamelessScope data KWitness (ScopeTypes t) node where W_ScopeTypes_t :: forall (t :: Knot -> Type) (node :: Knot -> Type). KWitness (ScopeTypes t) t
data KWitness (Const a :: Knot -> Type) i Source #
Instance details Defined in AST.Class.Nodes data KWitness (Const a :: Knot -> Type) i
data KWitness (Flip GTerm a) n Source #
Instance details Defined in AST.Unify.Generalize data KWitness (Flip GTerm a) n = E_Flip_GTerm (KRecWitness a n)
data KWitness (Flip (ITerm a) e) n Source #
Instance details Defined in AST.Infer.Term data KWitness (Flip (ITerm a) e) n where E_Flip_ITerm_InferOf_e :: forall a (e :: Knot -> Type) (n :: Knot -> Type). KWitness (InferOf e) n -> KWitness (Flip (ITerm a) e) n E_Flip_ITerm_e :: forall a (e :: Knot -> Type) (n :: Knot -> Type) (f :: Knot -> Type). KWitness e f -> KWitness (Flip (ITerm a) f) n -> KWitness (Flip (ITerm a) e) n
data KWitness (Flip (BTerm a) e) n Source #
Instance details Defined in AST.Infer.Blame data KWitness (Flip (BTerm a) e) n where E_Flip_BTerm_InferOf_e :: forall a (e :: Knot -> Type) (n :: Knot -> Type). KWitness (InferOf e) n -> KWitness (Flip (BTerm a) e) n E_Flip_BTerm_e :: forall a (e :: Knot -> Type) (n :: Knot -> Type) (f :: Knot -> Type). KWitness e f -> KWitness (Flip (BTerm a) f) n -> KWitness (Flip (BTerm a) e) n
data KWitness (Compose a b) n Source #
Instance details Defined in AST.Combinator.Compose data KWitness (Compose a b) n where KWitness_Compose :: forall (a :: Knot -> Type) (b :: Knot -> Type) (n :: Knot -> Type) (a0 :: Knot -> Type) (b0 :: Knot -> Type). KWitness a a0 -> KWitness b b0 -> KWitness (Compose a b) (Compose a0 b0)
data KWitness (TermMap k expr) node Source #
Instance details Defined in AST.Term.Map data KWitness (TermMap k expr) node where W_TermMap_expr :: forall k (expr :: Knot -> Type) (node :: Knot -> Type). KWitness (TermMap k expr) expr
data KWitness (Var v expr) node Source #
Instance details Defined in AST.Term.Var data KWitness (Var v expr) node
data KWitness (Scheme varTypes typ) node Source #
Instance details Defined in AST.Term.Scheme data KWitness (Scheme varTypes typ) node where W_Scheme_typ :: forall (varTypes :: Knot -> Type) (typ :: Knot -> Type) (node :: Knot -> Type). KWitness (Scheme varTypes typ) typ
data KWitness (TypeSig vars term) node Source #
Instance details Defined in AST.Term.TypeSig data KWitness (TypeSig vars term) node where W_TypeSig_term :: forall (vars :: Knot -> Type) (term :: Knot -> Type) (node :: Knot -> Type). KWitness (TypeSig vars term) term W_TypeSig_Scheme_vars_TypeOf_term :: forall (vars :: Knot -> Type) (term :: Knot -> Type) (node :: Knot -> Type). KWitness (TypeSig vars term) (Scheme vars (TypeOf term))
data KWitness (FromNom nomId term) node Source #
Instance details Defined in AST.Term.Nominal data KWitness (FromNom nomId term) node
data KWitness (ToNom nomId term) node Source #
Instance details Defined in AST.Term.Nominal data KWitness (ToNom nomId term) node where W_ToNom_term :: forall nomId (term :: Knot -> Type) (node :: Knot -> Type). KWitness (ToNom nomId term) term
data KWitness (NominalInst n v) c Source #
Instance details Defined in AST.Term.Nominal data KWitness (NominalInst n v) c = E_NominalInst_k (KWitness v c)
data KWitness (Let v expr) node Source #
Instance details Defined in AST.Term.Let data KWitness (Let v expr) node where W_Let_expr :: forall v (expr :: Knot -> Type) (node :: Knot -> Type). KWitness (Let v expr) expr
data KWitness (Lam v expr) node Source #
Instance details Defined in AST.Term.Lam data KWitness (Lam v expr) node where W_Lam_expr :: forall v (expr :: Knot -> Type) (node :: Knot -> Type). KWitness (Lam v expr) expr
data KWitness (Scope expr a) node Source #
Instance details Defined in AST.Term.NamelessScope data KWitness (Scope expr a) node where W_Scope_expr_Maybe_a :: forall (expr :: Type -> Knot -> Type) a (node :: Knot -> Type). KWitness (Scope expr a) (expr (Maybe a))
data KWitness (ScopeVar expr a) node Source #
Instance details Defined in AST.Term.NamelessScope data KWitness (ScopeVar expr a) node
data KWitness (Product a b) n Source #
Instance details Defined in AST.Class.Nodes data KWitness (Product a b) n = E_Product_a (KWitness a n) \| E_Product_b (KWitness b n)
data KWitness (Sum a b) n Source #
Instance details Defined in AST.Class.Nodes data KWitness (Sum a b) n = E_Sum_a (KWitness a n) \| E_Sum_b (KWitness b n)
data KWitness (FlatRowExtends key val rest) node Source #
Instance details Defined in AST.Term.Row data KWitness (FlatRowExtends key val rest) node where W_FlatRowExtends_val :: forall key (val :: Knot -> Type) (rest :: Knot -> Type) (node :: Knot -> Type). KWitness (FlatRowExtends key val rest) val W_FlatRowExtends_rest :: forall key (val :: Knot -> Type) (rest :: Knot -> Type) (node :: Knot -> Type). KWitness (FlatRowExtends key val rest) rest
data KWitness (RowExtend key val rest) node Source #
Instance details Defined in AST.Term.Row data KWitness (RowExtend key val rest) node where W_RowExtend_val :: forall key (val :: Knot -> Type) (rest :: Knot -> Type) (node :: Knot -> Type). KWitness (RowExtend key val rest) val W_RowExtend_rest :: forall key (val :: Knot -> Type) (rest :: Knot -> Type) (node :: Knot -> Type). KWitness (RowExtend key val rest) rest
data KWitness (TypedLam var typ expr) node Source #
Instance details Defined in AST.Term.TypedLam data KWitness (TypedLam var typ expr) node where W_TypedLam_typ :: forall var (typ :: Knot -> Type) (expr :: Knot -> Type) (node :: Knot -> Type). KWitness (TypedLam var typ expr) typ W_TypedLam_expr :: forall var (typ :: Knot -> Type) (expr :: Knot -> Type) (node :: Knot -> Type). KWitness (TypedLam var typ expr) expr