Method code for $foundation.eval_message()

[Turn off line numbering]

---

  1: arg name, definer, vars;
  2: var eval, msg, varkeys;
  3: 
  4: eval = (| definer.get_msg_attr(name, 'evaluator) |) || $bs_eval;
  5: msg = $message_frob.new_with(.get_msg(name, definer));
  6: vars = dict_add(vars, 'evaluator, eval);
  7: if ((varkeys = (| definer.get_msg_attr(name, 'varkeys) |)))
  8:     vars = dict_add(vars, 'varkeys, varkeys);
  9: else
 10:     vars = dict_add(vars, 'varkeys, 0);
 11: msg = msg.set_vars(vars);
 12: vars = dict_add(vars, 'time, 'pre);
 13: return msg.eval_ctext(vars);

---

// Created 27-Mar-1995 as a part of ColdCore, see: @help Credit