[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [PATCH 2/3][GCC] GNAT/testsuite: Pass the `ada' option to target com

From: Jacob Bachmeyer
Subject: Re: [PATCH 2/3][GCC] GNAT/testsuite: Pass the `ada' option to target compilation
Date: Wed, 15 May 2019 18:12:31 -0500
User-agent: Mozilla/5.0 (X11; U; Linux x86_64; en-US; rv: Gecko/20090807 MultiZilla/ SeaMonkey/1.1.17 Mnenhy/

Maciej W. Rozycki wrote:
 gcc/testsuite/lib/gnat.exp |    2 ++
 1 file changed, 2 insertions(+)

Index: gcc/gcc/testsuite/lib/gnat.exp
--- gcc.orig/gcc/testsuite/lib/gnat.exp
+++ gcc/gcc/testsuite/lib/gnat.exp
@@ -167,6 +167,8 @@ proc gnat_target_compile { source dest t
        set options [concat "additional_flags=$TOOL_OPTIONS" $options]
+ set options [concat "{ada}" $options]
     return [target_compile $source $dest $type $options]
Your Tcl syntax looks suspicious to me. Is there a reason for "ada" to be in both double quotes and braces?

Perhaps {lappend options ada} might be simpler? Is placing ada at the beginning of the list important?

-- Jacob

reply via email to

[Prev in Thread] Current Thread [Next in Thread]