txlyre 8 цаг өмнө
parent
commit
5f15110c9e
1 өөрчлөгдсөн 9 нэмэгдсэн , 2 устгасан
  1. 9 2
      qic.c

+ 9 - 2
qic.c

@@ -5655,9 +5655,16 @@ void compile_node(buffer_t *gbuf, buffer_t *buf, list_t *ctx, table_t *ltab,
       char *name = node->t->text;
       node_t *n = const_get(name);
 
-      if (n)
+      if (n) {
+        node_t *r = mexpr_eval(n);
+        if (r->tag == N_EXPRSTMT)
+          r = r->a;
+
+        if (r != NULL && IS_EXPR(r))
+          n = r;
+
         compile_node(gbuf, buf, ctx, ltab, lstk, sstk, lbl, n);
-      else
+      } else
         EMIT("qi_get(state, \"%s\")", name);
     } break;