OSDN Git Service
(root)
/
pf3gnuchains
/
gcc-fork.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
* libgfortran.h (GFC_ARRAY_DESCRIPTOR): Replace 'type *base' by
[pf3gnuchains/gcc-fork.git]
/
libgfortran
/
generated
/
reshape_i4.c
diff --git
a/libgfortran/generated/reshape_i4.c
b/libgfortran/generated/reshape_i4.c
index
465ca24
..
99e3db4
100644
(file)
--- a/
libgfortran/generated/reshape_i4.c
+++ b/
libgfortran/generated/reshape_i4.c
@@
-97,7
+97,7
@@
reshape_4 (gfc_array_i4 * ret, gfc_array_i4 * source, shape_type * shape,
ret->dim[n].stride = rs;
rs *= rex;
}
- ret->
base
= 0;
+ ret->
offset
= 0;
ret->data = internal_malloc_size ( rs * sizeof (GFC_INTEGER_4));
ret->dtype = (source->dtype & ~GFC_DTYPE_RANK_MASK) | rdim;
}