object allocStr(register const char *str) { register object newSym; newSym = allocByte(1 + strlen(str)); strcpy(charPtr(newSym), str); return (newSym); }
object MemoryManager::allocStr(register const char* str) { register object newSym; char* t; if(NULL != str) { newSym = allocByte(1 + strlen(str)); t = objectRef(newSym).charPtr(); strcpy(t, str); } else { newSym = allocByte(1); objectRef(newSym).charPtr()[0] = '\0'; } return(newSym); }