View Raw SPL
/* alias for setvunits */
setyunits(argv)
{
        local cmd, j, lv;

        if (argc < 1) error("setyunits - input required");

        /* build up command arguments */
        cmd = "setvunits(";

        loop (j = 1..argc)
        {
                if (iswindow(getargv(j)))
                {
                        lv = sprintf("w%d", getwnum(getargv(j)));
                }
                else if (isstring(getargv(j)))
                {
                        lv = sprintf("'%s'", getargv(j));
                }
                else
                {
                        lv = caststring(getargv(j));
                }

                cmd += lv + ",";
        }

        cmd[strlen(cmd)] = ")";

        eval(cmd);
}