nearly finished GroupBlock VHDL gen

[blast.git] / BlockParameterGeneric.cpp

diff --git a/BlockParameterGeneric.cpp b/BlockParameterGeneric.cpp
index 5b694fcbb0448d8943e825450ea1eb66fcb30824..d652c3740d90c18632128304320125a7effd1a3e 100644 (file)
--- a/BlockParameterGeneric.cpp
+++ b/BlockParameterGeneric.cpp
@@ -7,6 +7,9 @@ BlockParameterGeneric::BlockParameterGeneric() : BlockParameter() {
 }\r
 \r
 BlockParameterGeneric::BlockParameterGeneric(AbstractBlock* _owner, const QString &_name, const QString &_type, const QString &_value) : BlockParameter(_owner, _name, _type, _value) {\r
 }\r
 \r
 BlockParameterGeneric::BlockParameterGeneric(AbstractBlock* _owner, const QString &_name, const QString &_type, const QString &_value) : BlockParameter(_owner, _name, _type, _value) {\r

+  /* CAUTION: no check done on the type parameter !\r
+   * It must never be "expression" but something that is numeric/boolean\r
+   */\r

   userValue = defaultValue;\r
 }\r
 \r
   userValue = defaultValue;\r
 }\r
 \r


@@ -66,13 +69,16 @@ QString BlockParameterGeneric::toVHDL(int context, int flags) {
       ret = formatNoValue.arg(name).arg(getTypeString());\r
     }\r
   }\r
       ret = formatNoValue.arg(name).arg(getTypeString());\r
     }\r
   }\r

-  else if (context == BlockParameter::Architecture) {\r
+  else if (context == BlockParameter::Instance) {\r

     QString format = "%1 => %2";\r
     if ((flags & BlockParameter::NoComma) == 0) {\r
       format.append(";");\r
     }\r
     AbstractBlock* parent = owner->getParent();\r
     QString format = "%1 => %2";\r
     if ((flags & BlockParameter::NoComma) == 0) {\r
       format.append(";");\r
     }\r
     AbstractBlock* parent = owner->getParent();\r

-    BlockParameter* p = parent->getParameterFromName(name);\r
+    BlockParameter* p = NULL;\r
+    if (parent != NULL) {\r
+      p = parent->getParameterFromName(name);\r
+    }\r

     if (p != NULL) {\r
       /* the parent group has a generic parameter with the same\r
            name\r
     if (p != NULL) {\r
       /* the parent group has a generic parameter with the same\r
            name\r