From caba1d1b21d9756ede50f40d53fbc816d3b84320 Mon Sep 17 00:00:00 2001
From: Tristan Gingold
Date: Thu, 17 Jul 2014 20:34:57 +0200
Subject: vhdl 2008: visibility, more implicit subprograms, alias... Use
 Type_Definition in type_declarator.

---
 libraries/ieee2008/std_logic_1164-body.vhdl | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'libraries/ieee2008')

diff --git a/libraries/ieee2008/std_logic_1164-body.vhdl b/libraries/ieee2008/std_logic_1164-body.vhdl
index 7a9c91d..e5c56de 100644
--- a/libraries/ieee2008/std_logic_1164-body.vhdl
+++ b/libraries/ieee2008/std_logic_1164-body.vhdl
@@ -1108,7 +1108,8 @@ package body std_logic_1164 is
     variable c : CHARACTER;
   begin
     while L /= null and L.all'length /= 0 loop
-      if (L.all(1) = ' ' or L.all(1) = NBSP or L.all(1) = HT) then
+      c := l (l'left);
+      if c = ' ' or c = NBSP or c = HT then
         read (l, c, readOk);
       else
         exit;
-- 
cgit