summaryrefslogtreecommitdiff
path: root/src/vhdl/sem_names.adb
diff options
context:
space:
mode:
Diffstat (limited to 'src/vhdl/sem_names.adb')
-rw-r--r--src/vhdl/sem_names.adb1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/vhdl/sem_names.adb b/src/vhdl/sem_names.adb
index 5f3854a..4ab2390 100644
--- a/src/vhdl/sem_names.adb
+++ b/src/vhdl/sem_names.adb
@@ -181,6 +181,7 @@ package body Sem_Names is
-- conversion. Return Null_Iir if there is no function call, or if there
-- is an expressions that isn't a function call, or if there is more than
-- one function call without implicit conversion.
+ -- Cf Sem_Expr.Get_Non_Implicit_Subprogram
function Extract_Call_Without_Implicit_Conversion (Res : Iir) return Iir
is
pragma Assert (Is_Overload_List (Res));