From: Mikko Rasa <tdb@tdb.fi>
Date: Mon, 22 Feb 2021 15:06:02 +0000 (+0200)
Subject: Some tweaks to GLSL debug output
X-Git-Url: http://git.tdb.fi/?a=commitdiff_plain;h=5f951824063db724807ea939ec10c75c3e4a1070;p=libs%2Fgl.git

Some tweaks to GLSL debug output
---

diff --git a/source/glsl/debug.cpp b/source/glsl/debug.cpp
index 4de8ac90..6bf6eef9 100644
--- a/source/glsl/debug.cpp
+++ b/source/glsl/debug.cpp
@@ -127,7 +127,11 @@ void DumpTree::visit(VariableReference &var)
 
 void DumpTree::visit(MemberAccess &memacc)
 {
-	annotated_branch(format("Member access: .%s", memacc.member), *memacc.left);
+	string text = "Member access:";
+	if(memacc.declaration)
+		text += format(" %%%d", get_label(*memacc.declaration));
+	text += format(" .%s", memacc.member);
+	annotated_branch(text, *memacc.left);
 }
 
 void DumpTree::visit(UnaryExpression &unary)
@@ -241,7 +245,12 @@ void DumpTree::visit(VariableDeclaration &var)
 	if(!var.init_expression)
 		last_branch();
 	if(var.array)
-		annotated_branch("Array []", *var.array_size);
+	{
+		if(var.array_size)
+			annotated_branch("Array []", *var.array_size);
+		else
+			append("Array []");
+	}
 
 	last_branch();
 	if(var.init_expression)