static A jtmakename(J jt,C*s){A z;I m;NM*zv; m=strlen(s); GATV(z,NAME,m,1,0); zv=NAV(z); // Use GATV because GA doesn't support NAME type MC(zv->s,s,m); *(m+zv->s)=0; zv->m =(UC)m; zv->bucket=zv->bucketx=0; zv->flag=NMDOT; zv->hash=NMHASH(m,s); ACX(z); R z; }
static A jtmakename(J jt,C*s){A z;I m;NM*zv; m=strlen(s); GA(z,NAME,m,1,0); zv=NAV(z); memcpy(zv->s,s,m); *(m+zv->s)=0; zv->m =(UC)m; zv->sn =0; zv->e =0; zv->flag=NMDOT; zv->hash=NMHASH(m,s); ACX(z); R z; }