1 files changed, 26 insertions, 0 deletions
diff --git a/testsuite/synth/func01/func08b.vhdl b/testsuite/synth/func01/func08b.vhdl
new file mode 100644
index 000000000..8a17cc1cb
--- /dev/null
+++ b/testsuite/synth/func01/func08b.vhdl
@@ -0,0 +1,26 @@
+library ieee;
+use ieee.std_logic_1164.all;
+use ieee.numeric_std.all;
+
+entity func08b is
+  port (v : std_ulogic_vector (3 downto 0);
+        r : out integer);
+end func08b;
+
+architecture behav of func08b is
+  function fls (val: std_ulogic_vector(3 downto 0)) return integer is
+    variable ret: integer;
+  begin
+    ret := 4;
+    for i in val'range loop
+      if val(i) = '1' then
+        ret := 3 - i;
+        exit;
+      end if;
+    end loop;
+
+    return ret;
+  end;
+begin
+  r <= fls(v);
+end behav;