equal
deleted
inserted
replaced
187 function Surface2Tex(surf: PSDL_Surface; enableClamp: boolean): PTexture; |
187 function Surface2Tex(surf: PSDL_Surface; enableClamp: boolean): PTexture; |
188 procedure FreeTexture(tex: PTexture); |
188 procedure FreeTexture(tex: PTexture); |
189 function toPowerOf2(i: Longword): Longword; inline; |
189 function toPowerOf2(i: Longword): Longword; inline; |
190 function DecodeBase64(s: shortstring): shortstring; |
190 function DecodeBase64(s: shortstring): shortstring; |
191 function doSurfaceConversion(tmpsurf: PSDL_Surface): PSDL_Surface; |
191 function doSurfaceConversion(tmpsurf: PSDL_Surface): PSDL_Surface; |
192 function endian(independent: LongWord): LongWord; |
192 function endian(independent: LongWord): LongWord; inline; |
193 {$IFDEF DEBUGFILE} |
193 {$IFDEF DEBUGFILE} |
194 procedure AddFileLog(s: shortstring); |
194 procedure AddFileLog(s: shortstring); |
195 (* function RectToStr(Rect: TSDL_Rect): shortstring; *) |
195 (* function RectToStr(Rect: TSDL_Rect): shortstring; *) |
196 {$ENDIF} |
196 {$ENDIF} |
197 procedure MakeScreenshot(filename: shortstring); |
197 procedure MakeScreenshot(filename: shortstring); |
681 end; |
681 end; |
682 |
682 |
683 exit(tmpsurf); |
683 exit(tmpsurf); |
684 end; |
684 end; |
685 |
685 |
686 function endian(independent: LongWord): LongWord; |
686 function endian(independent: LongWord): LongWord; inline; |
687 begin |
687 begin |
688 {$IFDEF ENDIAN_LITTLE} |
688 {$IFDEF ENDIAN_LITTLE} |
689 endian:= independent; |
689 endian:= independent; |
690 {$ELSE} |
690 {$ELSE} |
691 endian:= (((independent and $FF000000) shr 24) or |
691 endian:= (((independent and $FF000000) shr 24) or |