:art: @Array @=> decl @Array sets ref

diff --git a/src/lib/array.c b/src/lib/array.c
index 8bbd0d8baa2a1d9fb6ac6eb7c538593694b680d2..73679ef8fe7a328d5bc3e5ec077301724282f99a 100644 (file)
--- a/src/lib/array.c
+++ b/src/lib/array.c
@@ -153,6 +153,7 @@ static OP_CHECK(opck_array_at) {
       ERR_N(exp_self(bin)->pos, _("array depths do not match."))
   }
   if(bin->rhs->exp_type == ae_exp_decl) {
+    SET_FLAG(bin->rhs->d.exp_decl.td, ref);
     if(bin->rhs->d.exp_decl.list->self->array &&
           bin->rhs->d.exp_decl.list->self->array->exp)
       ERR_N(exp_self(bin)->pos, _("do not provide array for 'xxx @=> declaration'."))