summaryrefslogtreecommitdiff
path: root/src/lib_base.c
diff options
context:
space:
mode:
authorMike Pall <mike>2011-06-07 21:37:24 +0200
committerMike Pall <mike>2011-06-07 21:37:24 +0200
commit585cf05dbd54564d2d3387cef09b3ac2d5e52afd (patch)
treed455c80e6d916ae2673d8aaaee50f0ba77d0b92a /src/lib_base.c
parentb44ccd426339a9eb0da83633d4b71a23dac29762 (diff)
downloadluajit-585cf05dbd54564d2d3387cef09b3ac2d5e52afd.tar.gz
luajit-585cf05dbd54564d2d3387cef09b3ac2d5e52afd.tar.bz2
luajit-585cf05dbd54564d2d3387cef09b3ac2d5e52afd.zip
Move debugging/introspection functionality to lj_debug.c.
Diffstat (limited to 'src/lib_base.c')
-rw-r--r--src/lib_base.c5
1 files changed, 3 insertions, 2 deletions
diff --git a/src/lib_base.c b/src/lib_base.c
index 8c71ae32..f8975986 100644
--- a/src/lib_base.c
+++ b/src/lib_base.c
@@ -18,6 +18,7 @@
18#include "lj_obj.h" 18#include "lj_obj.h"
19#include "lj_gc.h" 19#include "lj_gc.h"
20#include "lj_err.h" 20#include "lj_err.h"
21#include "lj_debug.h"
21#include "lj_str.h" 22#include "lj_str.h"
22#include "lj_tab.h" 23#include "lj_tab.h"
23#include "lj_meta.h" 24#include "lj_meta.h"
@@ -89,7 +90,7 @@ LJLIB_CF(getfenv)
89 cTValue *o = L->base; 90 cTValue *o = L->base;
90 if (!(o < L->top && tvisfunc(o))) { 91 if (!(o < L->top && tvisfunc(o))) {
91 int level = lj_lib_optint(L, 1, 1); 92 int level = lj_lib_optint(L, 1, 1);
92 o = lj_err_getframe(L, level, &level); 93 o = lj_debug_frame(L, level, &level);
93 if (o == NULL) 94 if (o == NULL)
94 lj_err_arg(L, 1, LJ_ERR_INVLVL); 95 lj_err_arg(L, 1, LJ_ERR_INVLVL);
95 } 96 }
@@ -110,7 +111,7 @@ LJLIB_CF(setfenv)
110 setgcref(L->env, obj2gco(t)); 111 setgcref(L->env, obj2gco(t));
111 return 0; 112 return 0;
112 } 113 }
113 o = lj_err_getframe(L, level, &level); 114 o = lj_debug_frame(L, level, &level);
114 if (o == NULL) 115 if (o == NULL)
115 lj_err_arg(L, 1, LJ_ERR_INVLVL); 116 lj_err_arg(L, 1, LJ_ERR_INVLVL);
116 } 117 }