added AS library

lib/angelscript/source/as_variablescope.cpp

@@ -0,0 +1,142 @@
+/*
+   AngelCode Scripting Library
+   Copyright (c) 2003-2012 Andreas Jonsson
+
+   This software is provided 'as-is', without any express or implied 
+   warranty. In no event will the authors be held liable for any 
+   damages arising from the use of this software.
+
+   Permission is granted to anyone to use this software for any 
+   purpose, including commercial applications, and to alter it and 
+   redistribute it freely, subject to the following restrictions:
+
+   1. The origin of this software must not be misrepresented; you 
+      must not claim that you wrote the original software. If you use
+      this software in a product, an acknowledgment in the product 
+      documentation would be appreciated but is not required.
+
+   2. Altered source versions must be plainly marked as such, and 
+      must not be misrepresented as being the original software.
+
+   3. This notice may not be removed or altered from any source 
+      distribution.
+
+   The original version of this library can be located at:
+   http://www.angelcode.com/angelscript/
+
+   Andreas Jonsson
+   andreas@angelcode.com
+*/
+
+
+//
+// as_variablescope.cpp
+//
+// A manager class for variable declarations
+//
+
+
+#include "as_config.h"
+
+#ifndef AS_NO_COMPILER
+
+#include "as_variablescope.h"
+
+BEGIN_AS_NAMESPACE
+
+asCVariableScope::asCVariableScope(asCVariableScope *parent)
+{
+	this->parent    = parent;
+	Reset();
+}
+
+asCVariableScope::~asCVariableScope()
+{
+	Reset();
+}
+
+void asCVariableScope::Reset()
+{
+	isBreakScope = false;
+	isContinueScope = false;
+
+	for( asUINT n = 0; n < variables.GetLength(); n++ )
+		if( variables[n] ) 
+		{
+			asDELETE(variables[n],sVariable);
+		}
+	variables.SetLength(0);
+}
+
+int asCVariableScope::DeclareVariable(const char *name, const asCDataType &type, int stackOffset, bool onHeap)
+{
+	// TODO: optimize: Improve linear search
+	// See if the variable is already declared
+	if( strcmp(name, "") != 0 )
+	{
+		for( asUINT n = 0; n < variables.GetLength(); n++ )
+		{
+			if( variables[n]->name == name )
+				return -1;
+		}
+	}
+
+	sVariable *var = asNEW(sVariable);
+	if( var == 0 )
+	{
+		// Out of memory. Return without allocating the var
+		return -2;
+	}
+	var->name           = name;
+	var->type           = type;
+	var->stackOffset    = stackOffset;
+	var->isInitialized  = false;
+	var->isPureConstant = false;
+	var->onHeap         = onHeap;
+
+	// Parameters are initialized
+	if( stackOffset <= 0 )
+		var->isInitialized = true;
+
+	variables.PushLast(var);
+
+	return 0;
+}
+
+sVariable *asCVariableScope::GetVariable(const char *name)
+{
+	// TODO: optimize: Improve linear search
+	// Find the variable
+	for( asUINT n = 0; n < variables.GetLength(); n++ )
+	{
+		if( variables[n]->name == name )
+			return variables[n];
+	}
+
+	if( parent )
+		return parent->GetVariable(name);
+
+	return 0;
+}
+
+sVariable *asCVariableScope::GetVariableByOffset(int offset)
+{
+	// TODO: optimize: Improve linear search
+	// Find the variable
+	for( asUINT n = 0; n < variables.GetLength(); n++ )
+	{
+		if( variables[n]->stackOffset == offset )
+			return variables[n];
+	}
+
+	if( parent )
+		return parent->GetVariableByOffset(offset);
+
+	return 0;
+}
+
+END_AS_NAMESPACE
+
+#endif // AS_NO_COMPILER
+
+