Sort Xml list

This thread was "imported" from the old forums -- most, if not all, code seems to have disappeared. But here are the sort functions I posted:

function sortXML(source:XML, elementName:Object, fieldName:Object,

options:Object = null):XML

{

     // list of elements we're going to sort

     var list:XMLList=source.elements("*").(name()==elementName);

     // list of elements not included in the sort -

     // we place these back into the source node at the end

     var excludeList:XMLList=source.elements("*").(name()!=elementName);

     list= sortXMLList(list,fieldName,options);

     list += excludeList;

     source.setChildren(list);

     return source;

}

function sortXMLList(list:XMLList, fieldName:Object, options:Object =

null):XMLList

{

     var arr:Array = new Array();

     var ch:XML;

     for each(ch in list)

     {

           arr.push(ch);

     }

     var resultArr:Array = fieldName==null ?

           options==null ? arr.sort() :arr.sort(options)

           : arr.sortOn(fieldName, options);

     var result:XMLList = new XMLList();

     for(var i:int=0; i<resultArr.length; i++)

     {

           result += resultArr;

     }

     return result;

}