Commit 4d928625 by Doug Rupp Committed by Eric Botcazou

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
parent 0487f06d
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> 2015-10-02 Eric Botcazou <ebotcazou@adacore.com>
* gcc-interface/trans.c (Pragma_to_gnu) <Pragma_Warnings>: Replace * gcc-interface/trans.c (Pragma_to_gnu) <Pragma_Warnings>: Replace
......
...@@ -36,12 +36,12 @@ ...@@ -36,12 +36,12 @@
%{nostdinc*} %{nostdlib*}\ %{nostdinc*} %{nostdlib*}\
-dumpbase %{.adb:%b.adb}%{.ads:%b.ads}%{!.adb:%{!.ads:%b.ada}}\ -dumpbase %{.adb:%b.adb}%{.ads:%b.ads}%{!.adb:%{!.ads:%b.ada}}\
%{c|S:%{o*:-auxbase-strip %*}%{!o*:-auxbase %b}}%{!c:%{!S:-auxbase %b}} \ %{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} " %{coverage:-fprofile-arcs -ftest-coverage} "
#if defined(TARGET_VXWORKS_RTP) #if defined(TARGET_VXWORKS_RTP)
"%{fRTS=rtp|fRTS=rtp-smp|fRTS=ravenscar-cert-rtp:-mrtp} " "%{fRTS=rtp|fRTS=rtp-smp|fRTS=ravenscar-cert-rtp:-mrtp} "
#endif #endif
"%{gnatea:-gnatez} %{g*&m*} " "%{gnatea:-gnatez} %{g*&m*&f*} "
"%1 %{!S:%{o*:%w%*-gnatO}} \ "%1 %{!S:%{o*:%w%*-gnatO}} \
%i %{S:%W{o*}%{!o*:-o %b.s}} \ %i %{S:%W{o*}%{!o*:-o %b.s}} \
%{gnatc*|gnats*: -o %j} %{-param*} \ %{gnatc*|gnats*: -o %j} %{-param*} \
...@@ -54,8 +54,8 @@ ...@@ -54,8 +54,8 @@
%{nostdinc*} %{nostdlib*}\ %{nostdinc*} %{nostdlib*}\
-dumpbase %{.adb:%b.adb}%{.ads:%b.ads}%{!.adb:%{!.ads:%b.ada}}\ -dumpbase %{.adb:%b.adb}%{.ads:%b.ads}%{!.adb:%{!.ads:%b.ada}}\
%{o*:-auxbase-strip %*}%{!o*:-auxbase %b} \ %{o*:-auxbase-strip %*}%{!o*:-auxbase %b} \
%{a} %{d*} %{f*} \ %{a} %{d*} \
%{gnatea:-gnatez} %{g*&m*} \ %{gnatea:-gnatez} %{g*&m*&f*} \
%1 %{o*:%w%*-gnatO} \ %1 %{o*:%w%*-gnatO} \
%i \ %i \
%{gnatc*|gnats*: -o %j} %{-param*} ", 0, 0, 0}, %{gnatc*|gnats*: -o %j} %{-param*} ", 0, 0, 0},
...@@ -67,8 +67,8 @@ ...@@ -67,8 +67,8 @@
%{nostdinc*} %{nostdlib*}\ %{nostdinc*} %{nostdlib*}\
-dumpbase %{.adb:%b.adb}%{.ads:%b.ads}%{!.adb:%{!.ads:%b.ada}}\ -dumpbase %{.adb:%b.adb}%{.ads:%b.ads}%{!.adb:%{!.ads:%b.ada}}\
%{o*:-auxbase-strip %*}%{!o*:-auxbase %b} \ %{o*:-auxbase-strip %*}%{!o*:-auxbase %b} \
%{a} %{d*} %{f*} \ %{a} %{d*} \
%{gnatea:-gnatez} %{g*&m*} \ %{gnatea:-gnatez} %{g*&m*&f*} \
%1 %{o*:%w%*-gnatO} \ %1 %{o*:%w%*-gnatO} \
%i \ %i \
%{gnatc*|gnats*: -o %j} %{-param*} ", 0, 0, 0}, %{gnatc*|gnats*: -o %j} %{-param*} ", 0, 0, 0},
; Options for the Ada front end. ; 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. ; This file is part of GCC.
; ;
...@@ -88,4 +88,8 @@ gnat ...@@ -88,4 +88,8 @@ gnat
Ada AdaWhy AdaSCIL Joined Ada AdaWhy AdaSCIL Joined
-gnat<options> Specify options to GNAT -gnat<options> Specify options to GNAT
fbuiltin-printf
Ada Undocumented
Ignored
; This comment is to ensure we retain the blank line above. ; This comment is to ensure we retain the blank line above.
...@@ -164,6 +164,11 @@ gnat_handle_option (size_t scode, const char *arg ATTRIBUTE_UNUSED, int value, ...@@ -164,6 +164,11 @@ gnat_handle_option (size_t scode, const char *arg ATTRIBUTE_UNUSED, int value,
/* This is handled by the middle-end. */ /* This is handled by the middle-end. */
break; break;
case OPT_fbuiltin_printf:
/* This is ignored in Ada but needs to be accepted so it can be
defaulted. */
break;
default: default:
gcc_unreachable (); gcc_unreachable ();
} }
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment