setvname(vname, val)
{
        local vstr;

        vstr = sprintf("'%s'", vname);
        setvar(eval(vstr), val);
}