common/sh/name.c

1360 	register union Value *up;
1397 	up= &np->nvalue;
1400 		if(!np->nvalue.up || !nv_isarray(np))
1402 			up = &u;
1403 			up->up = &np->nvalue;
1406 	else if(np->nvalue.up && nv_isarray(np) && nv_arrayptr(np))
1407 		up = np->nvalue.up;
1408 	if(up && up->cp==Empty)
1409 		up->cp = 0;
1430 				if(!up->ldp)
1431 					up->ldp = new_of(Sfdouble_t,0);
1433 					old = *(up->ldp);
1434 				*(up->ldp) = old?ld+old:ld;
1450 				if(!up->dp)
1451 					up->dp = new_of(double,0);
1453 					od = *(up->dp);
1454 				*(up->dp) = od?d+od:d;
1494 				if(!up->llp)
1495 					up->llp = new_of(Sflong_t,0);
1497 					oll = *(up->llp);
1498 				*(up->llp) = ll+oll;
1549 						s = *up->sp;
1550 					*(up->sp) = s+(int16_t)l;
1555 					if(!up->lp)
1556 						up->lp = new_of(int32_t,0);
1558 						ol =  *(up->lp);
1559 					*(up->lp) = l+ol;
1625 		if(!up->cp)
1630 			stakputs(up->cp);
1638 			tofree = up->cp;
1658 					up->cp = sp;
1669 					memcpy((void*)cp,(void*)up->cp,oldsize);
1670 				up->cp = cp;
1689 			if(size==0 || tofree || !(cp=(char*)up->cp))
1699 		up->cp = cp;
2186 	register union Value *up;
2256 		up = np->nvalue.up;
2258 		up = &np->nvalue;
2259 	if(up && up->cp)
2261 		if(up->cp!=Empty && !nv_isattr(np, NV_NOFREE))
2262 			free((void*)up->cp);
2263 		up->cp = 0;
2448 	register union Value *up= &np->nvalue;
2476 		if(!up->cp)
2485 				ld = *up->ldp;
2496 				d = *up->dp;
2510 				ll = *(Sfulong_t*)up->llp;
2514 					ll = *(uint16_t*)(up->sp);
2516 					ll = (uint16_t)up->s;
2519 				ll = *(uint32_t*)(up->lp);
2522 			ll = *up->llp;
2526 				ll = *up->sp;
2528 				ll = up->s;
2531 			ll = *(up->lp);
2549 	if(up->cp && nv_isattr(np,NV_BINARY) && !nv_isattr(np,NV_RAW))
2554 		base64encode(up->cp, size, (void**)0, cp=getbuf(insize), insize, (void**)&ep);
2559 	if((numeric=nv_size(np)) && up->cp && up->cp[numeric])
2562 		memcpy(cp,up->cp,numeric);
2566 	return ((char*)up->cp);
2571 	register union Value *up;
2598 		up= &np->nvalue;
2599 		if(!up->lp || up->cp==Empty)
2604 	                       	r = *up->ldp;
2606        	                	r = *up->dp;
2611 				r = (Sflong_t)*((Sfulong_t*)up->llp);
2615 					r = (Sflong_t)(*(uint16_t*)up->sp);
2617 					r = (Sflong_t)((uint16_t)up->s);
2620 				r = *((uint32_t*)up->lp);
2625 				r = *up->llp;
2629 					r = *up->sp;
2631 					r = up->s;
2634 				r = *up->lp;