1 files changed, 120 insertions, 0 deletions
diff --git a/squirrel_3_0_1_stable/sqrat/sqrat/sqratConst.h b/squirrel_3_0_1_stable/sqrat/sqrat/sqratConst.h
new file mode 100644
index 000000000..9a52b1fed
--- /dev/null
+++ b/squirrel_3_0_1_stable/sqrat/sqrat/sqratConst.h
@@ -0,0 +1,120 @@
+//
+// SqratConst: Constant and Enumeration Binding
+//
+
+//
+// Copyright (c) 2009 Brandon Jones
+//
+// 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.
+//
+
+#if !defined(_SCRAT_CONST_H_)
+#define _SCRAT_CONST_H_
+
+#include <squirrel.h>
+#include <string.h>
+
+#include "sqratObject.h"
+
+namespace Sqrat {
+
+//
+// Enumerations
+//
+
+class Enumeration : public Object {
+public:
+    Enumeration(HSQUIRRELVM v = DefaultVM::Get(), bool createTable = true) : Object(v, false) {
+        if(createTable) {
+            sq_newtable(vm);
+            sq_getstackobj(vm,-1,&obj);
+            sq_addref(vm, &obj);
+            sq_pop(vm,1);
+        }
+    }
+
+    //
+    // Bind Constants
+    //
+
+    virtual Enumeration& Const(const SQChar* name, const int val) {
+        BindValue<int>(name, val, false);
+        return *this;
+    }
+
+    virtual Enumeration& Const(const SQChar* name, const float val) {
+        BindValue<float>(name, val, false);
+        return *this;
+    }
+
+    virtual Enumeration& Const(const SQChar* name, const SQChar* val) {
+        BindValue<const SQChar*>(name, val, false);
+        return *this;
+    }
+
+};
+
+//
+// Constants
+//
+
+class ConstTable : public Enumeration {
+public:
+    ConstTable(HSQUIRRELVM v = DefaultVM::Get()) : Enumeration(v, false) {
+        sq_pushconsttable(vm);
+        sq_getstackobj(vm,-1, &obj);
+        sq_pop(v,1); // No addref needed, since the consttable is always around
+    }
+
+    //
+    // Bind Constants
+    //
+
+    virtual ConstTable& Const(const SQChar* name, const int val) {
+        Enumeration::Const(name, val);
+        return *this;
+    }
+
+    virtual ConstTable& Const(const SQChar* name, const float val) {
+        Enumeration::Const(name, val);
+        return *this;
+    }
+
+    virtual ConstTable& Const(const SQChar* name, const SQChar* val) {
+        Enumeration::Const(name, val);
+        return *this;
+    }
+
+    //
+    // Bind Enumerations
+    //
+
+    ConstTable& Enum(const SQChar* name, Enumeration& en) {
+        sq_pushobject(vm, GetObject());
+        sq_pushstring(vm, name, -1);
+        sq_pushobject(vm, en.GetObject());
+        sq_newslot(vm, -3, false);
+        sq_pop(vm,1); // pop table
+        return *this;
+    }
+};
+}
+
+#endif