Changeset 2792 for trunk/Ohana/src/opihi/cmd.basic/run_if.c

Timestamp:

Dec 22, 2004, 1:23:23 PM (22 years ago)

Author:

eugene

Message:

fixing dvomath for strings

File:

• trunk/Ohana/src/opihi/cmd.basic/run_if.c (modified) (1 diff)

trunk/Ohana/src/opihi/cmd.basic/run_if.c

@@ -30 +30 @@
   /* determine value of conditional expression */
   val = dvomath (1, &argv[1], &size, 0);
-  if (val == NULL) { /* try expression as string op string */
-    char **stack;
-    int Nstack;
+  if (val == NULL) return (FALSE);
+  logic = atof (val); /* warning: round-off error is a danger */ 
 
-    stack = isolate_elements (1, &argv[1], &Nstack); 
-    if (Nstack != 5) goto syntax;
-    if (strcmp (stack[0], "(")) goto syntax;
-    if (strcmp (stack[4], ")")) goto syntax;
-    equals = -1;
-    if (!strcmp (stack[2], "==")) equals = TRUE;
-    if (!strcmp (stack[2], "!=")) equals = TRUE;
-    if (equals == -1) goto syntax;
-    logic = FALSE;
-    if (equals && !strcmp (stack[1], stack[3])) logic = TRUE;
-    if (!equals && strcmp (stack[1], stack[3])) logic = TRUE;
-  } else {
-    logic = atof (val); /* warning: round-off error is a danger */ 
-  }
   if (BreakOnTrue) {
     if (logic) {