From f82a4c49a364b78f13bdbecf99bd11cf8734978e Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Sat, 14 Mar 2015 07:58:52 +0100
Subject: Disable overflow checks in Eval_Discrete_Range_Length.

To avoid crash when dealing with very large ranges.
---
 src/vhdl/evaluation.adb | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'src')

diff --git a/src/vhdl/evaluation.adb b/src/vhdl/evaluation.adb
index c4727ac05..9bcc85e8a 100644
--- a/src/vhdl/evaluation.adb
+++ b/src/vhdl/evaluation.adb
@@ -2554,6 +2554,8 @@ package body Evaluation is
 
    function Eval_Discrete_Range_Length (Constraint : Iir) return Iir_Int64
    is
+      --  We don't want to deal with very large ranges here.
+      pragma Suppress (Overflow_Check);
       Res : Iir_Int64;
       Left, Right : Iir_Int64;
    begin
-- 
cgit v1.2.3