Commit c19a32ad authored by Arnaud Blanchard's avatar Arnaud Blanchard
Browse files

Fix free dims if needed before relaocating new one

parent 52900043
......@@ -172,7 +172,6 @@ int blc_array::get_type_size(){
return -1;
}
int blc_array::sprint_dims(char *string, int string_size){
int i, width=0;
......@@ -185,7 +184,6 @@ int blc_array::sprint_dims(char *string, int string_size){
return width;
}
int blc_array::fprint_dims(FILE *file)const {
int i, width=0;
......@@ -197,7 +195,6 @@ int blc_array::fprint_dims(FILE *file)const {
return width;
}
void blc_array::fscan_dims(FILE *file){
blc_dim *dim;
int length;
......@@ -205,10 +202,8 @@ void blc_array::fscan_dims(FILE *file){
size=get_type_size();
FSCANF(1, file, "%d", &length);
dims=NULL;
dims_nb=0;
if (dims) FREE(dims);
dims_nb=0;
if (length != 0){
do{
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment