X-Git-Url: https://git.ucc.asn.au/?a=blobdiff_plain;f=src%2Ffpupack.vhd;h=d052239dcc942c93ad870f1be07950989f3bb7f9;hb=HEAD;hp=58d210f5386b1d376039195afaba55901c476cb0;hpb=0e33e3a609436a1fd615c12592ea78b5a21f0385;p=ipdf%2Fvfpu.git

diff --git a/src/fpupack.vhd b/src/fpupack.vhd
index 58d210f..d052239 100644
--- a/src/fpupack.vhd
+++ b/src/fpupack.vhd
@@ -1,46 +1,7 @@
--------------------------------------------------------------------------------
---
--- Project:	<Floating Point Unit Core>
---  	
+
 -- Description: FPU package wich contains constants and functions needed in the FPU core
--------------------------------------------------------------------------------
---
---				100101011010011100100
---				110000111011100100000
---				100000111011000101101
---				100010111100101111001
---				110000111011101101001
---				010000001011101001010
---				110100111001001100001
---				110111010000001100111
---				110110111110001011101
---				101110110010111101000
---				100000010111000000000
---
--- 	Author:		 Jidan Al-eryani 
--- 	E-mail: 	 jidan@gmx.net
---
---  Copyright (C) 2006
---
---	This source file may be used and distributed without        
---	restriction provided that this copyright statement is not   
---	removed from the file and that any derivative work contains 
---	the original copyright notice and the associated disclaimer.
---                                                           
---		THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY     
---	EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED   
---	TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS   
---	FOR A PARTICULAR PURPOSE. IN NO EVENT SHALL THE AUTHOR      
---	OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,         
---	INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES    
---	(INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE   
---	GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR        
---	BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF  
---	LIABILITY, WHETHER IN  CONTRACT, STRICT LIABILITY, OR TORT  
---	(INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT  
---	OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE         
---	POSSIBILITY OF SUCH DAMAGE. 
---
+-- See Copyright.jop
+
 
 library  ieee;
 use ieee.std_logic_1164.all;
@@ -59,16 +20,16 @@ package fpupack is
 	constant EXP_WIDTH : integer := 8;
 
 	--Zero vector
-	constant ZERO_VECTOR: std_logic_vector(30 downto 0) := "0000000000000000000000000000000";
+	constant ZERO_VECTOR: std_logic_vector(FP_WIDTH-2 downto 0) := (others => '0');
 	
 	-- Infinty FP format
-	constant INF  : std_logic_vector(30 downto 0) := "1111111100000000000000000000000";
+	constant INF  : std_logic_vector(FP_WIDTH-2 downto 0) := (FP_WIDTH-2 downto FP_WIDTH-2-EXP_WIDTH+1 => '1', others => '0');
 	
 	-- QNaN (Quit Not a Number) FP format (without sign bit)
-    constant QNAN : std_logic_vector(30 downto 0) := "1111111110000000000000000000000";
+    constant QNAN : std_logic_vector(FP_WIDTH-2 downto 0) := (FP_WIDTH-2 downto FP_WIDTH-2-EXP_WIDTH => '1', others => '0');
     
     -- SNaN (Signaling Not a Number) FP format (without sign bit)
-    constant SNAN : std_logic_vector(30 downto 0) := "1111111100000000000000000000001";
+    constant SNAN : std_logic_vector(FP_WIDTH-2 downto 0) := (FP_WIDTH-2 downto FP_WIDTH-2-EXP_WIDTH+1 => '1', 0 => '1', others => '0');
     
     -- count the  zeros starting from left
     function count_l_zeros (signal s_vector: std_logic_vector) return std_logic_vector;
@@ -111,4 +72,4 @@ package body fpupack is
 
 
 		
-end fpupack;
\ No newline at end of file
+end fpupack;