From b291e5000612cff5fd9d80fe242236e846c17eb2 Mon Sep 17 00:00:00 2001
From: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date: Wed, 26 Nov 1997 17:40:27 -0200
Subject: extra argument for "assert"

---
 lbuiltin.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'lbuiltin.c')

diff --git a/lbuiltin.c b/lbuiltin.c
index 50183fff..589e591b 100644
--- a/lbuiltin.c
+++ b/lbuiltin.c
@@ -1,5 +1,5 @@
 /*
-** $Id: lbuiltin.c,v 1.8 1997/11/19 17:29:23 roberto Exp roberto $
+** $Id: lbuiltin.c,v 1.9 1997/11/26 18:53:45 roberto Exp roberto $
 ** Built-in functions
 ** See Copyright Notice in lua.h
 */
@@ -213,7 +213,7 @@ static void luaI_assert (void)
 {
   lua_Object p = lua_getparam(1);
   if (p == LUA_NOOBJECT || lua_isnil(p))
-    lua_error("assertion failed!");
+    luaL_verror("assertion failed!  %.100s", luaL_opt_string(2, ""));
 }
 
 
-- 
cgit v1.2.3-55-g6feb