diff options
| author | Arnold D. Robbins <arnold@skeeve.com> | 2020-07-02 10:30:03 +0300 |
|---|---|---|
| committer | Arnold D. Robbins <arnold@skeeve.com> | 2020-07-02 10:30:03 +0300 |
| commit | efd054b9800ec926587d2903f0712c68d4591d43 (patch) | |
| tree | 8dae33a9da6044ae7a1bd9c26625e0a98150d6a5 /interpret.h | |
| parent | 85da96b705877b4a10b0a96b3d9722536674b2d0 (diff) | |
| download | egawk-efd054b9800ec926587d2903f0712c68d4591d43.tar.gz egawk-efd054b9800ec926587d2903f0712c68d4591d43.tar.bz2 egawk-efd054b9800ec926587d2903f0712c68d4591d43.zip | |
Add instruction trace option.
Diffstat (limited to 'interpret.h')
| -rw-r--r-- | interpret.h | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/interpret.h b/interpret.h index 6137e8e0..4de778e7 100644 --- a/interpret.h +++ b/interpret.h @@ -100,7 +100,13 @@ top: } #endif - switch ((op = pc->opcode)) { + op = pc->opcode; + if (do_itrace) { + fprintf(stderr, "+ %s\n", opcode2str(op)); + fflush(stderr); + } + + switch (op) { case Op_rule: currule = pc->in_rule; /* for sole use in Op_K_next, Op_K_nextfile, Op_K_getline */ /* fall through */ |