EDA第五章 VHDL設計进阶4-8节-子程序以后-定稿.pptVIP

;;;(2)、 函数体 函数体的说明部分用于对函数中使用的数据类型、常量、变量进行说明； 顺序语句部分用来完成规定的算法或转换。 LIBRARY IEEE;--例5-33函数的应用 USE IEEE.STD_LOGIC_1164.ALL; ENTITY func IS PORT(a:IN STD_LOGIC_VECTOR(0 TO 2); m:OUT STD_LOGIC_VECTOR(0 TO 2)); END ENTITY func; ARCHITECTURE demo OF func IS FUNCTION sam(x,y,z:STD_LOGIC) RETURN STD_LOGIC IS--函数 BEGIN --函数说明部分省略，从BEGIN开始为顺序语句部分 RETURN (x AND y )OR z; END FUNCTION sam; --函数结束 函数定义在结构体的说明部分 BEGIN --结构体的功能描述开始 PROCESS(a) --结构体中定义一个进程 BEGIN --进程开始 后面为顺序语句 m(0)=sam(a(0),a(1),a(2)); --进程中调用了函数 m(1)=sam(a(2),a(0),a(1)); m(2)=sam(a(1),a(2),a(0)); END PROCESS; --进程结束 END ARCHITECTURE demo; --结构体结束;;LIBRARY IEEE; --程序包体 USE IEEE.STD_LOGIC_1164.ALL; USE IEEE.STD_LOGIC_ARITH.ALL; PACKAGE body STD_LOGIC_UNSIGNED IS FUNCTION maximum(l,r:INTEGER) RETURN INTEGER IS BEGIN IF lr THEN RETURN l; ELSE RETURN r; END IF; END; FUNCTION “+”(l:STD_LOGIC_VECTOR; r:INTEGER) RETURN STD_LOGIC_VECTOR IS VARIBLE result:STD_LOGIC_VECTOR(l’RANGE); BEGIN result:= UNSGNED(l)+r; RETURN STD_LOGIC_VECTOR(result); end; :--其他重载函数 END STD_LOGIC_UNSIGNED;;LIBRARY IEEE; --例5-35重载函数使用 USE IEEE.STD_LOGIC_1164.ALL; USE IEEE.STD_LOGIC_UNSIGNED.ALL; ENTITY cnt4 IS PORT(clk: IN STD_LOGIC; q:BUFFER STD_LOGIC_VECTOR(3 DOWNTO 0)); END cnt4 ARCHITECTURE one OF cnt4 IS BEGIN PROCESS(clk) BEGIN IF (clk’EVENT AND clk=‘1’) THEN IF q=15 THEN –判左右等，调用重载函数和整形比较 q=“0000”; ELSE q=q+1;-- 调用重载函数”+”完成逻辑矢量和整形相加 END IF; END IF; END PROCESS; END ARCHITECTURE; ;;(2)、 过程体 过程体是顺序语句，调用时启动过程体中顺序语句的执行，过程中可以使用顺序语句中的所有语句，包括WAIT语句，如果过程在进程中，那么当进程有敏感变量时，过程中也不能使用WAIT语句。 例5-36过程使用示例1 PROCEDURE shift( din,s:IN STD_LOGIC_VECTOR; SIGNAL dou