RosettaCodeData/Task/Sort-an-integer-array/FutureBasic/sort-an-integer-array.basic

window 1, @"Sort an integer array"

void local fn DoIt
  CFArrayRef array = @[@13,@71,@42,@8,@5,@27]
  array = fn ArraySortedArrayUsingSelector( array, @"compare:" )
  print fn ArrayComponentsJoinedByString( array, @", " )
end fn

fn DoIt

HandleEvents