SuperStrict

Framework Brl.LinkedList
Import Brl.StandardIO

' create a list to hold some objects
Local list:TList = CreateList()

' add some string objects to the list
ListAddLast(list,"one")
ListAddLast(list,"two")
ListAddLast(list,"three")

' enumerate all the strings in the list
For Local a:String = EachIn list
	Print a
Next