f95-lang.c (build_builtin_fntypes): Use correct return types, as indicated by comments.
2005-12-09 Richard Guenther <rguenther@suse.de> * f95-lang.c (build_builtin_fntypes): Use correct return types, as indicated by comments. From-SVN: r108277
This commit is contained in:
parent
2cf2d928fc
commit
fb2d50f586
2 changed files with 7 additions and 2 deletions
|
@ -1,3 +1,8 @@
|
|||
2005-12-09 Richard Guenther <rguenther@suse.de>
|
||||
|
||||
* f95-lang.c (build_builtin_fntypes): Use correct
|
||||
return types, as indicated by comments.
|
||||
|
||||
2005-12-08 Erik Edelmann <eedelman@gcc.gnu.org>
|
||||
|
||||
PR fortran/25292
|
||||
|
|
|
@ -772,10 +772,10 @@ build_builtin_fntypes (tree * fntype, tree type)
|
|||
tree tmp;
|
||||
|
||||
/* type (*) (type) */
|
||||
tmp = tree_cons (NULL_TREE, float_type_node, void_list_node);
|
||||
tmp = tree_cons (NULL_TREE, type, void_list_node);
|
||||
fntype[0] = build_function_type (type, tmp);
|
||||
/* type (*) (type, type) */
|
||||
tmp = tree_cons (NULL_TREE, float_type_node, tmp);
|
||||
tmp = tree_cons (NULL_TREE, type, tmp);
|
||||
fntype[1] = build_function_type (type, tmp);
|
||||
/* type (*) (int, type) */
|
||||
tmp = tree_cons (NULL_TREE, integer_type_node, void_list_node);
|
||||
|
|
Loading…
Add table
Reference in a new issue