19 if(sp->fixed == 0 && sp->base != nil)
24 /* get another reference to a string */
35 /* allocate a String head */
41 s = mallocz(sizeof *s, 1);
49 /* create a new `short' String */
57 sysfatal("s_newalloc: %r");
58 setmalloctag(sp, getcallerpc(&len));
61 sp->base = sp->ptr = malloc(len);
63 sysfatal("s_newalloc: %r");
64 setmalloctag(sp->base, getcallerpc(&len));
66 sp->end = sp->base + len;
71 /* create a new `short' String */
79 sysfatal("s_new: %r");
80 sp->base = sp->ptr = malloc(STRLEN);
82 sysfatal("s_new: %r");
83 sp->end = sp->base + STRLEN;