From b3a28203e95f68bd1007c4c11b44187ecabbf593 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Tue, 17 Sep 2019 02:16:28 +0200
Subject: synth: fold addition on constant nets.

---
 src/synth/synth-expr.ads | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'src/synth/synth-expr.ads')

diff --git a/src/synth/synth-expr.ads b/src/synth/synth-expr.ads
index 835da87ab..5ce27e49b 100644
--- a/src/synth/synth-expr.ads
+++ b/src/synth/synth-expr.ads
@@ -36,6 +36,8 @@ package Synth.Expr is
      (Val : Value_Acc; Dtype : Type_Acc; Loc : Source.Syn_Src)
      return Value_Acc;
 
+   function Get_Const_Discrete (V : Value_Acc) return Int64;
+
    procedure From_Std_Logic (Enum : Int64; Val : out Uns32; Zx : out Uns32);
    procedure From_Bit (Enum : Int64; Val : out Uns32);
    procedure To_Logic
-- 
cgit v1.2.3