char *AddVariable(char *bp, Value **ptr)
AddVariable(const char *bp, Value **ptr)
char *AddVariable(char *bp, Value **ptr){    char vname[512];    Variable *current;    int size;    bp = readChars(bp,vname,sizeof(vname));    for (current = varHead; current; current = current->next) {	if (PL_strcasecmp(current->vname,vname) == 0) {	        argFree(*ptr);		*ptr = current->value;		return bp;	}    }    current = (Variable *)malloc(sizeof(Variable));    size = strlen(vname);    current->vname = (char *)malloc(size+1);    strcpy(current->vname,vname);    current->value = *ptr;    (*ptr)->reference++;    current->next = varHead;    varHead = current;    return bp;}