TList objects and SortList weirdness

'a data structure used to map entites to y locations
'it is adaptive in that most recently moved entites are at the top
'hence statics float to the bottom
'it doesnt need to be sorted, thus giving better performance than a standard list
Type TAdaptiveEntityMap
	'an array of lists, representing each y location
	Field map:TList[]
	
	'creates a new map
	Function construct:TAdaptiveEntityMap(mapSize:Int)
		Local temp:TAdaptiveEntityMap = New TAdaptiveEntityMap
		temp.map = New TList[mapSize]
		For Local i:Int = 0 To mapSize - 1
			temp.map[i] = New TList
		Next
		Return temp
	End Function
	
	'gets a list for a given y value, this can be used for iterating through
	Method getList:TList(val:Int)
		Return map[val]
	End Method
	
	'gets a certain entity out of the map, then retruns it
	Method removeEntity:TEntity(e:TEntity)
		map[e.yLocation].Remove(e)
	End Method
	
	'adds a given entity (e) to the map
	Method addEntity(e:TEntity)
		'addfirst is important, it forms the "adaptive" part of this data structure
		'it ensures recently moves entites are always near the front
		map[e.yLocation].AddFirst(e)
	End Method
EndType

Type TInt Final
	Field value:Int
	
	Function Create:TInt(v:Int)
		Local i:TInt = New TInt
		i.value = v
		Return i
	End Function
	
	Method ToString:String()
		Return String(value)
	End Method
	
	Method Compare:Int(withObject:Object)
		Local other:TInt = TInt(withObject)
		If Not other Then Return Super.Compare(withObject)
		If Self.value > other.value Then Return 1
		If Self.value < other.value Then Return -1
		Return 0
	End Method
End Type