Problem reading list

The following code works up until the for-eachin loop.
It doesn't print anything - not even "boo".
It does print plist.(Count) as 2.

Does anyone see anything obvious?
Thanks.

<code>
SuperStrict

Type Coords
Field x%
Field y%
End Type

Global pp:Coords

Global plist:TList 'Define the List
plist = CreateList() 'Create a New List

pp.x = 640 ; pp.y = 512
plist.AddLast(pp)
pp.x = 333 ; pp.y = 444
plist.AddLast(pp)

Print plist.Count()

For Local Z:Coords = EachIn plist
Print Z.x+","+Z.y
Print "boo"
Next

End
<end code>