diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index 3c3cb153688..b3b0c90cfe6 100644
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,3 +1,7 @@
+2004-02-06  Alan Modra  <amodra@bigpond.net.au>
+
+	* misc.c (default_pass_by_ref): Update INIT_CUMULATIVE_ARGS call.
+
 2004-02-05  Kazu Hirata  <kazu@cs.umass.edu>
 
 	* ada/utils.c (create_param_decl): Replace PROMOTE_PROTOTYPES
diff --git a/gcc/ada/misc.c b/gcc/ada/misc.c
index 7554a127e5e..7e544fb1fda 100644
--- a/gcc/ada/misc.c
+++ b/gcc/ada/misc.c
@@ -864,7 +864,7 @@ default_pass_by_ref (tree gnu_type)
 {
   CUMULATIVE_ARGS cum;
 
-  INIT_CUMULATIVE_ARGS (cum, NULL_TREE, NULL_RTX, 0);
+  INIT_CUMULATIVE_ARGS (cum, NULL_TREE, NULL_RTX, 0, 2);
 
   /* We pass aggregates by reference if they are sufficiently large.  The
      choice of constant here is somewhat arbitrary.  We also pass by