summaryrefslogtreecommitdiff
path: root/gcc/ada/par-prag.adb
diff options
context:
space:
mode:
authorRobert Dewar <dewar@adacore.com>2009-05-06 12:53:27 +0000
committerArnaud Charlet <charlet@gcc.gnu.org>2009-05-06 14:53:27 +0200
commit483c78cb8e390ab868a6e489d932460942d8c4d9 (patch)
tree492cd082cc6e4f7b5a7e18b91c76fcbe7eacbd77 /gcc/ada/par-prag.adb
parent4e7a4f6e8a2dd2e01783029b028dd935ca16b134 (diff)
downloadgcc-483c78cb8e390ab868a6e489d932460942d8c4d9.tar.gz
errout.adb: Minor reformatting
2009-05-06 Robert Dewar <dewar@adacore.com> * errout.adb: Minor reformatting * scng.adb, sem_prag.adb, par-ch4.adb, sem_res.adb, par-ch6.adb, sem_ch6.adb, par-prag.adb, sem_ch8.adb, sem_warn.adb, par-util.adb, styleg.adb: Add stylized comments to error messages that are included in the codefix circuitry of IDE's such as GPS. From-SVN: r147173
Diffstat (limited to 'gcc/ada/par-prag.adb')
-rw-r--r--gcc/ada/par-prag.adb4
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/par-prag.adb b/gcc/ada/par-prag.adb
index 7ca24703507..eb77f860b4f 100644
--- a/gcc/ada/par-prag.adb
+++ b/gcc/ada/par-prag.adb
@@ -6,7 +6,7 @@
-- --
-- B o d y --
-- --
--- Copyright (C) 1992-2008, Free Software Foundation, Inc. --
+-- Copyright (C) 1992-2009, 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- --
@@ -818,7 +818,7 @@ begin
and then Num_SRef_Pragmas (Current_Source_File) = 0
and then Operating_Mode /= Check_Syntax
then
- Error_Msg
+ Error_Msg -- CODEFIX
("first % pragma must be first line of file", Pragma_Sloc);
raise Error_Resync;
end if;