return sv;
}
-static SV *
-new_ref (HV *hv, const char *klass)
-{
- return sv_bless (newRV ((SV *)hv), gv_stashpv (klass, 1));
-}
-
static SV *
newSVptr (void *ptr, const char *klass)
{
CODE:
{
wchar_t *wstr = sv2wcs (text);
- int wlen = wcslen (wstr);
int dlen = 0;
// find length
// parse the non-standard "rgba:rrrr/gggg/bbbb/aaaa" format
else if (strlen (name) != 4+5*4 || 4 != sscanf (name, "rgba:%4hx/%4hx/%4hx/%4hx%c", &c.r, &c.g, &c.b, &c.a, &eos))
{
- XColor xc, xc_exact;
+ XColor xc;
if (XParseColor (screen->dpy, screen->cmap, name, &xc))
{