Talk:Sorting algorithms/Strand sort

D Entry

The D entry code (that maybe was written by Fwend) contains one or more bugs, it prints "-1 -1" even if the input contains only one -1.

The linearRemove does sometimes not remove the first item, although "find" and "take" return the correct result. I've posted a workaround but I haven't been able to trace the actual problem. Fwend 16:18, 3 August 2012 (UTC)

I suggest a fuzzy testing to see if your code is correct (this means generating many different random inputs and verifying the output is fully correct). And it's not hard to find bugs in Phobos. Finding and fixing bugs in DMD/Phobos is important. So if you find that the cause is in Phobos, you will avoid some troubles to future D users. Try DList!int([-5, -5, 8]). In programming "don't understand why it doesn't work, but this seems to fix it" is often not enough to remove bugs. The simple fuzzy testing code I've used: <lang d>void main() {

   import std.random, std.conv;

   foreach (_; 0 .. 1000) {
       auto data = new int[uniform(0, 5)];
       foreach (ref x; data)
           x = uniform(-5, 10);
       auto lst = DList!int(data);
       int[] result = strandSort(lst).array();
       int[] sortedData = data.dup.sort().release();
       assert(result == sortedData, text("\n", data, "\n", result, "\n", sortedData));
   }

}</lang>bearophile

Well, I'll give it my best try. In my opinion the problem lies with the removeFront / removeBack functions. They don't set the _first._prev / _last._next pointers to null. The following (adjusted) code seems to work. What do you think? <lang d> void removeFront()

   {
       enforce(_first);
       _first = _first._next;
       if (_first is null)
       {
           _last = null;
       } 
       else 

{

           _first._prev = null;
       }
   }

   void removeBack()
   {
       enforce(_last);
       _last = _last._prev;
       if (_last is null)
       {
           _first = null;
       } 

else {

           _last._next = null;
       }
   }

</lang> Fwend 00:43, 4 August 2012 (UTC)