Array length: Difference between revisions

Line 1,495:
<lang futurebasic>
local fn DoIt
CFArrayRef fruits = @[@"apples",@"bananas",@"cherries",@"dates",@"grapes",@"lemon",@"lime",@"orange",@"peach",@"pear",@"pineapple",@"strawberries",@"watermelon"]
CFStringRef fruit
CFIndex ubound = fn CFArrayGetCount( fruits )
CFIndexNSUInteger i = 0
 
for i = 0 to ubound - 1
for fruit printfin @"Fruit %ld = %@",i,fruits[i]
printf @"Fruit %ld = %@", i, fruit : i++
next
end fn
6

edits