Fix redefinition of qsort_s.

blitz.mod/blitz_array.c

@@ -378,7 +378,7 @@ static void IDENT( TYPE *lo,TYPE *hi ){\
 #undef LESSTHAN
 #define LESSTHAN(X,Y) (*(X)<*(Y))
 QSORTARRAY( unsigned char,_qsort_b )
-QSORTARRAY( unsigned short,qsort_s )
+QSORTARRAY( unsigned short,_qsort_s )
 QSORTARRAY( int,qsort_i )
 QSORTARRAY( unsigned int,qsort_u )
 QSORTARRAY( BBInt64,qsort_l );
@@ -421,7 +421,7 @@ void bbArraySort( BBArray *arr,int ascending ){
 	if( ascending ){
 		switch( arr->type[0] ){
 		case 'b':_qsort_b( (unsigned char*)p,(unsigned char*)p+n );break;
-		case 's':qsort_s( (unsigned short*)p,(unsigned short*)p+n );break;
+		case 's':_qsort_s( (unsigned short*)p,(unsigned short*)p+n );break;
 		case 'i':qsort_i( (int*)p,(int*)p+n );break;
 		case 'u':qsort_u( (unsigned int*)p,(unsigned int*)p+n );break;
 		case 'l':qsort_l( (BBInt64*)p,(BBInt64*)p+n );break;