summary |
shortlog |
log |
commit | commitdiff |
tree
raw |
patch |
inline | side by side (from parent 1:
34e5071)
Apparently it works for arbitrary lvalues, so that's good.
last CSET if defined $val;
}
if (defined $val) {
last CSET if defined $val;
}
if (defined $val) {
+ local $PAINT{$tag} = 1;
my $exp = cset_expand @$cset, $ix, $val;
my $exp = cset_expand @$cset, $ix, $val;
return $exp;
} elsif ($mustp) { fail "variable `$tag\[$ix]' undefined"; }
else { return undef; }
return $exp;
} elsif ($mustp) { fail "variable `$tag\[$ix]' undefined"; }
else { return undef; }