:art: move scoped_ini

diff --git a/src/emit/emit.c b/src/emit/emit.c
index 51f30a64810f4d5921f53cc93b14a92a70c7b71d..774e479a96afb1e69accf07047a9976dd1b239c5 100644 (file)
--- a/src/emit/emit.c
+++ b/src/emit/emit.c
@@ -1172,7 +1172,22 @@ ANN static inline void emit_return_pc(const Emitter emit, const m_uint val) {
 
 ANN static inline void pop_exp(const Emitter emit, Exp e);
 
-ANN static m_bool        scoped_stmt(const Emitter emit, const Stmt stmt);
+ANN static inline void scoped_ini(const Emitter emit) {
+  ++emit->env->scope->depth;
+  emit_push_scope(emit);
+}
+
+ANN static inline void scoped_end(const Emitter emit) {
+  emit_pop_scope(emit);
+  --emit->env->scope->depth;
+}
+
+ANN static m_bool scoped_stmt(const Emitter emit, const Stmt stmt) {
+  scoped_ini(emit);
+  const m_bool ret = emit_stmt(emit, stmt);
+  scoped_end(emit);
+  return ret;
+}
 
 #ifdef GWION_INLINE
 ANN static inline bool check_inline(const Emitter emit, const Func f) {
@@ -1238,7 +1253,9 @@ ANN static inline m_bool inline_body(const Emitter emit, const Func f) {
   struct Vector_ v = {.ptr = emit->code->stack_return.ptr};
   vector_init(&emit->code->stack_return);
   nspc_push_value(emit->gwion->mp, emit->env->curr);
-  const m_bool ret = scoped_stmt(emit, f->def->d.code);
+  scoped_ini(emit);
+  const m_bool ret = emit_stmt_list(emit, f->def->d.code);
+  scoped_end(emit);
   emit_return_pc(emit, emit_code_size(emit));
   nspc_pop_value(emit->gwion->mp, emit->env->curr);
   vector_release(&emit->code->stack_return);
@@ -1634,23 +1651,6 @@ ANN static inline void stack_alloc(const Emitter emit) {
   emit->code->stack_depth += SZ_INT;
 }
 
-ANN static inline void scoped_ini(const Emitter emit) {
-  ++emit->env->scope->depth;
-  emit_push_scope(emit);
-}
-
-ANN static inline void scoped_end(const Emitter emit) {
-  emit_pop_scope(emit);
-  --emit->env->scope->depth;
-}
-
-ANN static m_bool scoped_stmt(const Emitter emit, const Stmt stmt) {
-  scoped_ini(emit);
-  const m_bool ret = emit_stmt(emit, stmt);
-  scoped_end(emit);
-  return ret;
-}
-
 #define SPORK_FUNC_PREFIX "spork~func:%u"
 #define FORK_FUNC_PREFIX  "fork~func:%u"
 #define SPORK_CODE_PREFIX "spork~code:%u"