diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 82bf5c14533..79e84bc4180 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,7 @@
+2020-12-10  Kevin Buettner  <kevinb@redhat.com>
+
+	* ada-lang.c (ada_fold_name): Fix off-by-one error.
+
 2020-12-10  Luis Machado  <luis.machado@linaro.org>
 
 	* breakpoint.c (should_be_inserted): Don't output newline.
diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c
index 3351b95fce1..39546de41bf 100644
--- a/gdb/ada-lang.c
+++ b/gdb/ada-lang.c
@@ -984,8 +984,9 @@ ada_fold_name (gdb::string_view name)
     {
       int i;
 
-      for (i = 0; i <= len; i += 1)
+      for (i = 0; i < len; i += 1)
 	fold_buffer[i] = tolower (name[i]);
+      fold_buffer[i] = '\0';
     }
 
   return fold_buffer;