cλash/CLasH/VHDL/VHDLTypes.hs

   1 --
   2 -- Some types used by the VHDL module.
   3 --
   4 module CLasH.VHDL.VHDLTypes where
   5
   6 -- VHDL imports
   7 import qualified Language.VHDL.AST as AST
   8
   9 -- A description of a port of an entity
  10 type Port = (AST.VHDLId, AST.TypeMark)
  11
  12 -- A description of a VHDL entity. Contains both the entity itself as well as
  13 -- info on how to map a haskell value (argument / result) on to the entity's
  14 -- ports.
  15 data Entity = Entity {
  16   ent_id     :: AST.VHDLId, -- ^ The id of the entity
  17   ent_args   :: [Port], -- ^ A port for each non-empty function argument
  18   ent_res    :: Maybe Port, -- ^ The output port
  19   ent_dec    :: AST.EntityDec -- ^ The complete entity declaration
  20 } deriving (Show);
  21
  22 type Architecture = AST.ArchBody
  23
  24 -- vim: set ts=8 sw=2 sts=2 expandtab: