#macro forEach(_V, _L)
for i as uinteger = 0 to _L##.count-1
    dim as typeof(*_L##.item) _V = _L##.item[i]
#endMacro

'==========

DeclareList(integer)
dim as integerList myList
myList.add(1)
myList.add(3)
myList.add(5)

foreach(x, myList)
    print x
next

sleep()