diff options
| author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2011-06-02 16:31:40 -0300 |
|---|---|---|
| committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2011-06-02 16:31:40 -0300 |
| commit | 3b44821334a1aa387c13eaf3cd23a2344091cbc7 (patch) | |
| tree | 7070ed226b6db26ae82f99d94138465a95b0d7fc /ltests.c | |
| parent | 0214dab989396de05567f293e6aa909ee2ffbac1 (diff) | |
| download | lua-3b44821334a1aa387c13eaf3cd23a2344091cbc7.tar.gz lua-3b44821334a1aa387c13eaf3cd23a2344091cbc7.tar.bz2 lua-3b44821334a1aa387c13eaf3cd23a2344091cbc7.zip | |
stricter control (using tag variants) over closure kinds (Lua x C)
Diffstat (limited to 'ltests.c')
| -rw-r--r-- | ltests.c | 4 |
1 files changed, 2 insertions, 2 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: ltests.c,v 2.117 2011/05/05 16:18:53 roberto Exp roberto $ | 2 | ** $Id: ltests.c,v 2.118 2011/05/25 14:12:28 roberto Exp roberto $ |
| 3 | ** Internal Module for Debugging of the Lua Implementation | 3 | ** Internal Module for Debugging of the Lua Implementation |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -291,7 +291,7 @@ static void checkclosure (global_State *g, Closure *cl) { | |||
| 291 | static int lua_checkpc (pCallInfo ci) { | 291 | static int lua_checkpc (pCallInfo ci) { |
| 292 | if (!isLua(ci)) return 1; | 292 | if (!isLua(ci)) return 1; |
| 293 | else { | 293 | else { |
| 294 | Proto *p = ci_func(ci)->l.p; | 294 | Proto *p = ci_func(ci)->p; |
| 295 | return p->code <= ci->u.l.savedpc && | 295 | return p->code <= ci->u.l.savedpc && |
| 296 | ci->u.l.savedpc <= p->code + p->sizecode; | 296 | ci->u.l.savedpc <= p->code + p->sizecode; |
| 297 | } | 297 | } |