aboutsummaryrefslogtreecommitdiffstats
path: root/src/vhdl
diff options
context:
space:
mode:
Diffstat (limited to 'src/vhdl')
-rw-r--r--src/vhdl/scanner-scan_literal.adb2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/vhdl/scanner-scan_literal.adb b/src/vhdl/scanner-scan_literal.adb
index 74af66fff..4be05d1f7 100644
--- a/src/vhdl/scanner-scan_literal.adb
+++ b/src/vhdl/scanner-scan_literal.adb
@@ -119,12 +119,12 @@ begin
Has_Dot := False;
Base := 10;
+ Scale := 0;
C := Source (Pos);
if C = '.' then
-- Decimal integer.
Has_Dot := True;
- Scale := 0;
Pos := Pos + 1;
C := Source (Pos);
if C not in '0' .. '9' then