aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/gnatfind.adb
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/gnatfind.adb')
-rw-r--r--gcc/ada/gnatfind.adb8
1 files changed, 5 insertions, 3 deletions
diff --git a/gcc/ada/gnatfind.adb b/gcc/ada/gnatfind.adb
index 44abac5..980f31f 100644
--- a/gcc/ada/gnatfind.adb
+++ b/gcc/ada/gnatfind.adb
@@ -36,9 +36,10 @@ with Ada.Strings.Fixed; use Ada.Strings.Fixed;
with Ada.Text_IO; use Ada.Text_IO;
with GNAT.Command_Line; use GNAT.Command_Line;
with GNAT.Strings; use GNAT.Strings;
----------------
--- Gnatfind --
----------------
+
+--------------
+-- Gnatfind --
+--------------
procedure Gnatfind is
Output_Ref : Boolean := False;
@@ -208,6 +209,7 @@ procedure Gnatfind is
end if;
-- Next arguments are the files to search
+
else
Add_Xref_File (S);
Wide_Search := False;