RosettaCodeData/Task/Associative-array-Iteration/FutureBasic/associative-array-iteration-3.basic

14 lines
256 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
void local fn DoIt
CFDictionaryRef dict = @{@"A":@"Alpha", @"B":@"Bravo", @"C":@"Charlie", @"D":@"Delta"}
CFArrayRef keys = fn DictionaryAllKeys( dict )
CFStringRef key
for key in keys
print key, dict[key]
next
end fn
fn DoIt
HandleEvents