aboutsummaryrefslogtreecommitdiffstats
path: root/src/synth/synth-values.adb
diff options
context:
space:
mode:
Diffstat (limited to 'src/synth/synth-values.adb')
-rw-r--r--src/synth/synth-values.adb2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/synth/synth-values.adb b/src/synth/synth-values.adb
index f2a9d7033..0d10a94da 100644
--- a/src/synth/synth-values.adb
+++ b/src/synth/synth-values.adb
@@ -90,7 +90,7 @@ package body Synth.Values is
when Value_Const =>
return True;
when Value_Alias =>
- return False;
+ return Is_Static_Val (Val.A_Obj);
when Value_Instance
| Value_Subtype =>
-- Not really a value.