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;