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:
Denys Vlasenko
2018-12-22 18:04:08 +01:00
parent 5daa1a0adf
commit badf683b0a
2 changed files with 81 additions and 30 deletions

View File

@@ -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