diff options
| author | John Wiegley <johnw@newartisans.com> | 2012-04-04 02:28:07 -0500 |
|---|---|---|
| committer | John Wiegley <johnw@newartisans.com> | 2012-04-04 02:28:07 -0500 |
| commit | 322d55823e682766e15adaaf54907a42d5ae4ab2 (patch) | |
| tree | ddfd95468f9d4d7164eadbfff641bc121efca8e6 /src/item.cc | |
| parent | 5a615ec680190222e25047366f166f9daf89c69f (diff) | |
| download | fork-ledger-322d55823e682766e15adaaf54907a42d5ae4ab2.tar.gz fork-ledger-322d55823e682766e15adaaf54907a42d5ae4ab2.tar.bz2 fork-ledger-322d55823e682766e15adaaf54907a42d5ae4ab2.zip | |
post.x = y defines metadata tag x
Diffstat (limited to 'src/item.cc')
| -rw-r--r-- | src/item.cc | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/src/item.cc b/src/item.cc index 5262d1db..17d46652 100644 --- a/src/item.cc +++ b/src/item.cc @@ -398,6 +398,13 @@ value_t get_comment(item_t& item) } } +void item_t::define(const symbol_t::kind_t, const string& name, + expr_t::ptr_op_t def) +{ + bind_scope_t bound_scope(*scope_t::default_scope, *this); + set_tag(name, def->calc(bound_scope)); +} + expr_t::ptr_op_t item_t::lookup(const symbol_t::kind_t kind, const string& name) { |