char * narrowen(wchar_t *ws) { char *s; int n; n = widebytes(ws); s = smalloc(n); runes16toutf(s, ws, n); return s; }
uchar* clipreadunicode(HANDLE h) { Rune16 *p; int n; uchar *q; p = GlobalLock(h); n = rune16nlen(p, runes16len(p)+1); q = malloc(n); runes16toutf(q, p, n); GlobalUnlock(h); return q; }