diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index 169c7bf2220..e5d0586de54 100644
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,3 +1,7 @@
+2002-11-18  Nathanael Nerode  <neroden@gcc.gnu.org>
+	* adaint.c (__gnat_tmp_name): Better, but good enough for now,
+	solution to buffer overflow bug on GNU/Linux.	
+
 2002-11-14  Nathanael Nerode  <neroden@gcc.gnu.org>
 	Closes PR ada/5856 and PR ada/6919 !
 	* bindgen.adb: Remove all references to Public_Version.
diff --git a/gcc/ada/adaint.c b/gcc/ada/adaint.c
index 98db5a191f9..874f0916d21 100644
--- a/gcc/ada/adaint.c
+++ b/gcc/ada/adaint.c
@@ -709,7 +709,7 @@ __gnat_tmp_name (tmp_filename)
   if (tmpdir == NULL)
     strcpy (tmp_filename, "/tmp/gnat-XXXXXX");
   else
-    sprintf (tmp_filename, "%200s/gnat-XXXXXX", tmpdir);
+    sprintf (tmp_filename, "%.200s/gnat-XXXXXX", tmpdir);
 
   close (mkstemp(tmp_filename));
 #else