From 8b3ec6b7edf3aedbe7084609881571d1603e9621 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Tue, 24 Jun 2014 22:09:22 +0200
Subject: Use library unit instead of design unit.

---
 sem_names.ads | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'sem_names.ads')

diff --git a/sem_names.ads b/sem_names.ads
index b48cd7b6a..8e9ffd0ba 100644
--- a/sem_names.ads
+++ b/sem_names.ads
@@ -41,8 +41,8 @@ package Sem_Names is
    --  To be used only for names (weakly) semantized by sem_name_soft.
    procedure Sem_Name_Clean (Name : Iir);
 
-   --  Return TRUE if NAME is a name that designate an object.
-   --  Only in this case, base_name is defined.
+   --  Return TRUE if NAME is a name that designate an object (ie a constant,
+   --  a variable, a signal or a file).
    function Is_Object_Name (Name : Iir) return Boolean;
 
    --  Return an object node if NAME designates an object (ie either is an
-- 
cgit v1.2.3