summaryrefslogtreecommitdiff
path: root/libgfortran/generated/transpose_i4.c
diff options
context:
space:
mode:
authoraj <aj@138bc75d-0d04-0410-961f-82ee72b054a4>2005-05-15 12:44:42 +0000
committeraj <aj@138bc75d-0d04-0410-961f-82ee72b054a4>2005-05-15 12:44:42 +0000
commitdddf441266d472f3ae3d14756ff5cfa332d467ae (patch)
treee3b173833fe5a555288b7444d9e410c39d71b283 /libgfortran/generated/transpose_i4.c
parent9ecc9c35b2c7f4320e7c0aa6acb39ba9fbd96329 (diff)
downloadgcc-dddf441266d472f3ae3d14756ff5cfa332d467ae.tar.gz
* runtime/normalize.c (almostone_r4, almostone_r8): Fix parameter
list. * intrinsics/random.c (KISS_DEFAULT_SEED): Remove extra semicolon. * io/transfer.c: Do not use empty initializers for global objects. Add missing initializers. * io/lock.c: Do not use empty initializers for global objects. * io/close.c: Add missing initializers. * runtime/environ.c: Add missing initializers. Do not use empty initializers for global object. (init_string): Mark argument as unused. * runtime/main.c (cleanup): Fix parameter list. * io/io.h: Fix parameter lists. * m4/transpose.m4, m4/matmul.m4: Fix pointer cast to avoid warning. * generated/transpose_c4.c, generated/transpose_c8.c, generated/transpose_i4.c, generated/transpose_i8.c, generated/matmul_c4.c, generated/matmul_c8.c, generated/matmul_i4.c, generated/matmul_i8.c, generated/matmul_r4.c, generated/matmul_r8.c: Regenerated. * io/write.c (nml_write_obj): Fix 64-bit problem. * io/list_read.c (nml_get_obj_data): Add missing braces around initializer to avoid warnings. * intrinsics/etime.c (etime_sub): Remove unused variable. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@99719 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'libgfortran/generated/transpose_i4.c')
-rw-r--r--libgfortran/generated/transpose_i4.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libgfortran/generated/transpose_i4.c b/libgfortran/generated/transpose_i4.c
index 0945d065126..af5041e19b5 100644
--- a/libgfortran/generated/transpose_i4.c
+++ b/libgfortran/generated/transpose_i4.c
@@ -63,7 +63,7 @@ transpose_i4 (gfc_array_i4 * ret, gfc_array_i4 * source)
ret->dim[1].ubound = source->dim[0].ubound - source->dim[0].lbound;
ret->dim[1].stride = ret->dim[0].ubound+1;
- ret->data = internal_malloc_size (sizeof (GFC_INTEGER_4) * size0 (ret));
+ ret->data = internal_malloc_size (sizeof (GFC_INTEGER_4) * size0 ((array_t *) ret));
ret->base = 0;
}