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
2007-01-08 Richard Guenther <rguenther@suse.de>
[pf3gnuchains/gcc-fork.git]
/
gcc
/
fortran
/
trans-io.c
diff --git
a/gcc/fortran/trans-io.c
b/gcc/fortran/trans-io.c
index
b24a2f2
..
654c0fa
100644
(file)
--- a/
gcc/fortran/trans-io.c
+++ b/
gcc/fortran/trans-io.c
@@
-1779,7
+1779,7
@@
transfer_array_desc (gfc_se * se, gfc_typespec * ts, tree addr_expr)
if (ts->type == BT_CHARACTER)
charlen_arg = se->string_length;
else
- charlen_arg = build_int_cst
u
(NULL_TREE, 0);
+ charlen_arg = build_int_cst (NULL_TREE, 0);
kind_arg = build_int_cst (NULL_TREE, ts->kind);