From 37a6c987d59303b8c8e2c1407cc0f7d9c414f5d3 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Fri, 3 Apr 2020 07:39:50 +0200
Subject: grt/ghdl_main: add comments.

---
 src/grt/ghdl_main.adb | 7 +++++++
 1 file changed, 7 insertions(+)

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;
-- 
cgit v1.2.3