From 741ad97e924086e9c2c55d4dcbb2cf1cc429a705 Mon Sep 17 00:00:00 2001
From: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date: Wed, 10 Dec 2014 09:30:51 -0200
Subject: new parameter for testC instruction 'pcall' (error handler)

---
 ltests.c | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/ltests.c b/ltests.c
index 01652d32..03df0d06 100644
--- a/ltests.c
+++ b/ltests.c
@@ -1,5 +1,5 @@
 /*
-** $Id: ltests.c,v 2.198 2014/11/25 14:51:33 roberto Exp roberto $
+** $Id: ltests.c,v 2.199 2014/11/29 17:38:33 roberto Exp roberto $
 ** Internal Module for Debugging of the Lua Implementation
 ** See Copyright Notice in lua.h
 */
@@ -963,10 +963,10 @@ static int checkpanic (lua_State *L) {
 
 
 /*
-** {======================================================
+** {====================================================================
 ** function to test the API with C. It interprets a kind of assembler
 ** language with calls to the API, so the test can be driven by Lua code
-** =======================================================
+** =====================================================================
 */
 
 
@@ -1207,7 +1207,7 @@ static int runC (lua_State *L, lua_State *L1, const char *pc) {
     else if EQ("pcall") {
       int narg = getnum;
       int nres = getnum;
-      status = lua_pcall(L1, narg, nres, 0);
+      status = lua_pcall(L1, narg, nres, getnum);
     }
     else if EQ("pcallk") {
       int narg = getnum;
-- 
cgit v1.2.3-55-g6feb