diff options
Diffstat (limited to 'src/synth/synth-oper.adb')
| -rw-r--r-- | src/synth/synth-oper.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/synth/synth-oper.adb b/src/synth/synth-oper.adb index fbd345be0..cf0aafb9a 100644 --- a/src/synth/synth-oper.adb +++ b/src/synth/synth-oper.adb @@ -970,7 +970,7 @@ package body Synth.Oper is Subprg_Inst := Make_Instance (Syn_Inst, Imp); Synth_Subprogram_Association - (Subprg_Inst, Syn_Inst, Inter_Chain, Assoc_Chain); + (Subprg_Inst, Syn_Inst, Syn_Inst, Inter_Chain, Assoc_Chain); Param1 := Inter_Chain; if Param1 /= Null_Node then |