[gcc/devel/modula-2] Replaced sprintf with calls to snprintf.

[gcc/devel/modula-2] Replaced sprintf with calls to snprintf.

[Gaius Mulley]

https://gcc.gnu.org/g:8685e718a254adeac4f73a683dc157194f5392f8

commit 8685e718a254adeac4f73a683dc157194f5392f8
Author: Gaius Mulley <gaius.mulley@southwales.ac.uk>
Date:   Wed Apr 20 12:22:35 2022 +0100

    Replaced sprintf with calls to snprintf.
    
    2022-04-20   Gaius Mulley   <gaius.mulley@southwales.ac.uk>
    
    gcc/m2/ChangeLog:
    
            * m2/tools-src/mklink.c (FindObject): Replace calls to sprintf
            with calls to snprintf.
    
    Signed-off-by: Gaius Mulley <gaius.mulley@southwales.ac.uk>

Diff:
---
 gcc/m2/tools-src/mklink.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/gcc/m2/tools-src/mklink.c b/gcc/m2/tools-src/mklink.c
index 4750a2c3e3e..42d66d86420 100644
--- a/gcc/m2/tools-src/mklink.c
+++ b/gcc/m2/tools-src/mklink.c
@@ -291,7 +291,7 @@ FindObject (char *Name)
   else
     strcpy (m2path, getenv ("M2PATH"));
 
-  sprintf (name, "%s.o", Name);
+  snprintf (name, sizeof (name), "%s.o", Name);
   p = 0;
   while (m2path[p] != (char)0)
     {
@@ -305,7 +305,7 @@ FindObject (char *Name)
       if (m2path[p] == ' ')
 	p++;
       m2search[s] = (char)0;
-      sprintf (exist, "%s/%s", m2search, name);
+      snprintf (exist, sizeof (exist), "%s/%s", m2search, name);
       if (IsExists (exist))
         {
           printf (" %s", exist);