fixed memory leak and cleaned up style

This commit is contained in:
Amadeo Bellotti 2022-09-29 16:47:26 -04:00
parent c72a5dfc97
commit f949bceea9

View File

@ -993,23 +993,25 @@ _cw_intr_win(c3_c* han_c)
} }
#endif #endif
c3_c /* _cw_eval_get_input(): Read input from file and return a concatenated string
*_cw_eval_get_input(FILE* fp, size_t size) */
c3_c*
_cw_eval_get_input(FILE* fp, size_t size)
{ {
//The size is extended by the input with the value of the provisional
c3_c *str; c3_c *str;
c3_i ch; c3_i ch;
size_t len = 0; size_t len = 0;
str = realloc(NULL, sizeof(*str)*size);//size is start size str = c3_realloc(NULL, size);//size is start size
if(!str) if( !str )
return str; return str;
while(EOF!=(ch=fgetc(fp))){ while( EOF != (ch=fgetc(fp)) ){
str[len++]=ch; str[len++]=ch;
if(len==size){ if( len == size ){
str = realloc(str, sizeof(*str)*(size+=16)); size +=16;
str = realloc(str, (size));
if(!str) if(!str)
return str; return str;
} }
@ -1017,7 +1019,7 @@ c3_c
str[len++]='\0'; str[len++]='\0';
return realloc(str, sizeof(*str)*len); return c3_realloc(str,len);
} }
@ -1069,6 +1071,7 @@ _cw_eval_commence(c3_i argc, c3_c* argv[])
} }
u3z(res); u3z(res);
u3z(gat); u3z(gat);
free(evl_c);
} }
/* _cw_serf_commence(): initialize and run serf /* _cw_serf_commence(): initialize and run serf