Subversion Repositories potato

-- The Potato Processor - A simple processor for FPGAs
-- (c) Kristian Klomsten Skordal 2014 <kristian.skordal@wafflemail.net>
-- Report bugs and issues on <http://opencores.org/project,potato,bugtracker>
 
library ieee;
use ieee.std_logic_1164.all;
 
use work.pp_types.all;
use work.pp_constants.all;
 
package pp_utilities is
 
	--! Converts a boolean to an std_logic.
	function to_std_logic(input : in boolean) return std_logic;
 
	-- Checks if a number is 2^n:
	function is_pow2(input : in natural) return boolean;
 
	--! Calculates log2 with integers.
	function log2(input : in natural) return natural;
 
end package pp_utilities;
 
package body pp_utilities is
 
	function to_std_logic(input : in boolean) return std_logic is
	begin
		if input then
			return '1';
		else
			return '0';
		end if;
	end function to_std_logic;
 
	function is_pow2(input : in natural) return boolean is
		variable c : natural := 1;
	begin
		for i in 0 to 31 loop
			if input = i then
				return true;
			end if;
 
			c := c * 2;
		end loop;
 
		return false;
	end function is_pow2;
 
	function log2(input : in natural) return natural is
		variable retval : natural := 0;
		variable temp   : natural := input;
	begin
		while temp > 1 loop
			retval := retval + 1;
			temp := temp / 2;
		end loop;
 
		return retval;
	end function log2;
 
end package body pp_utilities;