writeattr (ioi, to, buf);
IOwriteline (ioi, "\t]");
}
+
+ n = 0;
if ((nodes = Tfinds (graph, "nodes"))) {
if (!(no = Tfinds (graph, "maxnid")) || !T_ISNUMBER (no))
n = 100 * Tgettablen (nodes);
int ct, vt;
int vi, ni, nn;
+ cvo = NULL;
if ((ct = TCgettype (co, ci)) == C_LVAR) {
nn = (int) TCgetinteger (co, (ni = TCgetnext (co, TCgetfp (co, ci))));
cto = cvo = lvarp[flvari + nn].o;
long m;
int vi, ovi, nn, ni;
+ nn = 0;
+ vt = 0;
+ cko = cto = NULL;
if ((ct = TCgettype (co, ci)) == C_LVAR) {
nn = (int) TCgetinteger (co, (ni = TCgetnext (co, TCgetfp (co, ci))));
cvo = cto = lvarp[flvari + nn].o;
char s[2];
long fm;
+ fn = NULL;
wo = Tfindi (rootwo, evp->wi);
switch (evp->type) {
case G_MOUSE:
long fm;
int ni;
+ pp.x = pp.y = 0;
+ pvo = NULL;
+ fn = NULL;
ni = Gwidgets[evp->wi].udata;
np = &gfxnodes[ni];
wo = Tfindi (rootwo, evp->wi);
Tinss (to, "size", (so = Ttable (2)));
Tinss (so, "x", Treal ((double) dp->sx));
Tinss (so, "y", Treal ((double) dp->sy));
+
+ lrtno = NULL;
if ((co = Pfcall (fo, to)))
lrtno = Eunit (co);
Mpopmark (fm);
!T_ISTABLE (argv[1].o)
)
return L_FAILURE;
+
+ s = NULL;
for (Tgetfirst (argv[1].o, &tkvi); tkvi.kvp; Tgetnext (&tkvi)) {
if (!T_ISSTRING (tkvi.kvp->vo))
continue;
h = max (min (h, 1.0), 0.0);
s = max (min (s, 1.0), 0.0);
v = max (min (v, 1.0), 0.0);
+ r = g = b = 0.0;
if (s == 0.0)
r = g = b = v;