+ Set<const Statement *> set_cst(cur_st, &st);
+
+ try
+ {
+ LoaderAction *act = find_action(ActionKey(st.keyword, st.get_signature()));
+ if(act)
+ {
+ sub_loaded = false;
+ act->execute(*this, st);
+ if(check_sub_loads && !st.sub.empty() && !sub_loaded)
+ throw logic_error("substatements ignored");
+ }
+ }
+ catch(const data_error &)
+ {
+ throw;
+ }
+ catch(const exception &e)
+ {
+ throw data_error(st.source, st.line, e);
+ }
+}
+
+void Loader::load_sub_with(Loader &ldr)
+{
+ if(!cur_st)
+ throw logic_error("no current statement");
+
+ ldr.load(*cur_st);
+ sub_loaded = true;
+}
+
+void Loader::add(const string &kwd, LoaderAction *act)
+{
+ ActionKey key(kwd, (act ? act->get_signature() : "*"));
+ ActionMap::iterator i = actions.find(key);
+ if(i!=actions.end())
+ {
+ delete i->second;
+ i->second = act;
+ }
+ else
+ actions[key] = act;
+}
+
+LoaderAction *Loader::find_action(const ActionKey &key) const
+{
+ ActionMap::const_iterator begin = actions.lower_bound(ActionKey(key.keyword, string()));
+ ActionMap::const_iterator end = actions.upper_bound(ActionKey(key.keyword, "~"));
+
+ if(begin==end)
+ throw unknown_keyword(key.keyword);
+
+ for(ActionMap::const_iterator i=begin; i!=end; ++i)
+ if(signature_match(key.signature, i->first.signature))
+ return i->second;
+
+ throw invalid_signature(key.keyword, key.signature);
+}
+
+const string &Loader::get_source() const
+{
+ if(!cur_st)
+ throw logic_error("no current statement");
+ return cur_st->source;
+}
+
+
+Loader::ActionKey::ActionKey(const string &k, const string &s):
+ keyword(k),
+ signature(s)
+{ }
+
+bool Loader::ActionKey::operator<(const ActionKey &other) const
+{
+ if(keyword!=other.keyword)
+ return keyword<other.keyword;
+ return signature<other.signature;