View difference between Paste ID: taHyKDKP and 2qPybHqp

 --DOCS AT http://pastebin.com/kiwbk2Ju
 
 local classes={}
 local objects={}
 
 --Objects/proxies
 
 function wOOPupdate()
 	for i,v in pairs(objects) do
 		for _,v2 in pairs(v[2]) do
 			if tostring(v2)=="wOOPevent" then
 				v2.update(v[2])
 			end
 		end
 	end
 end
 
 local function functionToTable(tab)
 	local mt={}
 	mt.__call=
 	function(a,...)
 		local prevSelf=self
 		self=tab
 		local src=a.func
 		local ret={pcall(src,...)}
 		if not ret[1] then
 			assert(pcall(src))
 		end
 		table.remove(ret,1)
 		self=prevSelf
 		return unpack(ret)
 	end
 	for i,v in pairs(tab) do
 		if type(v)=="function" then
 			local oldV=v
 			tab[i]={func=oldV}
 			setmetatable(tab[i],mt)
 		end
 	end
 end
 
 local function createProxy(o,omt)
 	for i,v in pairs(o) do
 		if tostring(v)=="wOOPevent" then
-		elseif bypassing and ind=="___bypassing" then
+			v.obj=o
-			return tab.___self
+			v.oldSelf=o
 		end
 	end
 	local proxy=newproxy(true)
 	local mt=getmetatable(proxy)
 
 	for i,v in pairs(omt) do
 		mt[i]=v
 	end
 
 	mt.__index=
 	function(tab,ind)
 		if not ind:find("__") then
 			if o[ind]~=nil then
 				return o[ind]
 			else
 				error("Value not found : "..ind)
 			end
 		else
 			error("Private value : "..ind)
 		end
 	end
 
 	mt.__newindex=
 	function(tab,ind,val)
 		if not ind:find("_") then
 			if o[ind] then
 				o[ind]=val
 			else
 				error("Value not found : "..ind)
 			end
 		else
 			error("Read only or private value : "..ind)
 		end
 	end
 
 	mt.__metatable=false
 	return proxy
 end
 
 local function newObj(a,...)
 	local arg={...}
 	local o
-	o.___self=o
+
 	if arg[1]=="bypassNewFunc" then
 		o={}
 		class=classes[a] or {}
 	else
 		o=((classes[a]) and classes[a].__settings.new(...) or {})
 		class=classes[a] or {}
 	end
 	local omt={}
 	for i,v in pairs((class.__omt or (classes["base"] or {}))) do
 		omt[i]=v
 	end
 	omt.__index=class
 	setmetatable(o,omt)
 	for i,v in pairs(class) do
 		o[i]=(o[i] or v)
 	end
 	functionToTable(o)
 	local proxy=createProxy(o,omt)
 	table.insert(objects,{proxy,o})
 	return proxy
 end
 
 --Classes
 
 local function newClass(a, ...)
 	arg={...}
 	b=(type(arg[1])=="table" and arg[1] or arg[2])
-	b.extends=newObj(b.extends.className,"bypassNewFunc")
+
 	b.className=a
 	b.name=a.."Obj"
 	local mt=(b.__mt or {})
 	mt.__tostring=function(a) return "Class "..a.className end
 	mt.__call=function(a,...) local arg={...} return newObj(a.className,...) end
 	mt.__concat=function(a,b) return tostring(a)..tostring(b) end
 	if not b.__mt then
 		b.__mt=mt
 	end
 	setmetatable(b, b.__mt)
 	classes[a]=b
 	for i,v in pairs(b.extends) do
 		if not b[i] then
 			b[i]=v
 		end
 	end
 	b.extends=classes[(type(arg[2])=="table" and arg[1] or "base")]
 	_G[a]=b
 end
 
 local function addClassInheritance(name, b)
 	return function(...)
 		newClass(name, b, arg[1])
 	end
 end
 
 local function addClass(name)
 	return function(...)
 		local arg={...}
 		if type(arg[1])=="table" then
 			newClass(name,...)
 		else
 			return addClassInheritance(name,arg[1])
 		end
 	end
 end
 
 function class(name)
 	return addClass(name)
 end
 
-	className="base",
+
 
 class "base"
 {
-}
+
 	function(arg)
 		if self.className==arg then
 			return true
 		elseif self.className~="base" then
 			if self.extends.isA(arg) then
 				return true
 			end
 		else
 			return false
 		end
 	end,
 
 	__settings={new=function(...) return {} end},
 	__omt={__tostring=function(a) return "Object "..a.className end,__concat=function(a,b) return tostring(a)..tostring(b) end},
 	__mt={__tostring=function(a) return "Class "..a.className end}
 }
 
 class "event"
 {
 	__cond=function(newSelf, prevSelf) if newSelf.className=="base" then return true end end,
 	__cb=function() end,
 
 	oldSelf='',
 	obj='',
 
 	update=function(obj)
 		if self.__cond(self.oldSelf,obj) then
 			self.__cb(self.__cond(self.oldSelf,obj))
 		end
 		self.oldSelf=obj
 	end,
 
 	connect=function(func)
 		self.__cb=func
 		self._connected=true
 	end,
 
 	disconnect=function()
 		self.__cb=function() end
 		self._connected=false
 	end,
 
 	__settings=
 	{
 		new=
 		function(newFunc)
 			return({__cond=newFunc})
 		end
 	},
 	__omt={__tostring=function() return 'wOOPevent' end}
 }
 
 wOOPupdate()