Derive Show for a bunch of types.

[matthijs/master-project/cλash.git] / VHDLTypes.hs

diff --git a/VHDLTypes.hs b/VHDLTypes.hs
index 9fdfbf1b0c34ef35679675680c1902f8c2e5db42..74084864dc8c3c9f8d8a1aa27a433e4a7cf8132a 100644 (file)
--- a/VHDLTypes.hs
+++ b/VHDLTypes.hs
@@ -21,4 +21,4 @@ data Entity = Entity {
   ent_res    :: VHDLSignalMap,        -- A mapping of the function result to port names
   ent_decl   :: Maybe AST.EntityDec,  -- The actual entity declaration. Can be empty for builtin functions.
   ent_pkg_decl :: Maybe AST.PackageDec -- A package declaration with types for this entity
-}
+} deriving (Show);