diff options
| author | John Wiegley <johnw@newartisans.com> | 2010-06-05 16:15:09 -0400 |
|---|---|---|
| committer | John Wiegley <johnw@newartisans.com> | 2010-06-05 16:15:09 -0400 |
| commit | 290cac7b84b60305e185c140645c9bac2ca9fb0e (patch) | |
| tree | c389da2eed81612ffb3868f61c31fa2534855fe1 /src/item.cc | |
| parent | f8bfbf8c250fa24bc9e26b9bf1eb64815a5a29ee (diff) | |
| parent | 1417b40fdf0a92a85ab01f233c0ae076079901a2 (diff) | |
| download | fork-ledger-290cac7b84b60305e185c140645c9bac2ca9fb0e.tar.gz fork-ledger-290cac7b84b60305e185c140645c9bac2ca9fb0e.tar.bz2 fork-ledger-290cac7b84b60305e185c140645c9bac2ca9fb0e.zip | |
Merge branch 'next'
Diffstat (limited to 'src/item.cc')
| -rw-r--r-- | src/item.cc | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/src/item.cc b/src/item.cc index 0a22b260..fea73066 100644 --- a/src/item.cc +++ b/src/item.cc @@ -323,6 +323,10 @@ namespace { return item.pos ? long(item.pos->sequence) : 0L; } + value_t get_addr(item_t& item) { + return long(&item); + } + value_t get_depth(item_t&) { return 0L; } @@ -376,6 +380,8 @@ expr_t::ptr_op_t item_t::lookup(const symbol_t::kind_t kind, return WRAP_FUNCTOR(get_wrapper<&get_actual>); else if (name == "actual_date") return WRAP_FUNCTOR(get_wrapper<&get_actual_date>); + else if (name == "addr") + return WRAP_FUNCTOR(get_wrapper<&get_addr>); break; case 'b': |