[multiple changes]
[gcc.git] / gcc / ada / opt.ads
index 9fea924caecf56b6925fc39f70c11cc3abcb275d..90babc28861ca170de703041d30b7e9cb40ea4cf 100644 (file)
@@ -638,6 +638,11 @@ package Opt is
    --  Set to True when either Compile_Only, Bind_Only or Link_Only is
    --  set to True.
 
+   Main_Index : Int := 0;
+   --  GNATMAKE
+   --  This is set to non-zero by gnatmake switch -eInnn to indicate that
+   --  the main program is the nnn unit in a multi-unit source file.
+
    Mapping_File_Name : String_Ptr := null;
    --  GNAT
    --  File name of mapping between unit names, file names and path names.