rem: free(tmp);
add: wfree(tmp);
context: get_string(FILE *f){    int c;    int ptr = 0;        while (1) {	c = get_char(f);	if (ISSTRINGABLE(c)) {	    CHECK_BUFFER_SIZE(ptr);	    buffer[ptr++] = c;	} else {	    if (c!=EOF) {		ungetc(c, f);	    }	    break;	}    }    buffer[ptr] = 0;    if (ptr==0)	return NULL;    else {	char *tmp = unescapestr(buffer);	proplist_t pl = PLMakeString(tmp);	free(tmp);	return pl;    }}