diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index f64a7e523172..da7b9a24b670 100644
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,8 @@
+2003-11-23  Waldek Hebisch <hebisch@math.uni.wroc.pl>
+
+	* function.c: Make outer_function-chain external.
+	* function.h: Likewise.
+
 2003-11-24  Richard Sandiford  <rsandifo@redhat.com>
 
 	* config.gcc (mips-sgi-irix6*): Add t-iris6gld to tmake_file when
diff --git a/gcc/function.c b/gcc/function.c
index 7bd31906a54b..d37f6562e49d 100644
--- a/gcc/function.c
+++ b/gcc/function.c
@@ -295,7 +295,7 @@ static tree split_complex_args (tree);
 static void set_insn_locators (rtx, int) ATTRIBUTE_UNUSED;
 
 /* Pointer to chain of `struct function' for containing functions.  */
-static GTY(()) struct function *outer_function_chain;
+struct function *outer_function_chain;
 
 /* List of insns that were postponed by purge_addressof_1.  */
 static rtx postponed_insns;
diff --git a/gcc/function.h b/gcc/function.h
index 9c06d95a0958..3aad05a4eeab 100644
--- a/gcc/function.h
+++ b/gcc/function.h
@@ -519,6 +519,9 @@ struct function GTY(())
 /* The function currently being compiled.  */
 extern GTY(()) struct function *cfun;
 
+/* Pointer to chain of `struct function' for containing functions.  */
+extern GTY(()) struct function *outer_function_chain;
+
 /* Nonzero if we've already converted virtual regs to hard regs.  */
 extern int virtuals_instantiated;