Index: trunk/Ohana/src/opihi/lib.shell/evaluate_stack.c
===================================================================
--- trunk/Ohana/src/opihi/lib.shell/evaluate_stack.c	(revision 40012)
+++ trunk/Ohana/src/opihi/lib.shell/evaluate_stack.c	(revision 40014)
@@ -88,8 +88,17 @@
 	gprint (GP_ERR, "%s ", stack[j].name);
       }
+      if (tmp_stack.type == ST_SCALAR_INT) {
+	gprint (GP_ERR, "---> %d ", tmp_stack.IntValue);
+      }
+      if (tmp_stack.type == ST_SCALAR_FLT) {
+	gprint (GP_ERR, "---> %f ", tmp_stack.FltValue);
+      }
       if (*Nstack > 0) gprint (GP_ERR, "\n");
       gprint (GP_ERR, "%d: ", i);
       for (j = 0; j < *Nstack; j++) {
 	gprint (GP_ERR, "%d ", stack[j].type);
+      }
+      if (tmp_stack.type != ST_NONE) {
+	gprint (GP_ERR, "---> %d ", tmp_stack.type);
       }
       if (*Nstack > 0) gprint (GP_ERR, "\n");
@@ -306,4 +315,5 @@
   stack[0].vector = NULL;
   stack[0].name = NULL;
+  stack[0].type = ST_NONE;
 }