aboutsummaryrefslogtreecommitdiffstats
path: root/src/synth/synth-expr.adb
diff options
context:
space:
mode:
Diffstat (limited to 'src/synth/synth-expr.adb')
-rw-r--r--src/synth/synth-expr.adb3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/synth/synth-expr.adb b/src/synth/synth-expr.adb
index 9bb95f66a..627005a88 100644
--- a/src/synth/synth-expr.adb
+++ b/src/synth/synth-expr.adb
@@ -841,7 +841,8 @@ package body Synth.Expr is
-- TODO: check overflow.
case Val.Kind is
when Value_Net
- | Value_Wire =>
+ | Value_Wire
+ | Value_Alias =>
N := Get_Net (Val);
if Vtype.Drange.Is_Signed then
N := Build2_Sresize