2 files changed, 11 insertions, 11 deletions

diff --git a/world/node_tolisp.c b/world/node_tolisp.c
index a02c0261..364d2862 100644
--- a/world/node_tolisp.c
+++ b/world/node_tolisp.c
@@ -49,7 +49,7 @@ static void lispblend(fz_blendnode *node, int level)
 {
 	fz_node *child;
 	indent(level);
-	printf("(blend-%d\n", node->mode);
+	printf("(blend-%d %d\n", node->mode, node->cs->refs);
 	for (child = node->super.first; child; child = child->next)
 		lispnode(child, level + 1);
 	indent(level);
@@ -75,13 +75,13 @@ static void lispcolor(fz_colornode *node, int level)
 	printf("(color %s ", node->cs->name);
 	for (i = 0; i < node->n; i++)
 		printf("%g ", node->samples[i]);
-	printf(")\n");
+	printf(" %d)\n", node->cs->refs);
 }
 
 static void lisplink(fz_linknode *node, int level)
 {
 	indent(level);
-	printf("(link %p)\n", node->tree);
+	printf("(link %p %d)\n", node->tree, node->tree->refs);
 }
 
 static void lisppath(fz_pathnode *node, int level)
@@ -144,13 +144,13 @@ static void lispimage(fz_imagenode *node, int level)
 {
 	fz_image *image = node->image;
 	indent(level);
-	printf("(image %dx%d %d+%d)\n", image->w, image->h, image->n, image->a);
+	printf("(image %dx%d %d+%d %d)\n", image->w, image->h, image->n, image->a, image->refs);
 }
 
 static void lispshade(fz_shadenode *node, int level)
 {
 	indent(level);
-	printf("(shade)\n");
+	printf("(shade %d)\n", node->shade->refs);
 }
 
 static void lispnode(fz_node *node, int level)
diff --git a/world/node_toxml.c b/world/node_toxml.c
index 42ef6f9c..6ce01732 100644
--- a/world/node_toxml.c
+++ b/world/node_toxml.c
@@ -49,7 +49,7 @@ static void xmlblend(fz_blendnode *node, int level)
 {
 	fz_node *child;
 	indent(level);
-	printf("<blend mode=\"%d\">\n", node->mode);
+	printf("<blend mode=\"%d\" refs=\"%d\">\n", node->mode, node->cs->refs);
 	for (child = node->super.first; child; child = child->next)
 		xmlnode(child, level + 1);
 	indent(level);
@@ -79,13 +79,13 @@ static void xmlsolid(fz_solidnode *node, int level)
 		if (i < node->n - 1)
 			putchar(' ');
 	}
-	printf("\" />\n");
+	printf("\" refs=\"%d\" />\n", node->cs->refs);
 }
 
 static void xmllink(fz_linknode *node, int level)
 {
 	indent(level);
-	printf("<link name=\"%p\" />\n", node->tree);
+	printf("<link name=\"%p\" refs=\"%d\" />\n", node->tree, node->tree->refs);
 }
 
 static void xmlpath(fz_pathnode *node, int level)
@@ -149,14 +149,14 @@ static void xmlimage(fz_imagenode *node, int level)
 {
 	fz_image *image = node->image;
 	indent(level);
-	printf("<image w=\"%d\" h=\"%d\" n=\"%d\" a=\"%d\" />\n",
-			image->w, image->h, image->n, image->a);
+	printf("<image w=\"%d\" h=\"%d\" n=\"%d\" a=\"%d\" refs=\"%d\" />\n",
+			image->w, image->h, image->n, image->a, image->refs);
 }
 
 static void xmlshade(fz_shadenode *node, int level)
 {
 	indent(level);
-	printf("<shade />\n");
+	printf("<shade refs=\"%d\" />\n", node->shade->refs);
 }
 
 static void xmlnode(fz_node *node, int level)