Patchwork [Ada] gnatbind -R generates files

login
register
mail settings
Submitter Arnaud Charlet
Date June 22, 2010, 10:16 a.m.
Message ID <20100622101607.GA14853@adacore.com>
Download mbox | patch
Permalink /patch/56450/
State New
Headers show

Comments

Arnaud Charlet - June 22, 2010, 10:16 a.m.
Using gnatbind switch -R no longer prevents the generation of the
binger generated files.

Tested on x86_64-pc-linux-gnu, committed on trunk

2010-06-22  Vincent Celier  <celier@adacore.com>

	* bindusg.adb (Display): Update line for -R
	* switch-b.adb (Scan_Binder_Switches): Allow generation of the binder
	generated files when -R is used.

Patch

Index: bindusg.adb
===================================================================
--- bindusg.adb	(revision 161153)
+++ bindusg.adb	(working copy)
@@ -181,7 +181,7 @@ 
       --  Line for -R switch
 
       Write_Line
-        ("  -R        List sources referenced in closure (implies -c)");
+        ("  -R        List sources referenced in closure");
 
       --  Line for -s switch
 
Index: switch-b.adb
===================================================================
--- switch-b.adb	(revision 161157)
+++ switch-b.adb	(working copy)
@@ -366,7 +366,6 @@ 
 
          when 'R' =>
             Ptr := Ptr + 1;
-            Check_Only   := True;
             List_Closure := True;
 
          --  Processing for s switch