From 8e06c39ed8311aeb36696d9f964550407e1c556e Mon Sep 17 00:00:00 2001 From: 1138-4EB <1138-4EB@users.noreply.github.com> Date: Sat, 9 Dec 2017 17:34:58 +0100 Subject: clean todos --- doc/using/UART_srcs/vhpi/tty_pkg.vhd | 70 ------------------------------------ 1 file changed, 70 deletions(-) delete mode 100644 doc/using/UART_srcs/vhpi/tty_pkg.vhd (limited to 'doc/using/UART_srcs/vhpi/tty_pkg.vhd') diff --git a/doc/using/UART_srcs/vhpi/tty_pkg.vhd b/doc/using/UART_srcs/vhpi/tty_pkg.vhd deleted file mode 100644 index 99e3a347f..000000000 --- a/doc/using/UART_srcs/vhpi/tty_pkg.vhd +++ /dev/null @@ -1,70 +0,0 @@ ---tty_pkg.vhd -library ieee; -use ieee.std_logic_1164.all; -use ieee.numeric_std.all; - -package tty_pkg is - - function to_integer( s: std_logic) return integer; - function to_std_logic( s : integer ) return std_logic; - - function tty_open (portn : integer) return integer; - attribute foreign of tty_open : - function is "VHPIDIRECT tty_open"; - - function read_data ( dummy: integer) return integer; - attribute foreign of read_data : - function is "VHPIDIRECT read_data"; - - function read_enable ( dummy: integer) return integer; - attribute foreign of read_enable : - function is "VHPIDIRECT read_enable"; - - procedure write_data ( data: in integer); - attribute foreign of write_data : - procedure is "VHPIDIRECT write_data"; - -end; - - -package body tty_pkg is - - function to_integer( s : std_logic ) return integer is - begin - if s = '1' then - return 1; - else - return 0; - end if; - end function; - - function to_std_logic( s : integer ) return std_logic is - begin - if s > 0 then - return '1'; - else - return '0'; - end if; - end function; - - - function tty_open (portn : integer) return integer is - begin - assert false report "VHPI" severity failure; - end tty_open; - - function read_data (dummy: integer) return integer is - begin - assert false report "VHPI" severity failure; - end read_data; - - function read_enable (dummy: integer) return integer is - begin - assert false report "VHPI" severity failure; - end read_enable; - - procedure write_data ( data: in integer) is - begin - assert false report "VHPI" severity failure; - end write_data; -end tty_pkg; -- cgit v1.2.3