void local fn DoIt
  CFDictionaryRef dict = @{@"A":@"Alpha", @"B":@"Bravo", @"C":@"Charlie", @"D":@"Delta"}
  CFArrayRef values = fn DictionaryAllValues( dict )
  CFStringRef value

  for value in values
    print value
  next
end fn

fn DoIt

HandleEvents