dc: unbreak interactive mode - was trying to get next tokens instead of executing
function old new delta zbc_program_read - 268 +268 zdc_program_printStream - 146 +146 zbc_program_exec 4046 4182 +136 zdc_program_execStr 472 512 +40 zdc_parse_exprs_until_eof - 26 +26 zbc_vm_process 740 765 +25 zbc_lex_next 2225 2240 +15 zdc_parse_expr 569 535 -34 zbc_program_pushArray 147 - -147 zdc_program_asciify 370 - -370 ------------------------------------------------------------------------------ (add/remove: 3/2 grow/shrink: 4/1 up/down: 656/-551) Total: 105 bytes Signed-off-by: Denys Vlasenko <vda.linux@googlemail.com>
This commit is contained in:
@@ -41,6 +41,21 @@ testing "dc complex without spaces (multiple args)" \
|
||||
"16\n" \
|
||||
"" ""
|
||||
|
||||
testing "dc '>a' (conditional execute string) 1" \
|
||||
"dc" \
|
||||
"1\n9\n" \
|
||||
"" "[1p]sa [2p]sb 1 2>a\n9p"
|
||||
|
||||
testing "dc '>a' (conditional execute string) 2" \
|
||||
"dc" \
|
||||
"9\n" \
|
||||
"" "[1p]sa [2p]sb 2 1>a\n9p"
|
||||
|
||||
testing "dc '>aeb' (conditional execute string with else)" \
|
||||
"dc" \
|
||||
"2\n9\n" \
|
||||
"" "[1p]sa [2p]sb 2 1>aeb\n9p"
|
||||
|
||||
for f in dc_*.dc; do
|
||||
r="`basename "$f" .dc`_results.txt"
|
||||
test -f "$r" || continue
|
||||
|
||||
Reference in New Issue
Block a user