1 files changed, 7 insertions, 0 deletions
diff --git a/src/grt/ghdl_main.adb b/src/grt/ghdl_main.adb
index 4311e603a..c36e1b851 100644
--- a/src/grt/ghdl_main.adb
+++ b/src/grt/ghdl_main.adb
@@ -46,8 +46,15 @@ is
 
    My_Argv : Grt.Options.Argv_Type := To_Argv_Type (Argv);
 begin
+   --  Ada elaboration.
    Grt_Init;
+
+   --  Set the options.
    Grt.Main.Run_Options (My_Argv (0), Argc, My_Argv);
+
+   --  Initialize, elaborate and simulate.
    Grt.Main.Run;
+
+   --  Return the status.
    return Grt.Errors.Exit_Status;
 end Ghdl_Main;