Merge pull request #24 from olofk/physical_warnings

Silence modelsim warnings for physical.vhdl

Author: mzabeltud

src/common/physical.vhdl

@@ -382,6 +382,7 @@ package body physical is
 		else
 			report "to_baud: Unknown format" severity FAILURE;
 		end if;
+		return 0 Bd;
 	end function;
 
 	-- inter-type arithmetic
@@ -795,6 +796,7 @@ package body physical is
 		elsif	(scale = 1	ms) then	return div(t, 1	 ms);
 		elsif	(scale = 1 sec) then	return div(t, 1 sec);
 		else	report "to_real: scale must have a value of '1 <unit>'" severity failure;
+		return 0.0;
 		end if;
 	end;
 
@@ -807,6 +809,7 @@ package body physical is
 --	elsif	(scale = 1 THz) then	return div(f, 1 THz);
 		else	report "to_real: scale must have a value of '1 <unit>'" severity failure;
 		end if;
+		return 0.0;
 	end;
 
 	function to_real(br : BAUD; scale : BAUD) return REAL is
@@ -817,6 +820,7 @@ package body physical is
 		elsif	(scale = 1 GBd) then	return div(br, 1 GBd);
 		else	report "to_real: scale must have a value of '1 <unit>'" severity failure;
 		end if;
+		return 0.0;
 	end;
 
 	function to_real(mem : MEMORY; scale : MEMORY) return REAL is
@@ -827,6 +831,7 @@ package body physical is
 		elsif	(scale = 1 GiB)		then	return div(mem, 1 GiB);
 		else	report "to_real: scale must have a value of '1 <unit>'" severity failure;
 		end if;
+		return 0.0;
 	end;
 
 	-- convert physical types to standard type (INTEGER)
@@ -840,6 +845,7 @@ package body physical is
 			when others =>						null;
 		end case;
 		report "to_int: unsupported RoundingStyle: " & T_ROUNDING_STYLE'image(RoundingStyle) severity failure;
+		return 0;
 	end;
 
 	function to_int(f : FREQ; scale : FREQ; RoundingStyle : T_ROUNDING_STYLE := ROUND_TO_NEAREST) return integer is
@@ -851,6 +857,7 @@ package body physical is
 			when others =>						null;
 		end case;
 		report "to_int: unsupported RoundingStyle: " & T_ROUNDING_STYLE'image(RoundingStyle) severity failure;
+		return 0;
 	end;
 
 	function to_int(br : BAUD; scale : BAUD; RoundingStyle : T_ROUNDING_STYLE := ROUND_TO_NEAREST) return integer is
@@ -862,6 +869,7 @@ package body physical is
 			when others =>						null;
 		end case;
 		report "to_int: unsupported RoundingStyle: " & T_ROUNDING_STYLE'image(RoundingStyle) severity failure;
+		return 0;
 	end;
 
 	function to_int(mem : MEMORY; scale : MEMORY; RoundingStyle : T_ROUNDING_STYLE := ROUND_UP) return integer is
@@ -873,6 +881,7 @@ package body physical is
 			when others =>						null;
 		end case;
 		report "to_int: unsupported RoundingStyle: " & T_ROUNDING_STYLE'image(RoundingStyle) severity failure;
+		return 0;
 	end;
 
 	-- calculate needed counter cycles to achieve a given 1. timing/delay and 2. frequency/period