summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
Diffstat (limited to 'lib')
-rw-r--r--lib/BLua.cc68
-rw-r--r--lib/LuaHandle.cc82
2 files changed, 76 insertions, 74 deletions
diff --git a/lib/BLua.cc b/lib/BLua.cc
index e70902b..8aba47e 100644
--- a/lib/BLua.cc
+++ b/lib/BLua.cc
@@ -17,7 +17,7 @@
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*/
-/* $Id: BLua.cc,v 1.31 2005-03-31 15:18:22 pixel Exp $ */
+/* $Id: BLua.cc,v 1.32 2005-10-13 16:00:37 pixel Exp $ */
#include <stdlib.h>
#include "BLua.h"
@@ -27,21 +27,23 @@
#define BUFFERSIZE 2048
#endif
+#undef isnumber
+
extern "C" {
- void do_lua_lock(lua_State * _L) {
+ void do_lua_lock(lua_State * __L) {
Lua * L;
try {
- L = Lua::find(_L);
+ L = Lua::find(__L);
} catch (GeneralException e) {
return;
}
L->lock();
}
- void do_lua_unlock(lua_State * _L) {
+ void do_lua_unlock(lua_State * __L) {
Lua * L;
try {
- L = Lua::find(_L);
+ L = Lua::find(__L);
} catch (GeneralException e) {
return;
}
@@ -71,8 +73,8 @@ class LuaStatics : public Base {
std::map<lua_State *, Lua *> Lua::lualist;
-int LuaStatics::luaerror(lua_State * _L) {
- Lua * L = Lua::find(_L);
+int LuaStatics::luaerror(lua_State * __L) {
+ Lua * L = Lua::find(__L);
L->push_lua_context();
L->showerror();
return 0;
@@ -82,8 +84,8 @@ int LuaStatics::luapanic(lua_State * L) {
return trueluapanic(L);
}
-int LuaStatics::trueluapanic(lua_State * _L) throw (GeneralException) {
- Lua * L = Lua::find(_L);
+int LuaStatics::trueluapanic(lua_State * __L) throw (GeneralException) {
+ Lua * L = Lua::find(__L);
if (L->is_protected())
return 0; // luaerror will get it for us...
L->push_lua_context();
@@ -91,8 +93,8 @@ int LuaStatics::trueluapanic(lua_State * _L) throw (GeneralException) {
throw LuaException("Unprotected error running Lua code, bailing out; except unstable lua environment.");
}
-int LuaStatics::andB(lua_State * _L) {
- Lua * L = Lua::find(_L);
+int LuaStatics::andB(lua_State * __L) {
+ Lua * L = Lua::find(__L);
int n = L->gettop();
Uint32 a, b;
@@ -108,8 +110,8 @@ int LuaStatics::andB(lua_State * _L) {
return 1;
}
-int LuaStatics::orB(lua_State * _L) {
- Lua * L = Lua::find(_L);
+int LuaStatics::orB(lua_State * __L) {
+ Lua * L = Lua::find(__L);
int n = L->gettop();
Uint32 a, b;
@@ -125,8 +127,8 @@ int LuaStatics::orB(lua_State * _L) {
return 1;
}
-int LuaStatics::xorB(lua_State * _L) {
- Lua * L = Lua::find(_L);
+int LuaStatics::xorB(lua_State * __L) {
+ Lua * L = Lua::find(__L);
int n = L->gettop();
Uint32 a, b;
@@ -142,8 +144,8 @@ int LuaStatics::xorB(lua_State * _L) {
return 1;
}
-int LuaStatics::notB(lua_State * _L) {
- Lua * L = Lua::find(_L);
+int LuaStatics::notB(lua_State * __L) {
+ Lua * L = Lua::find(__L);
int n = L->gettop();
Uint32 x;
@@ -158,8 +160,8 @@ int LuaStatics::notB(lua_State * _L) {
return 1;
}
-int LuaStatics::shl(lua_State * _L) {
- Lua * L = Lua::find(_L);
+int LuaStatics::shl(lua_State * __L) {
+ Lua * L = Lua::find(__L);
int n = L->gettop();
Uint32 a, b;
@@ -178,8 +180,8 @@ int LuaStatics::shl(lua_State * _L) {
return 1;
}
-int LuaStatics::shr(lua_State * _L) {
- Lua * L = Lua::find(_L);
+int LuaStatics::shr(lua_State * __L) {
+ Lua * L = Lua::find(__L);
int n = L->gettop();
Uint32 a, b;
@@ -198,8 +200,8 @@ int LuaStatics::shr(lua_State * _L) {
return 1;
}
-int LuaStatics::hex(lua_State * _L) {
- Lua * L = Lua::find(_L);
+int LuaStatics::hex(lua_State * __L) {
+ Lua * L = Lua::find(__L);
int n = L->gettop();
int x;
String r;
@@ -231,7 +233,7 @@ Lua::Lua() : L(lua_open()) {
declarefunc("hex", LuaStatics::hex);
}
-Lua::Lua(lua_State * _L) : L(_L), _protected(false) {
+Lua::Lua(lua_State * __L) : L(__L), _protected(false) {
lualist[L] = this;
lua_atpanic(L, LuaStatics::luapanic);
}
@@ -564,10 +566,10 @@ int Lua::resume(int nresults) {
return lua_resume(L, nresults);
}
-Lua * Lua::find(lua_State * _L) throw (GeneralException) {
+Lua * Lua::find(lua_State * __L) throw (GeneralException) {
std::map<lua_State *, Lua *>::iterator i;
- if ((i = lualist.find(_L)) == lualist.end()) {
+ if ((i = lualist.find(__L)) == lualist.end()) {
throw GeneralException("Unable to find the Lua object for this context");
}
@@ -689,12 +691,12 @@ void LuaObject::pushmeta(Lua * L, const String & s, lua_CFunction f) {
L->setmetatable();
}
-int LuaStatics::callwrap(lua_State * _L, lua_CFunction func) {
- Lua * L = Lua::find(_L);
+int LuaStatics::callwrap(lua_State * __L, lua_CFunction func) {
+ Lua * L = Lua::find(__L);
int n;
try {
- n = func(_L);
+ n = func(__L);
}
catch (LuaException e) {
L->error(String("LuaException: ") + e.GetMsg());
@@ -706,8 +708,8 @@ int LuaStatics::callwrap(lua_State * _L, lua_CFunction func) {
return n;
}
-int LuaStatics::collector(lua_State * _L) {
- Lua * L = Lua::find(_L);
+int LuaStatics::collector(lua_State * __L) {
+ Lua * L = Lua::find(__L);
void ** u = (void **) L->touserdata();
bool * obj = (bool *) (u + 1);
// printm(M_INFO, "From LUA: collecting object\n");
@@ -723,8 +725,8 @@ int LuaStatics::collector(lua_State * _L) {
return 0;
}
-int LuaStatics::destructor(lua_State * _L) {
- Lua * L = Lua::find(_L);
+int LuaStatics::destructor(lua_State * __L) {
+ Lua * L = Lua::find(__L);
Base * b = (Base *) LuaObject::getme(L);
delete b;
L->push("__obj");
diff --git a/lib/LuaHandle.cc b/lib/LuaHandle.cc
index 40b24be..bcade6f 100644
--- a/lib/LuaHandle.cc
+++ b/lib/LuaHandle.cc
@@ -17,7 +17,7 @@
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*/
-/* $Id: LuaHandle.cc,v 1.15 2004-11-27 21:46:04 pixel Exp $ */
+/* $Id: LuaHandle.cc,v 1.16 2005-10-13 16:00:37 pixel Exp $ */
#include "LuaHandle.h"
@@ -95,8 +95,8 @@ void LuaBuffer::pushconstruct(Lua * L) {
L->declarefunc("Buffer", sLuaHandle::newbuffer);
}
-int sLuaHandle::newinput(lua_State * _L) {
- Lua * L = Lua::find(_L);
+int sLuaHandle::newinput(lua_State * __L) {
+ Lua * L = Lua::find(__L);
int n = L->gettop();
if ((n != 1) || !L->isstring()) {
@@ -109,8 +109,8 @@ int sLuaHandle::newinput(lua_State * _L) {
return 1;
}
-int sLuaHandle::newoutput(lua_State * _L) {
- Lua * L = Lua::find(_L);
+int sLuaHandle::newoutput(lua_State * __L) {
+ Lua * L = Lua::find(__L);
int n = L->gettop();
if ((n != 1) || !L->isstring()) {
@@ -123,8 +123,8 @@ int sLuaHandle::newoutput(lua_State * _L) {
return 1;
}
-int sLuaHandle::newbuffer(lua_State * _L) {
- Lua * L = Lua::find(_L);
+int sLuaHandle::newbuffer(lua_State * __L) {
+ Lua * L = Lua::find(__L);
int n = L->gettop();
bool seekable = false;
@@ -141,8 +141,8 @@ int sLuaHandle::newbuffer(lua_State * _L) {
return 1;
}
-int sLuaHandle::read(lua_State * _L) {
- Lua * L = Lua::find(_L);
+int sLuaHandle::read(lua_State * __L) {
+ Lua * L = Lua::find(__L);
int n = L->gettop(), i;
size_t t;
ssize_t r;
@@ -150,7 +150,7 @@ int sLuaHandle::read(lua_State * _L) {
Byte * b;
if (n == 1) {
- return readstring(_L);
+ return readstring(__L);
}
if ((n != 2) || !L->isnumber()) {
@@ -178,8 +178,8 @@ int sLuaHandle::read(lua_State * _L) {
return 2;
}
-int sLuaHandle::readstring(lua_State * _L) {
- Lua * L = Lua::find(_L);
+int sLuaHandle::readstring(lua_State * __L) {
+ Lua * L = Lua::find(__L);
int n = L->gettop(), i;
Handle * h;
String r;
@@ -209,8 +209,8 @@ int sLuaHandle::readU32(lua_State * L) {
return read(L, U32);
}
-int sLuaHandle::write(lua_State * _L) {
- Lua * L = Lua::find(_L);
+int sLuaHandle::write(lua_State * __L) {
+ Lua * L = Lua::find(__L);
int n = L->gettop(), i;
size_t t;
ssize_t r;
@@ -218,7 +218,7 @@ int sLuaHandle::write(lua_State * _L) {
Byte * b;
if ((n == 2) && L->isstring()) {
- return writestring(_L);
+ return writestring(__L);
}
if ((n != 3) || !L->isnumber() || !L->istable(2)) {
@@ -245,8 +245,8 @@ int sLuaHandle::write(lua_State * _L) {
return 1;
}
-int sLuaHandle::writestring(lua_State * _L) {
- Lua * L = Lua::find(_L);
+int sLuaHandle::writestring(lua_State * __L) {
+ Lua * L = Lua::find(__L);
int n = L->gettop(), i;
Handle * h;
String r;
@@ -275,8 +275,8 @@ int sLuaHandle::writeU32(lua_State * L) {
return write(L, U32);
}
-int sLuaHandle::read(lua_State * _L, int t) {
- Lua * L = Lua::find(_L);
+int sLuaHandle::read(lua_State * __L, int t) {
+ Lua * L = Lua::find(__L);
int n = L->gettop();
lua_Number r;
Handle * h;
@@ -298,8 +298,8 @@ int sLuaHandle::read(lua_State * _L, int t) {
return 1;
}
-int sLuaHandle::write(lua_State * _L, int t) {
- Lua * L = Lua::find(_L);
+int sLuaHandle::write(lua_State * __L, int t) {
+ Lua * L = Lua::find(__L);
int n = L->gettop();
lua_Number r;
Handle * h;
@@ -328,8 +328,8 @@ int sLuaHandle::copyto(lua_State * L) {
return copy(L, to);
}
-int sLuaHandle::copy(lua_State * _L, int dir) {
- Lua * L = Lua::find(_L);
+int sLuaHandle::copy(lua_State * __L, int dir) {
+ Lua * L = Lua::find(__L);
int n = L->gettop();
lua_Number r;
Handle * s, * d;
@@ -380,8 +380,8 @@ int sLuaHandle::canwatch(lua_State * L) {
return getcaps(L, capcanwatch);
}
-int sLuaHandle::getcaps(lua_State * _L, int cap) {
- Lua * L = Lua::find(_L);
+int sLuaHandle::getcaps(lua_State * __L, int cap) {
+ Lua * L = Lua::find(__L);
int n = L->gettop();
bool r;
Handle * h;
@@ -434,8 +434,8 @@ int sLuaHandle::flush(lua_State * L) {
return action(L, Aflush);
}
-int sLuaHandle::action(lua_State * _L, int act) {
- Lua * L = Lua::find(_L);
+int sLuaHandle::action(lua_State * __L, int act) {
+ Lua * L = Lua::find(__L);
int n = L->gettop();
int r = 1;
Handle * h;
@@ -459,8 +459,8 @@ int sLuaHandle::action(lua_State * _L, int act) {
return r;
}
-int sLuaHandle::setz(lua_State * _L) {
- Lua * L = Lua::find(_L);
+int sLuaHandle::setz(lua_State * __L) {
+ Lua * L = Lua::find(__L);
int n = L->gettop();
int z = 9;
Handle * h;
@@ -480,8 +480,8 @@ int sLuaHandle::setz(lua_State * _L) {
return 0;
}
-int sLuaHandle::seek(lua_State * _L) {
- Lua * L = Lua::find(_L);
+int sLuaHandle::seek(lua_State * __L) {
+ Lua * L = Lua::find(__L);
int n = L->gettop();
off_t off;
int wheel;
@@ -506,8 +506,8 @@ int sLuaHandle::seek(lua_State * _L) {
return 1;
}
-int sLuaHandle::bindex(lua_State * _L) {
- Lua * L = Lua::find(_L);
+int sLuaHandle::bindex(lua_State * __L) {
+ Lua * L = Lua::find(__L);
int n = L->gettop();
const Buffer * b;
@@ -527,8 +527,8 @@ int sLuaHandle::bindex(lua_State * _L) {
return 1;
}
-int sLuaHandle::bnewindex(lua_State * _L) {
- Lua * L = Lua::find(_L);
+int sLuaHandle::bnewindex(lua_State * __L) {
+ Lua * L = Lua::find(__L);
int n = L->gettop();
Buffer * b;
@@ -552,8 +552,8 @@ int sLuaHandle::bnewindex(lua_State * _L) {
return 0;
}
-int sLuaHandle::btell(lua_State * _L) {
- Lua * L = Lua::find(_L);
+int sLuaHandle::btell(lua_State * __L) {
+ Lua * L = Lua::find(__L);
int n = L->gettop();
Buffer * h;
@@ -566,8 +566,8 @@ int sLuaHandle::btell(lua_State * _L) {
return 1;
}
-int sLuaHandle::bseek(lua_State * _L) {
- Lua * L = Lua::find(_L);
+int sLuaHandle::bseek(lua_State * __L) {
+ Lua * L = Lua::find(__L);
int n = L->gettop();
off_t off;
int wheel;
@@ -592,8 +592,8 @@ int sLuaHandle::bseek(lua_State * _L) {
return 1;
}
-int sLuaHandle::exists(lua_State * _L) {
- Lua * L = Lua::find(_L);
+int sLuaHandle::exists(lua_State * __L) {
+ Lua * L = Lua::find(__L);
int n = L->gettop();
bool r = true;
generated by cgit v1.2.3 (git 2.39.1) at 2024-12-24 17:39:14 +0000