From 79ca66eb673c710432d1f4e51af70730a09a82c8 Mon Sep 17 00:00:00 2001
From: rubidium <rubidium@openttd.org>
Date: Fri, 19 Sep 2014 20:06:51 +0000
Subject: (svn r26853) -Cleanup [Squirrel]: remove some stuff that we never did
 and especially never should use

---
 src/3rdparty/squirrel/samples/list.nut | 39 ----------------------------------
 1 file changed, 39 deletions(-)
 delete mode 100644 src/3rdparty/squirrel/samples/list.nut

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

diff --git a/src/3rdparty/squirrel/samples/list.nut b/src/3rdparty/squirrel/samples/list.nut
deleted file mode 100644
index 8ab1ab517..000000000
--- a/src/3rdparty/squirrel/samples/list.nut
+++ /dev/null
@@ -1,39 +0,0 @@
-/*translation of the list test from The Great Computer Language Shootout
-*/
-
-function compare_arr(a1,a2)
-{
-	foreach(i,val in a1)
-		if(val!=a2[i])return null;
-	return 1;
-}
-
-function test()
-{
-	local size=10000
-	local l1=[]; l1.resize(size);
-	for(local i=0;i<size;i+=1) l1[i]=i;
-	local l2=clone l1;
-	local l3=[]
-
-	l2.reverse();
-	while(l2.len()>0)
-		l3.append(l2.pop());
-	while(l3.len()>0)
-		l2.append(l3.pop());
-	l1.reverse();
-
-	if(compare_arr(l1,l2))
-		return l1.len();
-	return null;
-}
-
-local n = ARGS.len()!=0?ARGS[0].tointeger():1
-for(local i=0;i<n;i+=1)
-	if(!test())
-	{
-		print("failed");
-		return;
-	}
-
-print("oki doki");
-- 
cgit v1.2.3-54-g00ecf