blob: e9cd602bca0052ee4c9d3f6fa329d3c93bd1d540 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
|
------------------------------------------------------------------
-- _____ ______ _____ -
-- |_ _| | ____|/ ____| Institute of Embedded Systems -
-- | | _ __ | |__ | (___ Zuercher Hochschule fuer -
-- | | | '_ \| __| \___ \ angewandte Wissenschaften -
-- _| |_| | | | |____ ____) | (University of Applied Sciences) -
-- |_____|_| |_|______|_____/ 8401 Winterthur, Switzerland -
------------------------------------------------------------------
--
-- Project : SInet
-- Module : library ines_misc
-- Description : Base package of ines misc library
--
-- $LastChangedDate: 2007-11-02 14:43:24 +0100 (Fri, 02 Nov 2007) $
-- $Rev: 403 $
-- $Author: ffar $
-----------------------------------------------------------------
--
-- Change History
-- Date |Name |Modification
------------|----------|-----------------------------------------
-- 02.11.07 | ffar |file created
-----------------------------------------------------------------
library ieee;
use ieee.std_logic_1164.all;
package ines_vhdl_lib_base_pkg is
-- constants
-- types
subtype std_logic_vector_1 is std_logic_vector(0 downto 0);
type std_logic_array_1 is array(natural range <>) of std_logic_vector_1;
subtype std_logic_vector_2 is std_logic_vector(1 downto 0);
type std_logic_array_2 is array(natural range <>) of std_logic_vector_2;
subtype std_logic_vector_3 is std_logic_vector(2 downto 0);
type std_logic_array_3 is array(natural range <>) of std_logic_vector_3;
subtype std_logic_vector_4 is std_logic_vector(3 downto 0);
type std_logic_array_4 is array(natural range <>) of std_logic_vector_4;
subtype std_logic_vector_5 is std_logic_vector(4 downto 0);
type std_logic_array_5 is array(natural range <>) of std_logic_vector_5;
subtype std_logic_vector_6 is std_logic_vector(5 downto 0);
type std_logic_array_6 is array(natural range <>) of std_logic_vector_6;
subtype std_logic_vector_7 is std_logic_vector(6 downto 0);
type std_logic_array_7 is array(natural range <>) of std_logic_vector_7;
subtype std_logic_vector_8 is std_logic_vector(7 downto 0);
type std_logic_array_8 is array(natural range <>) of std_logic_vector_8;
subtype std_logic_vector_9 is std_logic_vector(8 downto 0);
type std_logic_array_9 is array(natural range <>) of std_logic_vector_9;
subtype std_logic_vector_10 is std_logic_vector(9 downto 0);
type std_logic_array_10 is array(natural range <>) of std_logic_vector_10;
subtype std_logic_vector_11 is std_logic_vector(10 downto 0);
type std_logic_array_11 is array(natural range <>) of std_logic_vector_11;
subtype std_logic_vector_12 is std_logic_vector(11 downto 0);
type std_logic_array_12 is array(natural range <>) of std_logic_vector_12;
subtype std_logic_vector_13 is std_logic_vector(12 downto 0);
type std_logic_array_13 is array(natural range <>) of std_logic_vector_13;
subtype std_logic_vector_14 is std_logic_vector(13 downto 0);
type std_logic_array_14 is array(natural range <>) of std_logic_vector_14;
subtype std_logic_vector_15 is std_logic_vector(14 downto 0);
type std_logic_array_15 is array(natural range <>) of std_logic_vector_15;
subtype std_logic_vector_16 is std_logic_vector(15 downto 0);
type std_logic_array_16 is array(natural range <>) of std_logic_vector_16;
subtype std_logic_vector_17 is std_logic_vector(16 downto 0);
type std_logic_array_17 is array(natural range <>) of std_logic_vector_17;
subtype std_logic_vector_18 is std_logic_vector(17 downto 0);
type std_logic_array_18 is array(natural range <>) of std_logic_vector_18;
subtype std_logic_vector_19 is std_logic_vector(18 downto 0);
type std_logic_array_19 is array(natural range <>) of std_logic_vector_19;
subtype std_logic_vector_20 is std_logic_vector(19 downto 0);
type std_logic_array_20 is array(natural range <>) of std_logic_vector_20;
subtype std_logic_vector_21 is std_logic_vector(20 downto 0);
type std_logic_array_21 is array(natural range <>) of std_logic_vector_21;
subtype std_logic_vector_22 is std_logic_vector(21 downto 0);
type std_logic_array_22 is array(natural range <>) of std_logic_vector_22;
subtype std_logic_vector_23 is std_logic_vector(22 downto 0);
type std_logic_array_23 is array(natural range <>) of std_logic_vector_23;
subtype std_logic_vector_24 is std_logic_vector(23 downto 0);
type std_logic_array_24 is array(natural range <>) of std_logic_vector_24;
subtype std_logic_vector_25 is std_logic_vector(24 downto 0);
type std_logic_array_25 is array(natural range <>) of std_logic_vector_25;
subtype std_logic_vector_26 is std_logic_vector(25 downto 0);
type std_logic_array_26 is array(natural range <>) of std_logic_vector_26;
subtype std_logic_vector_27 is std_logic_vector(26 downto 0);
type std_logic_array_27 is array(natural range <>) of std_logic_vector_27;
subtype std_logic_vector_28 is std_logic_vector(27 downto 0);
type std_logic_array_28 is array(natural range <>) of std_logic_vector_28;
subtype std_logic_vector_29 is std_logic_vector(28 downto 0);
type std_logic_array_29 is array(natural range <>) of std_logic_vector_29;
subtype std_logic_vector_30 is std_logic_vector(29 downto 0);
type std_logic_array_30 is array(natural range <>) of std_logic_vector_30;
subtype std_logic_vector_31 is std_logic_vector(30 downto 0);
type std_logic_array_31 is array(natural range <>) of std_logic_vector_31;
subtype std_logic_vector_32 is std_logic_vector(31 downto 0);
type std_logic_array_32 is array(natural range <>) of std_logic_vector_32;
subtype std_logic_vector_34 is std_logic_vector(33 downto 0);
type std_logic_array_34 is array(natural range <>) of std_logic_vector_34;
subtype std_logic_vector_36 is std_logic_vector(35 downto 0);
type std_logic_array_36 is array(natural range <>) of std_logic_vector_36;
subtype std_logic_vector_64 is std_logic_vector(63 downto 0);
type std_logic_array_64 is array(natural range <>) of std_logic_vector_64;
subtype std_logic_vector_72 is std_logic_vector(71 downto 0);
type std_logic_array_72 is array(natural range <>) of std_logic_vector_72;
-- functions
function zeros (n:natural) return std_logic_vector;
end package ines_vhdl_lib_base_pkg;
package body ines_vhdl_lib_base_pkg is
function zeros (n:natural) return std_logic_vector is
variable result: std_logic_vector(n-1 downto 0);
begin
for i in 0 to n-1 loop
result(i) := '0';
end loop;
return result;
end;
end package body ines_vhdl_lib_base_pkg;
|