f95-lang.c (gfc_init_decl_processing): Initialize void_list_node.

	* f95-lang.c (gfc_init_decl_processing): Initialize
	void_list_node.

From-SVN: r105265

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index f12abc2971bc2c1e705aa78153ff04c48c0d47fc..9da5b9400ec1e2e00f47ca38868adc2f32d50293 100644 (file)
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,8 @@
+2005-10-11  Jakub Jelinek  <jakub@redhat.com>
+
+       * f95-lang.c (gfc_init_decl_processing): Initialize
+       void_list_node.
+
 2005-10-07  Erik Edelmann  <erik.edelmann@iki.fi>
 
         PR 18568

diff --git a/gcc/fortran/f95-lang.c b/gcc/fortran/f95-lang.c
index b28980b33617364b689d1c26bf6ecd00d81fc809..9056cd29ca498fa2008977ab522709e42ed134c9 100644 (file)
--- a/gcc/fortran/f95-lang.c
+++ b/gcc/fortran/f95-lang.c
@@ -568,6 +568,7 @@ gfc_init_decl_processing (void)
   build_common_tree_nodes (false, false);
   set_sizetype (long_unsigned_type_node);
   build_common_tree_nodes_2 (0);
+  void_list_node = build_tree_list (NULL_TREE, void_type_node);
 
   /* Set up F95 type nodes.  */
   gfc_init_kinds ();