Forse l'algoritmo stesso non è così oscuro, ma chi può nominare un'implementazione che viene effettivamente utilizzata nella pratica? Io posso!
TIGCC (un compilatore basato su GCC per calcolatrici grafiche TI-89/92 / V200) utilizza l'ordinamento Shell per l' qsort
implementazione nella sua libreria standard:
__ATTR_LIB_C__ void qsort(void *list, short num_items, short size, compare_t cmp_func)
{
unsigned short gap,byte_gap,i,j;
char *p,*a,*b,temp;
for (gap=((unsigned short)num_items)>>1; gap>0; gap>>=1) // Yes, this is not a quicksort,
{ // but works fast enough...
byte_gap=gap*(unsigned short)size;
for(i=byte_gap; i<((unsigned short)num_items)*(unsigned short)size; i+=size)
for(p=(char*)list+i-byte_gap; p>=(char*)list; p-= byte_gap)
{
a=p; b=p+byte_gap;
if(cmp_func(a,b)<=0) break;
for(j=size;j;j--)
temp=*a, *a++=*b, *b++=temp;
}
}
}
L'ordinamento della shell è stato scelto a favore di quicksort per mantenere basse le dimensioni del codice. Sebbene la complessità asintotica sia peggiore, la TI-89 non ha molta RAM (190 KB, meno la dimensione del programma e la dimensione totale di qualsiasi variabile non archiviata), quindi è abbastanza sicuro presumere che il numero di elementi sarà sotto.
Un'implementazione più veloce è stata scritta dopo che mi sono lamentato che era troppo lento in un programma che stavo scrivendo. Utilizza dimensioni di spazio migliori, insieme a ottimizzazioni dell'assemblaggio. Può essere trovato qui: qsort.c