aboutsummaryrefslogtreecommitdiff
path: root/src/linda.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/linda.c')
-rw-r--r--src/linda.c9
1 files changed, 5 insertions, 4 deletions
diff --git a/src/linda.c b/src/linda.c
index ee60ebc..4d1fa9f 100644
--- a/src/linda.c
+++ b/src/linda.c
@@ -31,6 +31,7 @@ THE SOFTWARE.
31*/ 31*/
32 32
33#include <stdlib.h> 33#include <stdlib.h>
34#include <assert.h>
34 35
35#include "threading.h" 36#include "threading.h"
36#include "compat.h" 37#include "compat.h"
@@ -171,7 +172,7 @@ LUAG_FUNC( linda_send)
171 Keeper* K = which_keeper( linda->U->keepers, LINDA_KEEPER_HASHSEED( linda)); 172 Keeper* K = which_keeper( linda->U->keepers, LINDA_KEEPER_HASHSEED( linda));
172 lua_State* KL = K ? K->L : NULL; // need to do this for 'STACK_CHECK' 173 lua_State* KL = K ? K->L : NULL; // need to do this for 'STACK_CHECK'
173 if( KL == NULL) return 0; 174 if( KL == NULL) return 0;
174 STACK_CHECK( KL); 175 STACK_CHECK( KL, 0);
175 for( ;;) 176 for( ;;)
176 { 177 {
177 if( s != NULL) 178 if( s != NULL)
@@ -832,7 +833,7 @@ static void* linda_id( lua_State* L, DeepOp op_)
832 case eDO_metatable: 833 case eDO_metatable:
833 { 834 {
834 835
835 STACK_CHECK( L); 836 STACK_CHECK( L, 0);
836 lua_newtable( L); 837 lua_newtable( L);
837 // metatable is its own index 838 // metatable is its own index
838 lua_pushvalue( L, -1); 839 lua_pushvalue( L, -1);
@@ -892,10 +893,10 @@ static void* linda_id( lua_State* L, DeepOp op_)
892 893
893 // some constants 894 // some constants
894 lua_pushliteral( L, BATCH_SENTINEL); 895 lua_pushliteral( L, BATCH_SENTINEL);
895 lua_setfield(L, -2, "batched"); 896 lua_setfield( L, -2, "batched");
896 897
897 push_unique_key( L, NIL_SENTINEL); 898 push_unique_key( L, NIL_SENTINEL);
898 lua_setfield(L, -2, "null"); 899 lua_setfield( L, -2, "null");
899 900
900 STACK_END( L, 1); 901 STACK_END( L, 1);
901 return NULL; 902 return NULL;