1 files changed, 3 insertions, 0 deletions
diff --git a/src/ghdldrv/ghdllocal.ads b/src/ghdldrv/ghdllocal.ads
index c182f6c0e..f476ae24c 100644
--- a/src/ghdldrv/ghdllocal.ads
+++ b/src/ghdldrv/ghdllocal.ads
@@ -142,7 +142,10 @@ package Ghdllocal is
    function Is_File_Outdated (File : Iir_Design_File) return Boolean;
 
    --  Extract PRIM_ID and SEC_ID from ARGS.
+   --  If AUTO is true, the top unit is deduced from the existing one,
+   --   otherwise it must be present.
    procedure Extract_Elab_Unit (Cmd_Name : String;
+                                Auto : Boolean;
                                 Args : Argument_List;
                                 Next_Arg : out Natural;
                                 Lib_Id : out Name_Id;