OSDN Git Service

2005-12-02 Richard Guenther <rguenther@suse.de>
authorrguenth <rguenth@138bc75d-0d04-0410-961f-82ee72b054a4>
Fri, 2 Dec 2005 21:00:01 +0000 (21:00 +0000)
committerrguenth <rguenth@138bc75d-0d04-0410-961f-82ee72b054a4>
Fri, 2 Dec 2005 21:00:01 +0000 (21:00 +0000)
        * trans.h (build1_v): Use build1, not build to build the
        void typed tree.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@107917 138bc75d-0d04-0410-961f-82ee72b054a4

gcc/fortran/ChangeLog
gcc/fortran/trans.h

index ceec7b7..f599bd6 100644 (file)
@@ -1,3 +1,8 @@
+2005-12-02  Richard Guenther  <rguenther@suse.de>
+
+       * trans.h (build1_v): Use build1, not build to build the
+       void typed tree.
+
 2005-12-01  Erik Schnetter  <schnetter@aei.mpg.de>
 
        * decl.c (gfc_match_old_kind_spec):  Improve handling of old style
index 02fc275..e2c9f27 100644 (file)
@@ -576,7 +576,7 @@ struct lang_decl            GTY(())
 #define gfc_todo_error(args...) fatal_error("gfc_todo: Not Implemented: " args)
 
 /* Build an expression with void type.  */
-#define build1_v(code, arg) build(code, void_type_node, arg)
+#define build1_v(code, arg) build1(code, void_type_node, arg)
 #define build2_v(code, arg1, arg2) build2(code, void_type_node, \
                                           arg1, arg2)
 #define build3_v(code, arg1, arg2, arg3) build3(code, void_type_node, \