XX

Signed-off-by: Matthew Ballance <matt.ballance@gmail.com>
zuspec · Aug 23, 2024 · 5db336e · 5db336e
1 parent b2dd6c1
commit 5db336e
Show file tree

Hide file tree

Showing 2 changed files with 9 additions and 3 deletions.
diff --git a/src/TaskBuildExpr.cpp b/src/TaskBuildExpr.cpp
@@ -451,8 +451,9 @@ void TaskBuildExpr::visitExprSignedNumber(ast::IExprSignedNumber *i) {
 
 void TaskBuildExpr::visitExprUnsignedNumber(ast::IExprUnsignedNumber *i) { 
     DEBUG_ENTER("visitExprUnsignedNumber");
-    m_expr = m_ctxt->ctxt()->mkTypeExprVal(
-        m_ctxt->ctxt()->mkValRefInt(i->getValue(), false, i->getWidth()));
+    vsc::dm::ValRefInt val_i(m_ctxt->ctxt()->mkValRefInt(i->getValue(), false, i->getWidth()));
+    DEBUG("val: %lld", val_i.get_val_s());
+    m_expr = m_ctxt->ctxt()->mkTypeExprVal(val_i);
     DEBUG_LEAVE("visitExprUnsignedNumber");
 }
 

diff --git a/src/TaskBuildTypeExecStmt.cpp b/src/TaskBuildTypeExecStmt.cpp
@@ -82,11 +82,16 @@ void TaskBuildTypeExecStmt::visitProceduralStmtReturn(ast::IProceduralStmtReturn
     vsc::dm::ITypeExpr *expr = 0;
     if (i->getExpr()) {
         expr = TaskBuildExpr(m_ctxt).build(i->getExpr());
+        vsc::dm::ITypeExprVal *ev = dynamic_cast<vsc::dm::ITypeExprVal *>(expr);
+        DEBUG("expr: %p", expr);
+        DEBUG("  flags: 0x%08x ; vp: 0x%08llx", 
+            ev->val().flags(),
+            ev->val().vp());
     }
 
     m_stmt = m_ctxt->ctxt()->mkTypeProcStmtReturn(expr);
 
-    DEBUG_LEAVE("visitProceduralStmtReturn");
+    DEBUG_LEAVE("visitProceduralStmtReturn %p", m_stmt);
 }
 
 void TaskBuildTypeExecStmt::visitProceduralStmtRepeat(ast::IProceduralStmtRepeat *i) {