[COMMITTED] a68: a68_lower_variable_declaration: fix generator call for static var_decls

[Jose E. Marchesi]

---
 gcc/algol68/a68-low-decls.cc | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/gcc/algol68/a68-low-decls.cc b/gcc/algol68/a68-low-decls.cc
index eca2e855431..6c35d455612 100644
--- a/gcc/algol68/a68-low-decls.cc
+++ b/gcc/algol68/a68-low-decls.cc
@@ -227,7 +227,7 @@ a68_lower_variable_declaration (NODE_T *p, LOW_CTX_T ctx)
 			      fold_build1 (INDIRECT_REF,
 					   TREE_TYPE (var_decl),
 					   a68_low_generator (declarer,
-							      MOID (declarer),
+							      SUB (MOID (declarer)),
 							      true /* heap */,
 							      ctx)));
 	}
-- 
2.30.2