summaryrefslogtreecommitdiff
path: root/gcc/ada/exp_code.adb
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/exp_code.adb')
-rw-r--r--gcc/ada/exp_code.adb8
1 files changed, 4 insertions, 4 deletions
diff --git a/gcc/ada/exp_code.adb b/gcc/ada/exp_code.adb
index 421fa5d05c1..775a937dd81 100644
--- a/gcc/ada/exp_code.adb
+++ b/gcc/ada/exp_code.adb
@@ -6,7 +6,7 @@
-- --
-- B o d y --
-- --
--- Copyright (C) 1996-2001 Free Software Foundation, Inc. --
+-- Copyright (C) 1996-2003 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- --
@@ -170,7 +170,7 @@ package body Exp_Code is
return Get_String_Node (Temp);
else
- Error_Msg_N ("asm template argument is not static", Temp);
+ Flag_Non_Static_Expr ("asm template argument is not static!", Temp);
return Empty;
end if;
end Asm_Template;
@@ -242,7 +242,7 @@ package body Exp_Code is
begin
if not Is_OK_Static_Expression (Clob) then
- Error_Msg_N ("asm clobber argument is not static", Clob);
+ Flag_Non_Static_Expr ("asm clobber argument is not static!", Clob);
Clobber_Node := Empty;
else
@@ -399,7 +399,7 @@ package body Exp_Code is
begin
if not Is_OK_Static_Expression (Vol) then
- Error_Msg_N ("asm volatile argument is not static", Vol);
+ Flag_Non_Static_Expr ("asm volatile argument is not static!", Vol);
return False;
else