diff options
author | John Wiegley <johnw@newartisans.com> | 2009-01-23 01:09:40 -0400 |
---|---|---|
committer | John Wiegley <johnw@newartisans.com> | 2009-01-23 01:09:40 -0400 |
commit | 8d4542d199a325f344f96aff94c8ca008f0ab98e (patch) | |
tree | e410237a173ae9e29041ddaac64ecdba3a0df8e5 /src/expr.cc | |
parent | 00fdadedcc9ebfacdc2c4d99ffd8e2d0bbe7acfb (diff) | |
download | fork-ledger-8d4542d199a325f344f96aff94c8ca008f0ab98e.tar.gz fork-ledger-8d4542d199a325f344f96aff94c8ca008f0ab98e.tar.bz2 fork-ledger-8d4542d199a325f344f96aff94c8ca008f0ab98e.zip |
Added more debug code.
Diffstat (limited to 'src/expr.cc')
-rw-r--r-- | src/expr.cc | 13 |
1 files changed, 12 insertions, 1 deletions
diff --git a/src/expr.cc b/src/expr.cc index 7e63e401..259440ac 100644 --- a/src/expr.cc +++ b/src/expr.cc @@ -118,8 +118,19 @@ void expr_t::compile(scope_t& scope) value_t expr_t::calc(scope_t& scope) { if (ptr.get()) { - if (! compiled) + if (! compiled) { + if (SHOW_DEBUG("expr.calc")) { + DEBUG("expr.calc", "Before compilation:"); + dump(*_log_stream); + } + compile(scope); + + if (SHOW_DEBUG("expr.calc")) { + DEBUG("expr.calc", "After compilation:"); + dump(*_log_stream); + } + } return ptr->calc(scope); } return NULL_VALUE; |