]> git.ipfire.org Git - thirdparty/gcc.git/commitdiff
PR modula2/114444 trunc float malformed error cause ICE
authorGaius Mulley <gaiusmod2@gmail.com>
Sat, 23 Mar 2024 16:04:23 +0000 (16:04 +0000)
committerGaius Mulley <gaiusmod2@gmail.com>
Sat, 23 Mar 2024 16:04:23 +0000 (16:04 +0000)
This patch corrects two error format specifiers.

gcc/m2/ChangeLog:

PR modula2/114444
* gm2-compiler/M2Quads.mod (BuildTruncFunction): Correct
error format specifier.
(BuildFloatFunction): Correct error format specifier.

Signed-off-by: Gaius Mulley <gaiusmod2@gmail.com>
gcc/m2/gm2-compiler/M2Quads.mod

index 52d72f6cd6284a85359e5a21083547d8f5c0e16a..891a76b4660e2869982c218364dfe14a4dba37bf 100644 (file)
@@ -9840,12 +9840,12 @@ BEGIN
                BuildConvertFunction
             ELSE
                MetaErrorT1 (functok,
-                            'argument to {%1E%ad} must be a float point type', Sym) ;
+                            'argument to {%1Ead} must be a float point type', Sym) ;
                PushTFtok (MakeConstLit (functok, MakeKey('0'), Type), Type, functok)
             END
          ELSE
             MetaErrorT2 (vartok,
-                         'argument to {%1E%ad} must be a variable or constant, seen {%2ad}',
+                         'argument to {%1Ead} must be a variable or constant, seen {%2ad}',
                          Sym, Var) ;
             PushTFtok (MakeConstLit (functok, MakeKey('0'), Type), Type, functok)
          END
@@ -9924,7 +9924,7 @@ BEGIN
             BuildConvertFunction
          ELSE
             MetaErrorT1 (vartok,
-                         'argument to {%1E%ad} must be a variable or constant', ProcSym) ;
+                         'argument to {%1Ead} must be a variable or constant', ProcSym) ;
             PushTFtok (MakeConstLit (functok, MakeKey('0.0'), Type), Type, functok)
          END
       ELSE