Copyright | (C) 2012-2016 University of Twente 2016-2017 Myrtle Software Ltd 2017-2018 Google Inc. |
---|---|
License | BSD2 (see the file LICENSE) |
Maintainer | Christiaan Baaij <christiaan.baaij@gmail.com> |
Safe Haskell | None |
Language | Haskell2010 |
Create Netlists out of normalized CoreHW Terms
Synopsis
- genNetlist :: Bool -> ClashOpts -> CustomReprs -> BindingMap -> VarEnv TopEntityT -> VarEnv Identifier -> CompiledPrimMap -> TyConMap -> (CustomReprs -> TyConMap -> Type -> State HWMap (Maybe (Either String FilteredHWType))) -> Int -> Bool -> SomeBackend -> IdentifierSet -> FilePath -> Maybe Text -> Id -> IO (Component, ComponentMap, IdentifierSet)
- runNetlistMonad :: Bool -> ClashOpts -> CustomReprs -> BindingMap -> VarEnv TopEntityT -> CompiledPrimMap -> TyConMap -> (CustomReprs -> TyConMap -> Type -> State HWMap (Maybe (Either String FilteredHWType))) -> Int -> Bool -> SomeBackend -> IdentifierSet -> FilePath -> VarEnv Identifier -> NetlistMonad a -> IO (a, NetlistState)
- genNames :: Bool -> Maybe Text -> IdentifierSet -> VarEnv Identifier -> BindingMap -> (VarEnv Identifier, IdentifierSet)
- genTopNames :: Maybe Text -> Bool -> PreserveCase -> HDL -> [TopEntityT] -> (VarEnv Identifier, IdentifierSet)
- genComponent :: HasCallStack => Id -> NetlistMonad (ComponentMeta, Component)
- genComponentT :: HasCallStack => Id -> Term -> NetlistMonad (ComponentMeta, Component)
- mkNetDecl :: (Id, Term) -> NetlistMonad [Declaration]
- mkDeclarations :: HasCallStack => Id -> Term -> NetlistMonad [Declaration]
- mkDeclarations' :: HasCallStack => DeclarationType -> Id -> Term -> NetlistMonad [Declaration]
- mkSelection :: DeclarationType -> NetlistId -> Term -> Type -> [Alt] -> [Declaration] -> NetlistMonad [Declaration]
- reorderDefault :: [(Pat, Term)] -> [(Pat, Term)]
- reorderCustom :: TyConMap -> CustomReprs -> Type -> [(Pat, Term)] -> [(Pat, Term)]
- patPos :: CustomReprs -> Pat -> Int
- mkFunApp :: HasCallStack => Identifier -> Id -> [Term] -> [Declaration] -> NetlistMonad [Declaration]
- toSimpleVar :: Identifier -> (Expr, Type) -> NetlistMonad (Expr, [Declaration])
- mkExpr :: HasCallStack => Bool -> DeclarationType -> NetlistId -> Term -> NetlistMonad (Expr, [Declaration])
- mkProjection :: Bool -> NetlistId -> Term -> Type -> Alt -> NetlistMonad (Expr, [Declaration])
- mkDcApplication :: HasCallStack => [HWType] -> NetlistId -> DataCon -> [Term] -> NetlistMonad (Expr, [Declaration])
Documentation
:: Bool | Whether this we're compiling a testbench (suppresses certain warnings) |
-> ClashOpts | Options Clash was called with |
-> CustomReprs | Custom bit representations for certain types |
-> BindingMap | Global binders |
-> VarEnv TopEntityT | TopEntity annotations |
-> VarEnv Identifier | Top entity names |
-> CompiledPrimMap | Primitive definitions |
-> TyConMap | TyCon cache |
-> (CustomReprs -> TyConMap -> Type -> State HWMap (Maybe (Either String FilteredHWType))) | Hardcoded Type -> HWType translator |
-> Int | IntWordInteger bit-width |
-> Bool | Whether the backend supports ifThenElse expressions |
-> SomeBackend | The current HDL backend |
-> IdentifierSet | Seen components |
-> FilePath | HDL dir |
-> Maybe Text | Component name prefix |
-> Id | Name of the |
-> IO (Component, ComponentMap, IdentifierSet) |
Generate a hierarchical netlist out of a set of global binders with
topEntity
at the top.
:: Bool | Whether this we're compiling a testbench (suppresses certain warnings) |
-> ClashOpts | Options Clash was called with |
-> CustomReprs | Custom bit representations for certain types |
-> BindingMap | Global binders |
-> VarEnv TopEntityT | TopEntity annotations |
-> CompiledPrimMap | Primitive Definitions |
-> TyConMap | TyCon cache |
-> (CustomReprs -> TyConMap -> Type -> State HWMap (Maybe (Either String FilteredHWType))) | Hardcode Type -> HWType translator |
-> Int | IntWordInteger bit-width |
-> Bool | Whether the backend supports ifThenElse expressions |
-> SomeBackend | The current HDL backend |
-> IdentifierSet | Seen components |
-> FilePath | HDL dir |
-> VarEnv Identifier | Seen components |
-> NetlistMonad a | Action to run |
-> IO (a, NetlistState) |
Run a NetlistMonad action in a given environment
:: Bool | New inline strategy enabled? |
-> Maybe Text | Prefix |
-> IdentifierSet | Identifier set to extend |
-> VarEnv Identifier | Pre-generated names |
-> BindingMap | |
-> (VarEnv Identifier, IdentifierSet) |
Generate names for all binders in BindingMap, except for the ones already present in given identifier varenv.
:: Maybe Text | Prefix |
-> Bool | Allow escaped identifiers? |
-> PreserveCase | Lower case basic ids? |
-> HDL | HDL to generate identifiers for |
-> [TopEntityT] | |
-> (VarEnv Identifier, IdentifierSet) |
Generate names for top entities. Should be executed at the very start of the synthesis process and shared between all passes.
:: HasCallStack | |
=> Id | Name of the function |
-> NetlistMonad (ComponentMeta, Component) |
Generate a component for a given function (caching)
:: HasCallStack | |
=> Id | Name of the function |
-> Term | Corresponding term |
-> NetlistMonad (ComponentMeta, Component) |
Generate a component for a given function
mkNetDecl :: (Id, Term) -> NetlistMonad [Declaration] Source #
:: HasCallStack | |
=> Id | LHS of the let-binder |
-> Term | RHS of the let-binder |
-> NetlistMonad [Declaration] |
Generate a list of concurrent Declarations for a let-binder, return an empty list if the bound expression is represented by 0 bits
:: HasCallStack | |
=> DeclarationType | Concurrent of sequential declaration |
-> Id | LHS of the let-binder |
-> Term | RHS of the let-binder |
-> NetlistMonad [Declaration] |
Generate a list of Declarations for a let-binder, return an empty list if the bound expression is represented by 0 bits
mkSelection :: DeclarationType -> NetlistId -> Term -> Type -> [Alt] -> [Declaration] -> NetlistMonad [Declaration] Source #
Generate a declaration that selects an alternative based on the value of the scrutinee
:: HasCallStack | |
=> Identifier | LHS of the let-binder |
-> Id | Name of the applied function |
-> [Term] | Function arguments |
-> [Declaration] | Tick declarations |
-> NetlistMonad [Declaration] |
Generate a list of Declarations for a let-binder where the RHS is a function application
toSimpleVar :: Identifier -> (Expr, Type) -> NetlistMonad (Expr, [Declaration]) Source #
:: HasCallStack | |
=> Bool | Treat BlackBox expression as declaration |
-> DeclarationType | Should the returned declarations be concurrent or sequential? |
-> NetlistId | Name hint for the id to (potentially) assign the result to |
-> Term | Term to convert to an expression |
-> NetlistMonad (Expr, [Declaration]) | Returned expression and a list of generate BlackBox declarations |
Generate an expression for a term occurring on the RHS of a let-binder
:: Bool | Projection must bind to a simple variable |
-> NetlistId | Name hint for the signal to which the projection is (potentially) assigned |
-> Term | The subject/scrutinee of the projection |
-> Type | The type of the result |
-> Alt | The field to be projected |
-> NetlistMonad (Expr, [Declaration]) |
Generate an expression that projects a field out of a data-constructor.
Works for both product types, as sum-of-product types.
:: HasCallStack | |
=> [HWType] | HWType of the LHS of the let-binder, can multiple types when we're creating a "split" product type (e.g. a tuple of a Clock and Reset) |
-> NetlistId | Name hint for result id |
-> DataCon | Applied DataCon |
-> [Term] | DataCon Arguments |
-> NetlistMonad (Expr, [Declaration]) | Returned expression and a list of generate BlackBox declarations |
Generate an expression for a DataCon application occurring on the RHS of a let-binder