aboutsummaryrefslogtreecommitdiffstats
path: root/testsuite/synth/gen01/pkg02.vhdl
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/synth/gen01/pkg02.vhdl')
-rw-r--r--testsuite/synth/gen01/pkg02.vhdl25
1 files changed, 25 insertions, 0 deletions
diff --git a/testsuite/synth/gen01/pkg02.vhdl b/testsuite/synth/gen01/pkg02.vhdl
new file mode 100644
index 000000000..326246d8f
--- /dev/null
+++ b/testsuite/synth/gen01/pkg02.vhdl
@@ -0,0 +1,25 @@
+package gen is
+ generic (val : integer);
+
+ function get_val (x : integer) return integer;
+end;
+
+package body gen is
+ function get_val (x : integer) return integer is
+ begin
+ return val + x;
+ end get_val;
+end;
+
+package inst1 is new work.gen generic map (val => 3);
+
+entity pkg02 is
+ port (i : in integer;
+ o : out integer);
+end pkg02;
+
+architecture behav of pkg02 is
+ use work.inst1.all;
+begin
+ o <= get_val (i);
+end behav;