From 1ad50ce4e6ed74c8eeb89a1f2780e6ed58a72b2b Mon Sep 17 00:00:00 2001
From: rubidium <rubidium@openttd.org>
Date: Wed, 25 Feb 2009 01:21:50 +0000
Subject: (svn r15578) -Change: unexternalise squirrel.

---
 src/3rdparty/squirrel/samples/classattributes.nut | 35 +++++++++++++++++++++++
 1 file changed, 35 insertions(+)
 create mode 100644 src/3rdparty/squirrel/samples/classattributes.nut

(limited to 'src/3rdparty/squirrel/samples/classattributes.nut')

diff --git a/src/3rdparty/squirrel/samples/classattributes.nut b/src/3rdparty/squirrel/samples/classattributes.nut
new file mode 100644
index 000000000..01232002c
--- /dev/null
+++ b/src/3rdparty/squirrel/samples/classattributes.nut
@@ -0,0 +1,35 @@
+class Foo {
+	//constructor
+	constructor(a)
+	{
+		testy = ["stuff",1,2,3];
+	}
+	//attributes of PrintTesty
+	</ test = "freakin attribute"/>
+	function PrintTesty()
+	{
+		foreach(i,val in testy)
+		{
+			::print("idx = "+i+" = "+val+" \n");
+		}
+	}
+	//attributes of testy
+	</ flippy = 10 , second = [1,2,3] />
+	testy = null;
+
+}
+
+foreach(member,val in Foo)
+{
+	::print(member+"\n");
+	local attr;
+	if((attr = Foo.getattributes(member)) != null) {
+		foreach(i,v in attr)
+		{
+			::print("\t"+i+" = "+(typeof v)+"\n");
+		}
+	}
+	else {
+		::print("\t<no attributes>\n")
+	}
+}
-- 
cgit v1.2.3-54-g00ecf