Changeset 872 for trunk/lib/ubasic/ubasic.c

Timestamp:

11/27/11 10:20:29 (6 months ago)

Author:

msl

Message:

Aktualisierung auf Rev. 1434 offizieller Trunk

*  http://trac.assembla.com/chdk/changeset/1434/trunk
* Betrifft alle
+ Zusammenfassung der in Revision 867 neu eingeführten uBasic-Befehle zu einem Befehl
+ set_yield MAX_LINES MAX_TICKS

Files:

• trunk/lib/ubasic/ubasic.c (modified) (2 diffs)

trunk/lib/ubasic/ubasic.c

@@ -1527 +1527 @@
 }
 
-static void set_yield_lines_statement()
-{
-    accept(TOKENIZER_SET_YIELD_LINES);
-    yield_max_lines = expr();
+static void set_yield_statement()
+{
+    accept(TOKENIZER_SET_YIELD);
+    int val = expr();
+    yield_max_lines = val?val:YIELD_MAX_LINES_DEFAULT;
+    val = expr();
+    yield_max_ms = val?val:YIELD_MAX_MS_DEFAULT;
     accept_cr();
 }
 
-static void set_yield_ms_statement()
-{
-    accept(TOKENIZER_SET_YIELD_MS);
-    yield_max_ms = expr();
-    accept_cr();
-}
 /*---------------------------------------------------------------------------*/
 
@@ -2295 +2292 @@
     set_config_value_statement();
     break;
-  case TOKENIZER_SET_YIELD_LINES:
-    set_yield_lines_statement();
-    break;
-  case TOKENIZER_SET_YIELD_MS:
-    set_yield_ms_statement();
-    break;
-          
+  case TOKENIZER_SET_YIELD:
+    set_yield_statement();
+    break;
+
   default:
       DEBUG_PRINTF("ubasic.c: statement(): not implemented %d\n", token);