diff options
Diffstat (limited to 'tolua++-1.0.93/src/bin/lua/define.lua')
-rw-r--r-- | tolua++-1.0.93/src/bin/lua/define.lua | 63 |
1 files changed, 0 insertions, 63 deletions
diff --git a/tolua++-1.0.93/src/bin/lua/define.lua b/tolua++-1.0.93/src/bin/lua/define.lua deleted file mode 100644 index 96a28d878..000000000 --- a/tolua++-1.0.93/src/bin/lua/define.lua +++ /dev/null @@ -1,63 +0,0 @@ --- tolua: define class --- Written by Waldemar Celes --- TeCGraf/PUC-Rio --- Jul 1998 --- $Id: define.lua,v 1.2 1999/07/28 22:21:08 celes Exp $ - --- This code is free software; you can redistribute it and/or modify it. --- The software provided hereunder is on an "as is" basis, and --- the author has no obligation to provide maintenance, support, updates, --- enhancements, or modifications. - - --- Define class --- Represents a numeric const definition --- The following filds are stored: --- name = constant name -classDefine = { - name = '', -} -classDefine.__index = classDefine -setmetatable(classDefine,classFeature) - --- register define -function classDefine:register (pre) - if not self:check_public_access() then - return - end - - pre = pre or '' - output(pre..'tolua_constant(tolua_S,"'..self.lname..'",'..self.name..');') -end - --- Print method -function classDefine:print (ident,close) - print(ident.."Define{") - print(ident.." name = '"..self.name.."',") - print(ident.." lname = '"..self.lname.."',") - print(ident.."}"..close) -end - - --- Internal constructor -function _Define (t) - setmetatable(t,classDefine) - t:buildnames() - - if t.name == '' then - error("#invalid define") - end - - append(t) - return t -end - --- Constructor --- Expects a string representing the constant name -function Define (n) - return _Define{ - name = n - } -end - - |