diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index b213781c44b7af841395e9cfba77cf89e091180f..c69f3cab44a145a1faadbff3e83f7dc1ae3f6d79 100644
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,3 +1,7 @@
+2004-01-07  Rainer Orth  <ro@TechFak.Uni-Bielefeld.DE>
+
+	* link.c [sgi] (shared_libgnat_default): Change to STATIC.
+
 2004-01-05  Kelley Cook  <kcook@gcc.gnu.org>
 
 	* Make-lang.in: Revert stamp-xgnatug change from 2003-12-18. 
diff --git a/gcc/ada/link.c b/gcc/ada/link.c
index c31db939cf0316fb104a2bfb0d34526e9e2e7aa2..c9d4d803fb622e70506838a55356cfb8bebee899 100644
--- a/gcc/ada/link.c
+++ b/gcc/ada/link.c
@@ -6,7 +6,7 @@
  *                                                                          *
  *                          C Implementation File                           *
  *                                                                          *
- *          Copyright (C) 1992-2003, Free Software Foundation, Inc.         *
+ *          Copyright (C) 1992-2004, Free Software Foundation, Inc.         *
  *                                                                          *
  * GNAT is free software;  you can  redistribute it  and/or modify it under *
  * terms of the  GNU General Public License as published  by the Free Soft- *
@@ -96,7 +96,7 @@ const char *object_file_option = "-Wl,-objectlist,";
 const char *run_path_option = "-Wl,-rpath,";
 int link_max = 5000;
 unsigned char objlist_file_supported = 1;
-char shared_libgnat_default = SHARED;
+char shared_libgnat_default = STATIC;
 unsigned char using_gnu_linker = 0;
 const char *object_library_extension = ".a";