diff options
| author | Tristan Gingold <tgingold@free.fr> | 2016-01-24 05:14:35 +0100 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2016-01-24 05:14:35 +0100 |
| commit | c03fc9f45df59e35ba9fba8bcf9e933fbb1074b9 (patch) | |
| tree | 67f83680a6544012cc5755068f43a1089d0d8d53 /src/vhdl/simulate/iir_values.ads | |
| parent | a4de40e69bbc961554e432f08fc146e07091c3f7 (diff) | |
| download | ghdl-c03fc9f45df59e35ba9fba8bcf9e933fbb1074b9.tar.gz ghdl-c03fc9f45df59e35ba9fba8bcf9e933fbb1074b9.tar.bz2 ghdl-c03fc9f45df59e35ba9fba8bcf9e933fbb1074b9.zip | |
simul: fix various issues.
Diffstat (limited to 'src/vhdl/simulate/iir_values.ads')
| -rw-r--r-- | src/vhdl/simulate/iir_values.ads | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/src/vhdl/simulate/iir_values.ads b/src/vhdl/simulate/iir_values.ads index 699ab883a..67a431cea 100644 --- a/src/vhdl/simulate/iir_values.ads +++ b/src/vhdl/simulate/iir_values.ads @@ -263,8 +263,8 @@ package Iir_Values is -- Value or sub-value must not be indirect. function Is_Equal (Left, Right: Iir_Value_Literal_Acc) return Boolean; - -- Return TRUE iif ARANGE is a nul range. - function Is_Nul_Range (Arange : Iir_Value_Literal_Acc) return Boolean; + -- Return TRUE iif ARANGE is a null range. + function Is_Null_Range (Arange : Iir_Value_Literal_Acc) return Boolean; -- Get order of LEFT with RIGHT. -- Must be discrete kind (enum, int, fp, physical) or array (uni dim). @@ -352,4 +352,3 @@ package Iir_Values is -- Disp a value_literal in readable form. procedure Disp_Iir_Value (Value: Iir_Value_Literal_Acc; A_Type: Iir); end Iir_Values; - |