Changeset 40014

Timestamp:

Apr 13, 2017, 5:41:06 AM (9 years ago)

Author:

eugene

Message:

init stack type with NONE

File:

• trunk/Ohana/src/opihi/lib.shell/evaluate_stack.c (modified) (2 diffs)

trunk/Ohana/src/opihi/lib.shell/evaluate_stack.c

@@ -88 +88 @@
         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 +315 @@
   stack[0].vector = NULL;
   stack[0].name = NULL;
+  stack[0].type = ST_NONE;
 }