Subversion Repositories spi_boot

-------------------------------------------------------------------------------
--
-- SD/MMC Bootloader
--
-- $Id: spi_boot_pack-p.vhd 77 2009-04-01 19:53:14Z arniml $
--
-------------------------------------------------------------------------------
 
library ieee;
use ieee.std_logic_1164.all;
 
package spi_boot_pack is
 
  function "=" (a : std_logic; b : integer) return boolean;
 
end spi_boot_pack;
 
package body spi_boot_pack is
 
  function "=" (a : std_logic; b : integer) return boolean is
    variable result_v : boolean;
  begin
    result_v := false;
 
    case a is
      when '0' =>
        if b = 0 then
          result_v := true;
        end if;
 
      when '1' =>
        if b = 1 then
          result_v := true;
        end if;
 
      when others =>
        null;
 
    end case;
 
    return result_v;
  end;
 
end spi_boot_pack;