----------------------------------------------------------------------------------
-- Company:
-- Engineer:
--
-- Create Date: 00:44:57 05/11/2015
-- Design Name:
-- Module Name: led2 - Behavioral
-- Project Name:
-- Target Devices:
-- Tool versions:
-- Description:
--
-- Dependencies:
--
-- Revision:
-- Revision 0.01 - File Created
-- Additional Comments:
--
----------------------------------------------------------------------------------
library IEEE;
use IEEE.STD_LOGIC_1164.ALL;
use IEEE.STD_LOGIC_ARITH.ALL;
use IEEE.STD_LOGIC_UNSIGNED.ALL;
---- Uncomment the following library declaration if instantiating
---- any Xilinx primitives in this code.
--library UNISIM;
--use UNISIM.VComponents.all;
entity d is
Port ( clk : in STD_LOGIC;
d : in STD_LOGIC;
q : out STD_LOGIC);
end d;
architecture Behavioral of d is
begin
process ( clk ,d )
begin
if (clk <='1') then
q<=d;
else
q<='0';
end if;
procedure add;.............. [B]line 61[/B]
end process;
end Behavioral;
procedure add is ....... [B]line 73[/B]
begin
variable a,o :integer := 1
o:= a+1;
end procedure;