diff options
| -rw-r--r-- | src/synth/synth-stmts.adb | 2 | 
1 files changed, 2 insertions, 0 deletions
diff --git a/src/synth/synth-stmts.adb b/src/synth/synth-stmts.adb index 4def552e6..4717cd488 100644 --- a/src/synth/synth-stmts.adb +++ b/src/synth/synth-stmts.adb @@ -1432,6 +1432,8 @@ package body Synth.Stmts is                             raise Internal_Error;                          end if;                          Val := Info.Obj; +                     elsif Info.Kind = Target_Simple then +                        Val := Info.Obj;                       else                          Val := Synth_Read_Memory                            (Caller_Inst, Info.Obj, Info.Off, No_Net,  | 
