MaskRay/hsnippet — comment on commit c33dd14dce10af7c259181b9529d26fb1986dfe5
File: sort/QuickSort.hs line 7
By tusooa:

sub sort ()
{
if (@_ == 0)
{
return ();
}
else
{
my $first = shift;
my @prev = grep { $_ < $first } @_;
my @rest = grep { $_ > $first } @_;
return (@prev, $first, @rest);
}
}