Rename fields of SignalInfo.

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

diff --git a/FlattenTypes.hs b/FlattenTypes.hs
index c8cd306d077a9eefe48e1cfed5c4ef7a01570b73..4e2640a8ee7d18520ea0f72333ce0b63bb248385 100644 (file)
--- a/FlattenTypes.hs
+++ b/FlattenTypes.hs
@@ -77,8 +77,8 @@ data CondDef sigid = CondDef {
 
 -- | Information on a signal definition
 data SignalInfo = SignalInfo {
-  name :: Maybe String,
-  ty   :: Type.Type
+  sigName :: Maybe String,
+  sigTy   :: Type.Type
 }
 
 -- | A flattened function