From 998fb17fdc150bc9c6b3d8da0dd37dfd1ae7b39a Mon Sep 17 00:00:00 2001
From: Alexander Harkness <bearbin@gmail.com>
Date: Sun, 24 Nov 2013 14:29:35 +0000
Subject: Moved tolua++

---
 tolua++-1.0.93/src/bin/lua/doit.lua | 102 ------------------------------------
 1 file changed, 102 deletions(-)
 delete mode 100644 tolua++-1.0.93/src/bin/lua/doit.lua

(limited to 'tolua++-1.0.93/src/bin/lua/doit.lua')

diff --git a/tolua++-1.0.93/src/bin/lua/doit.lua b/tolua++-1.0.93/src/bin/lua/doit.lua
deleted file mode 100644
index 51dd0cf3c..000000000
--- a/tolua++-1.0.93/src/bin/lua/doit.lua
+++ /dev/null
@@ -1,102 +0,0 @@
--- Generate binding code
--- Written by Waldemar Celes
--- TeCGraf/PUC-Rio
--- Jul 1998
--- Last update: Apr 2003
--- $Id: $
-
-
--- 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.
-
-function parse_extra()
-
-	for k,v in ipairs(_extra_parameters or {}) do
-		
-		local b,e,name,value = string.find(v, "^([^=]*)=(.*)$")
-		if b then
-			_extra_parameters[name] = value
-		else
-			_extra_parameters[v] = true
-		end
-	end
-end
-
-function doit ()
-	-- define package name, if not provided
-	if not flags.n then
-		if flags.f then
-			flags.n = gsub(flags.f,"%..*$","")
-			_,_,flags.n = string.find(flags.n, "([^/\\]*)$")
-		else
-			error("#no package name nor input file provided")
-		end
-	end
-
-	-- parse table with extra paramters
-	parse_extra()
-
-	-- do this after setting the package name
-	if flags['L'] then
-		dofile(flags['L'])
-	end
-
-	-- add cppstring
-	if not flags['S'] then
-		_basic['string'] = 'cppstring'
-		_basic['std::string'] = 'cppstring'
-		_basic['AString'] = 'cppstring'
-		_basic_ctype.cppstring = 'const char*'
-	end
-
-	-- proccess package
-	local p  = Package(flags.n,flags.f)
-
-	if flags.p then
-		return        -- only parse
-	end
-
-	if flags.o then
-		local st,msg = writeto(flags.o)
-		if not st then
-			error('#'..msg)
-		end
-	end
-
-	p:decltype()
-	if flags.P then
-		p:print()
-	else
-		push(p)
-		pre_output_hook(p)
-		pop()
-		p:preamble()
-		p:supcode()
-		push(p)
-		pre_register_hook(p)
-		pop()
-		p:register()
-		push(p)
-		post_output_hook(p)
-		pop()
-	end
-
-	if flags.o then
-		writeto()
-	end
-
-	-- write header file
-	if not flags.P then
-		if flags.H then
-			local st,msg = writeto(flags.H)
-			if not st then
-				error('#'..msg)
-			end
-			p:header()
-			writeto()
-		end
-	end
-end
-
-- 
cgit v1.2.3