--- stack/symbols.c 2003/08/04 14:13:16 1.2 +++ stack/symbols.c 2003/08/04 14:32:27 1.3 @@ -1,4 +1,3 @@ -#include #include "stack.h" /* Print newline. */ @@ -294,7 +293,7 @@ } /* long names are a pain */ - sym= CAR(env->head)->content.ptr; + sym= CAR(env->head)->content.sym; /* Bind the symbol to the value */ sym->val= CAR(CDR(env->head)); @@ -360,11 +359,11 @@ protect(a_val); protect(b_val); toss(env); if(env->err) return; toss(env); if(env->err) return; - len= strlen(a_val->content.ptr)+strlen(b_val->content.ptr)+1; + len= strlen(a_val->content.string)+strlen(b_val->content.string)+1; new_string= malloc(len); assert(new_string != NULL); - strcpy(new_string, b_val->content.ptr); - strcat(new_string, a_val->content.ptr); + strcpy(new_string, b_val->content.string); + strcat(new_string, a_val->content.string); push_cstring(env, new_string); unprotect(a_val); unprotect(b_val); free(new_string);