t_procedure.vhd

来自「matlab在fpga中的应用的三个具体事例」· VHDL 代码 · 共 37 行

--4.15  过程（Procedure）

--下面还是用例子来说明其具体使用方法。
library ieee;
use ieee.std_logic_1164.all;
use ieee.std_logic_arith.all;
use ieee.std_logic_signed.all;

entity t_procedure is
	port(
			clk :	in std_logic;
			A   :	in std_logic;
			C   :	out std_logic
		 );
end t_procedure;

architecture behave of t_procedure is
	
	procedure increment(
							signal 	clk	: in std_logic;
							signal	din	: in std_logic;
							signal 	dout: out std_logic
						) is
	begin--过程可执行部分
	       if(clk'event and clk='1') then
	            dout <= din xor '1';
	       end if;
	end increment;
begin --结构体可执行部分
	increment(clk,A,C);--调用上面定义的过程
end behave;

--注意：不要将VHDL中的"过程"（Procedure）和"进程"（Process）混淆。