Method getTypespec

src/DesignCompile/CompileExpression.cpp:4135–4405

}

const typespec *CompileHelper::getTypespec(DesignComponent *component,
                                           const FileContent *fC, NodeId id,
                                           CompileDesign *compileDesign,
                                           Reduce reduce,
                                           ValuedComponentI *instance) {
  if (loopDetected(fC->getFileId(), fC->Line(id), compileDesign, instance)) {
    return nullptr;
  }
  UHDM::Serializer &s = compileDesign->getSerializer();
  const DataType *dtype = nullptr;
  const typespec *result = nullptr;
  std::string basename;
  std::vector<std::string> suffixnames;
  switch (fC->Type(id)) {
    case VObjectType::paIntegerAtomType_Byte: {
      result = s.MakeByte_typespec();
      break;
    }
    case VObjectType::paIntegerAtomType_Int: {
      result = s.MakeInt_typespec();
      break;
    }
    case VObjectType::paIntegerAtomType_Integer: {
      result = s.MakeInteger_typespec();
      break;
    }
    case VObjectType::paIntegerAtomType_LongInt: {
      result = s.MakeLong_int_typespec();
      break;
    }
    case VObjectType::paIntegerAtomType_Shortint: {
      result = s.MakeShort_int_typespec();
      break;
    }
    case VObjectType::paIntegerAtomType_Time: {
      result = s.MakeTime_typespec();
      break;
    }
    case VObjectType::slStringConst: {
      basename = fC->SymName(id);
      NodeId suffix = fC->Sibling(id);
      while (suffix && (fC->Type(suffix) == VObjectType::slStringConst)) {
        suffixnames.emplace_back(fC->SymName(suffix));
        suffix = fC->Sibling(suffix);
      }
      break;
    }
    case VObjectType::paComplex_func_call: {
      UHDM::any *exp =
          compileExpression(component, fC, fC->Parent(id), compileDesign,
                            reduce, nullptr, instance, false);
      if (exp) {
        if (exp->UhdmType() == uhdmhier_path) {
          bool invalidValue = false;
          result = (typespec *)decodeHierPath(
              (hier_path *)exp, invalidValue, component, compileDesign, reduce,
              instance, fC->getFileId(), fC->Line(id), nullptr, false, true);
        } else if (exp->UhdmType() == uhdmbit_select) {