hedgewars/uMisc.pas
changeset 2705 2b5625c4ec16
parent 2699 249adefa9c1c
child 2715 0e4e0db79e2a
equal deleted inserted replaced
2704:51cda17b7c3b 2705:2b5625c4ec16
   528 begin
   528 begin
   529 	if (tmpsurf^.format^.bitsperpixel = 24) or ((tmpsurf^.format^.bitsperpixel = 32) and (tmpsurf^.format^.rshift > tmpsurf^.format^.bshift)) then
   529 	if (tmpsurf^.format^.bitsperpixel = 24) or ((tmpsurf^.format^.bitsperpixel = 32) and (tmpsurf^.format^.rshift > tmpsurf^.format^.bshift)) then
   530 	begin
   530 	begin
   531 		convertedSurf:= SDL_ConvertSurface(tmpsurf, @conversionFormat, SDL_SWSURFACE);
   531 		convertedSurf:= SDL_ConvertSurface(tmpsurf, @conversionFormat, SDL_SWSURFACE);
   532 		SDL_FreeSurface(tmpsurf);
   532 		SDL_FreeSurface(tmpsurf);
   533 		doSurfaceConversion:= convertedSurf
   533 		exit(convertedSurf);
   534 	end
   534 	end;
   535 	else doSurfaceConversion:= tmpsurf;
   535 
       
   536 	exit(tmpsurf);
   536 end;
   537 end;
   537 
   538 
   538 function endian(independent: LongWord): LongWord;
   539 function endian(independent: LongWord): LongWord;
   539 begin
   540 begin
   540 {$IFDEF ENDIAN_LITTLE}
   541 {$IFDEF ENDIAN_LITTLE}