diff options
author | Doug Rupp <rupp@adacore.com> | 2015-10-02 09:45:45 +0000 |
---|---|---|
committer | Eric Botcazou <ebotcazou@gcc.gnu.org> | 2015-10-02 09:45:45 +0000 |
commit | 4d928625a4c1aa66735912c5bad4305a2dd76f0a (patch) | |
tree | 832b7a35361698546835e6889204f8431421a6eb | |
parent | 0487f06dd1af44e98502702eb6f9020dc30c033a (diff) | |
download | gcc-4d928625a4c1aa66735912c5bad4305a2dd76f0a.zip gcc-4d928625a4c1aa66735912c5bad4305a2dd76f0a.tar.gz gcc-4d928625a4c1aa66735912c5bad4305a2dd76f0a.tar.bz2 |
lang.opt (fbuiltin-printf): Accept.
* gcc-interface/lang.opt (fbuiltin-printf): Accept.
* gcc-interface/misc.c (gnat_handle_option): Ignore it.
* gcc-interface/lang-specs.h (@ada, @adawhy, @adascil): Propagate -f*
flags as -g* and -m* flags past -gnatez.
Co-Authored-By: Olivier Hainque <hainque@adacore.com>
From-SVN: r228381
-rw-r--r-- | gcc/ada/ChangeLog | 8 | ||||
-rw-r--r-- | gcc/ada/gcc-interface/lang-specs.h | 12 | ||||
-rw-r--r-- | gcc/ada/gcc-interface/lang.opt | 6 | ||||
-rw-r--r-- | gcc/ada/gcc-interface/misc.c | 5 |
4 files changed, 24 insertions, 7 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index a4b159d..6703686 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,11 @@ +2015-10-02 Doug Rupp <rupp@adacore.com> + Olivier Hainque <hainque@adacore.com> + + * gcc-interface/lang.opt (fbuiltin-printf): Accept. + * gcc-interface/misc.c (gnat_handle_option): Ignore it. + * gcc-interface/lang-specs.h (@ada, @adawhy, @adascil): Propagate -f* + flags as -g* and -m* flags past -gnatez. + 2015-10-02 Eric Botcazou <ebotcazou@adacore.com> * gcc-interface/trans.c (Pragma_to_gnu) <Pragma_Warnings>: Replace diff --git a/gcc/ada/gcc-interface/lang-specs.h b/gcc/ada/gcc-interface/lang-specs.h index 5091fbb..eece809 100644 --- a/gcc/ada/gcc-interface/lang-specs.h +++ b/gcc/ada/gcc-interface/lang-specs.h @@ -36,12 +36,12 @@ %{nostdinc*} %{nostdlib*}\ -dumpbase %{.adb:%b.adb}%{.ads:%b.ads}%{!.adb:%{!.ads:%b.ada}}\ %{c|S:%{o*:-auxbase-strip %*}%{!o*:-auxbase %b}}%{!c:%{!S:-auxbase %b}} \ - %{O*} %{W*} %{w} %{p} %{pg:-p} %{d*} %{f*}\ + %{O*} %{W*} %{w} %{p} %{pg:-p} %{d*} \ %{coverage:-fprofile-arcs -ftest-coverage} " #if defined(TARGET_VXWORKS_RTP) "%{fRTS=rtp|fRTS=rtp-smp|fRTS=ravenscar-cert-rtp:-mrtp} " #endif - "%{gnatea:-gnatez} %{g*&m*} " + "%{gnatea:-gnatez} %{g*&m*&f*} " "%1 %{!S:%{o*:%w%*-gnatO}} \ %i %{S:%W{o*}%{!o*:-o %b.s}} \ %{gnatc*|gnats*: -o %j} %{-param*} \ @@ -54,8 +54,8 @@ %{nostdinc*} %{nostdlib*}\ -dumpbase %{.adb:%b.adb}%{.ads:%b.ads}%{!.adb:%{!.ads:%b.ada}}\ %{o*:-auxbase-strip %*}%{!o*:-auxbase %b} \ - %{a} %{d*} %{f*} \ - %{gnatea:-gnatez} %{g*&m*} \ + %{a} %{d*} \ + %{gnatea:-gnatez} %{g*&m*&f*} \ %1 %{o*:%w%*-gnatO} \ %i \ %{gnatc*|gnats*: -o %j} %{-param*} ", 0, 0, 0}, @@ -67,8 +67,8 @@ %{nostdinc*} %{nostdlib*}\ -dumpbase %{.adb:%b.adb}%{.ads:%b.ads}%{!.adb:%{!.ads:%b.ada}}\ %{o*:-auxbase-strip %*}%{!o*:-auxbase %b} \ - %{a} %{d*} %{f*} \ - %{gnatea:-gnatez} %{g*&m*} \ + %{a} %{d*} \ + %{gnatea:-gnatez} %{g*&m*&f*} \ %1 %{o*:%w%*-gnatO} \ %i \ %{gnatc*|gnats*: -o %j} %{-param*} ", 0, 0, 0}, diff --git a/gcc/ada/gcc-interface/lang.opt b/gcc/ada/gcc-interface/lang.opt index 004388b..6c260c0 100644 --- a/gcc/ada/gcc-interface/lang.opt +++ b/gcc/ada/gcc-interface/lang.opt @@ -1,5 +1,5 @@ ; Options for the Ada front end. -; Copyright (C) 2003-2013 Free Software Foundation, Inc. +; Copyright (C) 2003-2015 Free Software Foundation, Inc. ; ; This file is part of GCC. ; @@ -88,4 +88,8 @@ gnat Ada AdaWhy AdaSCIL Joined -gnat<options> Specify options to GNAT +fbuiltin-printf +Ada Undocumented +Ignored + ; This comment is to ensure we retain the blank line above. diff --git a/gcc/ada/gcc-interface/misc.c b/gcc/ada/gcc-interface/misc.c index da91c6f..1282342 100644 --- a/gcc/ada/gcc-interface/misc.c +++ b/gcc/ada/gcc-interface/misc.c @@ -164,6 +164,11 @@ gnat_handle_option (size_t scode, const char *arg ATTRIBUTE_UNUSED, int value, /* This is handled by the middle-end. */ break; + case OPT_fbuiltin_printf: + /* This is ignored in Ada but needs to be accepted so it can be + defaulted. */ + break; + default: gcc_unreachable (); } |