From 010bbd9d9c8c6e7d38062df79e886466de5a835a Mon Sep 17 00:00:00 2001
From: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date: Thu, 21 Nov 2002 14:46:16 -0200
Subject: simpler definition for incr_top

---
 ldo.h | 10 +++-------
 1 file changed, 3 insertions(+), 7 deletions(-)

diff --git a/ldo.h b/ldo.h
index 5ee9e2ef..d2787b29 100644
--- a/ldo.h
+++ b/ldo.h
@@ -1,5 +1,5 @@
 /*
-** $Id: ldo.h,v 1.51 2002/08/07 14:35:55 roberto Exp roberto $
+** $Id: ldo.h,v 1.52 2002/09/02 20:00:41 roberto Exp roberto $
 ** Stack and Call structure of Lua
 ** See Copyright Notice in lua.h
 */
@@ -13,17 +13,13 @@
 #include "lzio.h"
 
 
-/*
-** macro to increment stack top.
-** There must be always an empty slot at the L->stack.top
-*/
-#define incr_top(L) \
-	{if (L->top >= L->stack_last) luaD_growstack(L, 1); L->top++;}
 
 #define luaD_checkstack(L,n)	\
   if ((char *)L->stack_last - (char *)L->top <= (n)*(int)sizeof(TObject)) \
     luaD_growstack(L, n)
 
+#define incr_top(L) {luaD_checkstack(L,1); L->top++;}
+
 #define savestack(L,p)		((char *)(p) - (char *)L->stack)
 #define restorestack(L,n)	((TObject *)((char *)L->stack + (n)))
 
-- 
cgit v1.2.3-55-g6feb