changeset 673:776c22f83726

Set default formula.
author Matti Hamalainen <ccr@tnsp.org>
date Tue, 16 Apr 2013 15:03:29 +0300
parents 75e9af630e18
children a25d30714cfe
files tests/evaltest.c
diffstat 1 files changed, 18 insertions(+), 10 deletions(-) [+]
line wrap: on
line diff
--- a/tests/evaltest.c	Tue Apr 16 12:01:54 2013 +0300
+++ b/tests/evaltest.c	Tue Apr 16 15:03:29 2013 +0300
@@ -69,6 +69,8 @@
     DMValue result, t, f = 44100.0f;
     int ret;
 
+    optFormula = "-pi * -2";
+
     dmInitProg("evaltest", "evaltest", "0.1", NULL, NULL);
 
     // Parse arguments
@@ -91,18 +93,24 @@
     if (ret != 0)
         return -1;
 
-    dm_eval_clear_err(ev);
-    
-    ret = dm_eval_reorder(ev, parsed, &ordered);
-    dmMsg(1, "reorder ret=%d\n", ret);
-    if (ev->err)
-        dmError("%s\n", ev->errStr);
+    for (i = 0; i < 2; i++)
+    {
+        dm_eval_clear_err(ev);
+        
+        ret = dm_eval_reorder(ev, parsed, &ordered, 0);
+        dmMsg(1, "reorder ret=%d\n", ret);
+        if (ev->err)
+            dmError("%s\n", ev->errStr);
 
-    if (dmVerbosity > 0)
-        dm_print_optree(ev, ordered);
+        if (dmVerbosity > 0)
+            dm_print_optree(ev, ordered);
 
-    if (ret != 0)
-        return -2;
+        if (ret != 0)
+            return -2;
+        
+        parsed = ordered;
+    }
+
 
     if (optBenchmark)
     {