Method code for $compiler.do_obj()

[Turn on line numbering]
arg vars, flags, args;

if (!dict_contains(flags, "context"))
    throw(~parse, "no context flag for {obj}");
if (!dict_contains(flags, "object"))
    throw(~parse, "no object flag for {obj}");
if (listlen(args) == 0)
    throw(~parse, "{obj} requires an arg of the name");
flags = flags.replace("context", tosym(flags["context"]));
return [$format.new_tag("obj", flags, args), vars];

// Created 17-Jul-1996 as a part of ColdCore, see: @help Credit

Tlon