Artifact 4f589c53ba274923e311ca228f29638ebe1f1ebc:
- File sdl2/image-functions.ss — part of check-in [0e3c53a30e] at 2018-01-08 17:10:49 on branch trunk — SDL_Image added (user: ovenpasta@users.noreply.github.com size: 3616)
0000: 28 64 65 66 69 6e 65 2d 73 64 6c 2d 66 75 6e 63 (define-sdl-func 0010: 20 28 2a 20 73 64 6c 2d 76 65 72 73 69 6f 6e 2d (* sdl-version- 0020: 74 29 20 69 6d 67 2d 6c 69 6e 6b 65 64 2d 76 65 t) img-linked-ve 0030: 72 73 69 6f 6e 20 28 29 20 22 49 4d 47 5f 4c 69 rsion () "IMG_Li 0040: 6e 6b 65 64 5f 56 65 72 73 69 6f 6e 22 29 0a 28 nked_Version").( 0050: 64 65 66 69 6e 65 2d 73 64 6c 2d 66 75 6e 63 20 define-sdl-func 0060: 69 6e 74 20 69 6d 67 2d 69 6e 69 74 20 28 28 66 int img-init ((f 0070: 6c 61 67 73 20 69 6e 74 29 29 20 22 49 4d 47 5f lags int)) "IMG_ 0080: 49 6e 69 74 22 29 0a 28 64 65 66 69 6e 65 2d 73 Init").(define-s 0090: 64 6c 2d 66 75 6e 63 20 76 6f 69 64 20 69 6d 67 dl-func void img 00a0: 2d 71 75 69 74 20 28 29 20 22 49 4d 47 5f 51 75 -quit () "IMG_Qu 00b0: 69 74 22 29 0a 28 64 65 66 69 6e 65 2d 73 64 6c it").(define-sdl 00c0: 2d 66 75 6e 63 20 28 2a 20 73 64 6c 2d 73 75 72 -func (* sdl-sur 00d0: 66 61 63 65 2d 74 29 20 69 6d 67 2d 6c 6f 61 64 face-t) img-load 00e0: 2d 74 79 70 65 64 2d 72 77 20 28 28 73 72 63 20 -typed-rw ((src 00f0: 28 2a 20 73 64 6c 2d 72 77 2d 6f 70 73 2d 74 29 (* sdl-rw-ops-t) 0100: 29 20 28 66 72 65 65 73 72 63 20 69 6e 74 29 20 ) (freesrc int) 0110: 28 74 79 70 65 20 73 74 72 69 6e 67 29 29 20 22 (type string)) " 0120: 49 4d 47 5f 4c 6f 61 64 54 79 70 65 64 5f 52 57 IMG_LoadTyped_RW 0130: 22 29 0a 28 64 65 66 69 6e 65 2d 73 64 6c 2d 66 ").(define-sdl-f 0140: 75 6e 63 20 28 2a 20 73 64 6c 2d 73 75 72 66 61 unc (* sdl-surfa 0150: 63 65 2d 74 29 20 69 6d 67 2d 6c 6f 61 64 20 28 ce-t) img-load ( 0160: 28 66 69 6c 65 20 73 74 72 69 6e 67 29 29 20 22 (file string)) " 0170: 49 4d 47 5f 4c 6f 61 64 22 29 0a 28 64 65 66 69 IMG_Load").(defi 0180: 6e 65 2d 73 64 6c 2d 66 75 6e 63 20 28 2a 20 73 ne-sdl-func (* s 0190: 64 6c 2d 73 75 72 66 61 63 65 2d 74 29 20 69 6d dl-surface-t) im 01a0: 67 2d 6c 6f 61 64 2d 72 77 20 28 28 73 72 63 20 g-load-rw ((src 01b0: 28 2a 20 73 64 6c 2d 72 77 2d 6f 70 73 2d 74 29 (* sdl-rw-ops-t) 01c0: 29 20 28 66 72 65 65 73 72 63 20 69 6e 74 29 29 ) (freesrc int)) 01d0: 20 22 49 4d 47 5f 4c 6f 61 64 5f 52 57 22 29 0a "IMG_Load_RW"). 01e0: 28 64 65 66 69 6e 65 2d 73 64 6c 2d 66 75 6e 63 (define-sdl-func 01f0: 20 28 2a 20 73 64 6c 2d 74 65 78 74 75 72 65 2d (* sdl-texture- 0200: 74 29 20 69 6d 67 2d 6c 6f 61 64 2d 74 65 78 74 t) img-load-text 0210: 75 72 65 20 28 28 72 65 6e 64 65 72 65 72 20 28 ure ((renderer ( 0220: 2a 20 73 64 6c 2d 72 65 6e 64 65 72 65 72 2d 74 * sdl-renderer-t 0230: 29 29 20 28 66 69 6c 65 20 73 74 72 69 6e 67 29 )) (file string) 0240: 29 20 22 49 4d 47 5f 4c 6f 61 64 54 65 78 74 75 ) "IMG_LoadTextu 0250: 72 65 22 29 0a 28 64 65 66 69 6e 65 2d 73 64 6c re").(define-sdl 0260: 2d 66 75 6e 63 20 28 2a 20 73 64 6c 2d 74 65 78 -func (* sdl-tex 0270: 74 75 72 65 2d 74 29 20 69 6d 67 2d 6c 6f 61 64 ture-t) img-load 0280: 2d 74 65 78 74 75 72 65 2d 72 77 20 28 28 72 65 -texture-rw ((re 0290: 6e 64 65 72 65 72 20 28 2a 20 73 64 6c 2d 72 65 nderer (* sdl-re 02a0: 6e 64 65 72 65 72 2d 74 29 29 20 28 73 72 63 20 nderer-t)) (src 02b0: 28 2a 20 73 64 6c 2d 72 77 2d 6f 70 73 2d 74 29 (* sdl-rw-ops-t) 02c0: 29 20 28 66 72 65 65 73 72 63 20 69 6e 74 29 29 ) (freesrc int)) 02d0: 20 22 49 4d 47 5f 4c 6f 61 64 54 65 78 74 75 72 "IMG_LoadTextur 02e0: 65 5f 52 57 22 29 0a 28 64 65 66 69 6e 65 2d 73 e_RW").(define-s 02f0: 64 6c 2d 66 75 6e 63 20 28 2a 20 73 64 6c 2d 74 dl-func (* sdl-t 0300: 65 78 74 75 72 65 2d 74 29 20 69 6d 67 2d 6c 6f exture-t) img-lo 0310: 61 64 2d 74 65 78 74 75 72 65 2d 74 79 70 65 64 ad-texture-typed 0320: 2d 72 77 20 28 28 72 65 6e 64 65 72 65 72 20 28 -rw ((renderer ( 0330: 2a 20 73 64 6c 2d 72 65 6e 64 65 72 65 72 2d 74 * sdl-renderer-t 0340: 29 29 20 28 73 72 63 20 28 2a 20 73 64 6c 2d 72 )) (src (* sdl-r 0350: 77 2d 6f 70 73 2d 74 29 29 20 28 66 72 65 65 73 w-ops-t)) (frees 0360: 72 63 20 69 6e 74 29 20 28 74 79 70 65 20 73 74 rc int) (type st 0370: 72 69 6e 67 29 29 20 22 49 4d 47 5f 4c 6f 61 64 ring)) "IMG_Load 0380: 54 65 78 74 75 72 65 54 79 70 65 64 5f 52 57 22 TextureTyped_RW" 0390: 29 0a 28 64 65 66 69 6e 65 2d 73 64 6c 2d 66 75 ).(define-sdl-fu 03a0: 6e 63 20 69 6e 74 20 69 6d 67 2d 69 73 2d 69 63 nc int img-is-ic 03b0: 6f 20 28 28 73 72 63 20 28 2a 20 73 64 6c 2d 72 o ((src (* sdl-r 03c0: 77 2d 6f 70 73 2d 74 29 29 29 20 22 49 4d 47 5f w-ops-t))) "IMG_ 03d0: 69 73 49 43 4f 22 29 0a 28 64 65 66 69 6e 65 2d isICO").(define- 03e0: 73 64 6c 2d 66 75 6e 63 20 69 6e 74 20 69 6d 67 sdl-func int img 03f0: 2d 69 73 2d 63 75 72 20 28 28 73 72 63 20 28 2a -is-cur ((src (* 0400: 20 73 64 6c 2d 72 77 2d 6f 70 73 2d 74 29 29 29 sdl-rw-ops-t))) 0410: 20 22 49 4d 47 5f 69 73 43 55 52 22 29 0a 28 64 "IMG_isCUR").(d 0420: 65 66 69 6e 65 2d 73 64 6c 2d 66 75 6e 63 20 69 efine-sdl-func i 0430: 6e 74 20 69 6d 67 2d 69 73 2d 62 6d 70 20 28 28 nt img-is-bmp (( 0440: 73 72 63 20 28 2a 20 73 64 6c 2d 72 77 2d 6f 70 src (* sdl-rw-op 0450: 73 2d 74 29 29 29 20 22 49 4d 47 5f 69 73 42 4d s-t))) "IMG_isBM 0460: 50 22 29 0a 28 64 65 66 69 6e 65 2d 73 64 6c 2d P").(define-sdl- 0470: 66 75 6e 63 20 69 6e 74 20 69 6d 67 2d 69 73 2d func int img-is- 0480: 67 69 66 20 28 28 73 72 63 20 28 2a 20 73 64 6c gif ((src (* sdl 0490: 2d 72 77 2d 6f 70 73 2d 74 29 29 29 20 22 49 4d -rw-ops-t))) "IM 04a0: 47 5f 69 73 47 49 46 22 29 0a 28 64 65 66 69 6e G_isGIF").(defin 04b0: 65 2d 73 64 6c 2d 66 75 6e 63 20 69 6e 74 20 69 e-sdl-func int i 04c0: 6d 67 2d 69 73 2d 6a 70 67 20 28 28 73 72 63 20 mg-is-jpg ((src 04d0: 28 2a 20 73 64 6c 2d 72 77 2d 6f 70 73 2d 74 29 (* sdl-rw-ops-t) 04e0: 29 29 20 22 49 4d 47 5f 69 73 4a 50 47 22 29 0a )) "IMG_isJPG"). 04f0: 28 64 65 66 69 6e 65 2d 73 64 6c 2d 66 75 6e 63 (define-sdl-func 0500: 20 69 6e 74 20 69 6d 67 2d 69 73 2d 6c 62 6d 20 int img-is-lbm 0510: 28 28 73 72 63 20 28 2a 20 73 64 6c 2d 72 77 2d ((src (* sdl-rw- 0520: 6f 70 73 2d 74 29 29 29 20 22 49 4d 47 5f 69 73 ops-t))) "IMG_is 0530: 4c 42 4d 22 29 0a 28 64 65 66 69 6e 65 2d 73 64 LBM").(define-sd 0540: 6c 2d 66 75 6e 63 20 69 6e 74 20 69 6d 67 2d 69 l-func int img-i 0550: 73 2d 70 63 78 20 28 28 73 72 63 20 28 2a 20 73 s-pcx ((src (* s 0560: 64 6c 2d 72 77 2d 6f 70 73 2d 74 29 29 29 20 22 dl-rw-ops-t))) " 0570: 49 4d 47 5f 69 73 50 43 58 22 29 0a 28 64 65 66 IMG_isPCX").(def 0580: 69 6e 65 2d 73 64 6c 2d 66 75 6e 63 20 69 6e 74 ine-sdl-func int 0590: 20 69 6d 67 2d 69 73 2d 70 6e 67 20 28 28 73 72 img-is-png ((sr 05a0: 63 20 28 2a 20 73 64 6c 2d 72 77 2d 6f 70 73 2d c (* sdl-rw-ops- 05b0: 74 29 29 29 20 22 49 4d 47 5f 69 73 50 4e 47 22 t))) "IMG_isPNG" 05c0: 29 0a 28 64 65 66 69 6e 65 2d 73 64 6c 2d 66 75 ).(define-sdl-fu 05d0: 6e 63 20 69 6e 74 20 69 6d 67 2d 69 73 2d 70 6e nc int img-is-pn 05e0: 6d 20 28 28 73 72 63 20 28 2a 20 73 64 6c 2d 72 m ((src (* sdl-r 05f0: 77 2d 6f 70 73 2d 74 29 29 29 20 22 49 4d 47 5f w-ops-t))) "IMG_ 0600: 69 73 50 4e 4d 22 29 0a 28 64 65 66 69 6e 65 2d isPNM").(define- 0610: 73 64 6c 2d 66 75 6e 63 20 69 6e 74 20 69 6d 67 sdl-func int img 0620: 2d 69 73 2d 74 69 66 20 28 28 73 72 63 20 28 2a -is-tif ((src (* 0630: 20 73 64 6c 2d 72 77 2d 6f 70 73 2d 74 29 29 29 sdl-rw-ops-t))) 0640: 20 22 49 4d 47 5f 69 73 54 49 46 22 29 0a 28 64 "IMG_isTIF").(d 0650: 65 66 69 6e 65 2d 73 64 6c 2d 66 75 6e 63 20 69 efine-sdl-func i 0660: 6e 74 20 69 6d 67 2d 69 73 2d 78 63 66 20 28 28 nt img-is-xcf (( 0670: 73 72 63 20 28 2a 20 73 64 6c 2d 72 77 2d 6f 70 src (* sdl-rw-op 0680: 73 2d 74 29 29 29 20 22 49 4d 47 5f 69 73 58 43 s-t))) "IMG_isXC 0690: 46 22 29 0a 28 64 65 66 69 6e 65 2d 73 64 6c 2d F").(define-sdl- 06a0: 66 75 6e 63 20 69 6e 74 20 69 6d 67 2d 69 73 2d func int img-is- 06b0: 78 70 6d 20 28 28 73 72 63 20 28 2a 20 73 64 6c xpm ((src (* sdl 06c0: 2d 72 77 2d 6f 70 73 2d 74 29 29 29 20 22 49 4d -rw-ops-t))) "IM 06d0: 47 5f 69 73 58 50 4d 22 29 0a 28 64 65 66 69 6e G_isXPM").(defin 06e0: 65 2d 73 64 6c 2d 66 75 6e 63 20 69 6e 74 20 69 e-sdl-func int i 06f0: 6d 67 2d 69 73 2d 78 76 20 28 28 73 72 63 20 28 mg-is-xv ((src ( 0700: 2a 20 73 64 6c 2d 72 77 2d 6f 70 73 2d 74 29 29 * sdl-rw-ops-t)) 0710: 29 20 22 49 4d 47 5f 69 73 58 56 22 29 0a 28 64 ) "IMG_isXV").(d 0720: 65 66 69 6e 65 2d 73 64 6c 2d 66 75 6e 63 20 69 efine-sdl-func i 0730: 6e 74 20 69 6d 67 2d 69 73 2d 77 65 62 70 20 28 nt img-is-webp ( 0740: 28 73 72 63 20 28 2a 20 73 64 6c 2d 72 77 2d 6f (src (* sdl-rw-o 0750: 70 73 2d 74 29 29 29 20 22 49 4d 47 5f 69 73 57 ps-t))) "IMG_isW 0760: 45 42 50 22 29 0a 28 64 65 66 69 6e 65 2d 73 64 EBP").(define-sd 0770: 6c 2d 66 75 6e 63 20 28 2a 20 73 64 6c 2d 73 75 l-func (* sdl-su 0780: 72 66 61 63 65 2d 74 29 20 69 6d 67 2d 6c 6f 61 rface-t) img-loa 0790: 64 2d 69 63 6f 2d 72 77 20 28 28 73 72 63 20 28 d-ico-rw ((src ( 07a0: 2a 20 73 64 6c 2d 72 77 2d 6f 70 73 2d 74 29 29 * sdl-rw-ops-t)) 07b0: 29 20 22 49 4d 47 5f 4c 6f 61 64 49 43 4f 5f 52 ) "IMG_LoadICO_R 07c0: 57 22 29 0a 28 64 65 66 69 6e 65 2d 73 64 6c 2d W").(define-sdl- 07d0: 66 75 6e 63 20 28 2a 20 73 64 6c 2d 73 75 72 66 func (* sdl-surf 07e0: 61 63 65 2d 74 29 20 69 6d 67 2d 6c 6f 61 64 2d ace-t) img-load- 07f0: 63 75 72 2d 72 77 20 28 28 73 72 63 20 28 2a 20 cur-rw ((src (* 0800: 73 64 6c 2d 72 77 2d 6f 70 73 2d 74 29 29 29 20 sdl-rw-ops-t))) 0810: 22 49 4d 47 5f 4c 6f 61 64 43 55 52 5f 52 57 22 "IMG_LoadCUR_RW" 0820: 29 0a 28 64 65 66 69 6e 65 2d 73 64 6c 2d 66 75 ).(define-sdl-fu 0830: 6e 63 20 28 2a 20 73 64 6c 2d 73 75 72 66 61 63 nc (* sdl-surfac 0840: 65 2d 74 29 20 69 6d 67 2d 6c 6f 61 64 2d 62 6d e-t) img-load-bm 0850: 70 2d 72 77 20 28 28 73 72 63 20 28 2a 20 73 64 p-rw ((src (* sd 0860: 6c 2d 72 77 2d 6f 70 73 2d 74 29 29 29 20 22 49 l-rw-ops-t))) "I 0870: 4d 47 5f 4c 6f 61 64 42 4d 50 5f 52 57 22 29 0a MG_LoadBMP_RW"). 0880: 28 64 65 66 69 6e 65 2d 73 64 6c 2d 66 75 6e 63 (define-sdl-func 0890: 20 28 2a 20 73 64 6c 2d 73 75 72 66 61 63 65 2d (* sdl-surface- 08a0: 74 29 20 69 6d 67 2d 6c 6f 61 64 2d 67 69 66 2d t) img-load-gif- 08b0: 72 77 20 28 28 73 72 63 20 28 2a 20 73 64 6c 2d rw ((src (* sdl- 08c0: 72 77 2d 6f 70 73 2d 74 29 29 29 20 22 49 4d 47 rw-ops-t))) "IMG 08d0: 5f 4c 6f 61 64 47 49 46 5f 52 57 22 29 0a 28 64 _LoadGIF_RW").(d 08e0: 65 66 69 6e 65 2d 73 64 6c 2d 66 75 6e 63 20 28 efine-sdl-func ( 08f0: 2a 20 73 64 6c 2d 73 75 72 66 61 63 65 2d 74 29 * sdl-surface-t) 0900: 20 69 6d 67 2d 6c 6f 61 64 2d 6a 70 67 2d 72 77 img-load-jpg-rw 0910: 20 28 28 73 72 63 20 28 2a 20 73 64 6c 2d 72 77 ((src (* sdl-rw 0920: 2d 6f 70 73 2d 74 29 29 29 20 22 49 4d 47 5f 4c -ops-t))) "IMG_L 0930: 6f 61 64 4a 50 47 5f 52 57 22 29 0a 28 64 65 66 oadJPG_RW").(def 0940: 69 6e 65 2d 73 64 6c 2d 66 75 6e 63 20 28 2a 20 ine-sdl-func (* 0950: 73 64 6c 2d 73 75 72 66 61 63 65 2d 74 29 20 69 sdl-surface-t) i 0960: 6d 67 2d 6c 6f 61 64 2d 6c 62 6d 2d 72 77 20 28 mg-load-lbm-rw ( 0970: 28 73 72 63 20 28 2a 20 73 64 6c 2d 72 77 2d 6f (src (* sdl-rw-o 0980: 70 73 2d 74 29 29 29 20 22 49 4d 47 5f 4c 6f 61 ps-t))) "IMG_Loa 0990: 64 4c 42 4d 5f 52 57 22 29 0a 28 64 65 66 69 6e dLBM_RW").(defin 09a0: 65 2d 73 64 6c 2d 66 75 6e 63 20 28 2a 20 73 64 e-sdl-func (* sd 09b0: 6c 2d 73 75 72 66 61 63 65 2d 74 29 20 69 6d 67 l-surface-t) img 09c0: 2d 6c 6f 61 64 2d 70 63 78 2d 72 77 20 28 28 73 -load-pcx-rw ((s 09d0: 72 63 20 28 2a 20 73 64 6c 2d 72 77 2d 6f 70 73 rc (* sdl-rw-ops 09e0: 2d 74 29 29 29 20 22 49 4d 47 5f 4c 6f 61 64 50 -t))) "IMG_LoadP 09f0: 43 58 5f 52 57 22 29 0a 28 64 65 66 69 6e 65 2d CX_RW").(define- 0a00: 73 64 6c 2d 66 75 6e 63 20 28 2a 20 73 64 6c 2d sdl-func (* sdl- 0a10: 73 75 72 66 61 63 65 2d 74 29 20 69 6d 67 2d 6c surface-t) img-l 0a20: 6f 61 64 2d 70 6e 67 2d 72 77 20 28 28 73 72 63 oad-png-rw ((src 0a30: 20 28 2a 20 73 64 6c 2d 72 77 2d 6f 70 73 2d 74 (* sdl-rw-ops-t 0a40: 29 29 29 20 22 49 4d 47 5f 4c 6f 61 64 50 4e 47 ))) "IMG_LoadPNG 0a50: 5f 52 57 22 29 0a 28 64 65 66 69 6e 65 2d 73 64 _RW").(define-sd 0a60: 6c 2d 66 75 6e 63 20 28 2a 20 73 64 6c 2d 73 75 l-func (* sdl-su 0a70: 72 66 61 63 65 2d 74 29 20 69 6d 67 2d 6c 6f 61 rface-t) img-loa 0a80: 64 2d 70 6e 6d 2d 72 77 20 28 28 73 72 63 20 28 d-pnm-rw ((src ( 0a90: 2a 20 73 64 6c 2d 72 77 2d 6f 70 73 2d 74 29 29 * sdl-rw-ops-t)) 0aa0: 29 20 22 49 4d 47 5f 4c 6f 61 64 50 4e 4d 5f 52 ) "IMG_LoadPNM_R 0ab0: 57 22 29 0a 28 64 65 66 69 6e 65 2d 73 64 6c 2d W").(define-sdl- 0ac0: 66 75 6e 63 20 28 2a 20 73 64 6c 2d 73 75 72 66 func (* sdl-surf 0ad0: 61 63 65 2d 74 29 20 69 6d 67 2d 6c 6f 61 64 2d ace-t) img-load- 0ae0: 74 67 61 2d 72 77 20 28 28 73 72 63 20 28 2a 20 tga-rw ((src (* 0af0: 73 64 6c 2d 72 77 2d 6f 70 73 2d 74 29 29 29 20 sdl-rw-ops-t))) 0b00: 22 49 4d 47 5f 4c 6f 61 64 54 47 41 5f 52 57 22 "IMG_LoadTGA_RW" 0b10: 29 0a 28 64 65 66 69 6e 65 2d 73 64 6c 2d 66 75 ).(define-sdl-fu 0b20: 6e 63 20 28 2a 20 73 64 6c 2d 73 75 72 66 61 63 nc (* sdl-surfac 0b30: 65 2d 74 29 20 69 6d 67 2d 6c 6f 61 64 2d 74 69 e-t) img-load-ti 0b40: 66 2d 72 77 20 28 28 73 72 63 20 28 2a 20 73 64 f-rw ((src (* sd 0b50: 6c 2d 72 77 2d 6f 70 73 2d 74 29 29 29 20 22 49 l-rw-ops-t))) "I 0b60: 4d 47 5f 4c 6f 61 64 54 49 46 5f 52 57 22 29 0a MG_LoadTIF_RW"). 0b70: 28 64 65 66 69 6e 65 2d 73 64 6c 2d 66 75 6e 63 (define-sdl-func 0b80: 20 28 2a 20 73 64 6c 2d 73 75 72 66 61 63 65 2d (* sdl-surface- 0b90: 74 29 20 69 6d 67 2d 6c 6f 61 64 2d 78 63 66 2d t) img-load-xcf- 0ba0: 72 77 20 28 28 73 72 63 20 28 2a 20 73 64 6c 2d rw ((src (* sdl- 0bb0: 72 77 2d 6f 70 73 2d 74 29 29 29 20 22 49 4d 47 rw-ops-t))) "IMG 0bc0: 5f 4c 6f 61 64 58 43 46 5f 52 57 22 29 0a 28 64 _LoadXCF_RW").(d 0bd0: 65 66 69 6e 65 2d 73 64 6c 2d 66 75 6e 63 20 28 efine-sdl-func ( 0be0: 2a 20 73 64 6c 2d 73 75 72 66 61 63 65 2d 74 29 * sdl-surface-t) 0bf0: 20 69 6d 67 2d 6c 6f 61 64 2d 78 70 6d 2d 72 77 img-load-xpm-rw 0c00: 20 28 28 73 72 63 20 28 2a 20 73 64 6c 2d 72 77 ((src (* sdl-rw 0c10: 2d 6f 70 73 2d 74 29 29 29 20 22 49 4d 47 5f 4c -ops-t))) "IMG_L 0c20: 6f 61 64 58 50 4d 5f 52 57 22 29 0a 28 64 65 66 oadXPM_RW").(def 0c30: 69 6e 65 2d 73 64 6c 2d 66 75 6e 63 20 28 2a 20 ine-sdl-func (* 0c40: 73 64 6c 2d 73 75 72 66 61 63 65 2d 74 29 20 69 sdl-surface-t) i 0c50: 6d 67 2d 6c 6f 61 64 2d 78 76 2d 72 77 20 28 28 mg-load-xv-rw (( 0c60: 73 72 63 20 28 2a 20 73 64 6c 2d 72 77 2d 6f 70 src (* sdl-rw-op 0c70: 73 2d 74 29 29 29 20 22 49 4d 47 5f 4c 6f 61 64 s-t))) "IMG_Load 0c80: 58 56 5f 52 57 22 29 0a 28 64 65 66 69 6e 65 2d XV_RW").(define- 0c90: 73 64 6c 2d 66 75 6e 63 20 28 2a 20 73 64 6c 2d sdl-func (* sdl- 0ca0: 73 75 72 66 61 63 65 2d 74 29 20 69 6d 67 2d 6c surface-t) img-l 0cb0: 6f 61 64 2d 77 65 62 70 2d 72 77 20 28 28 73 72 oad-webp-rw ((sr 0cc0: 63 20 28 2a 20 73 64 6c 2d 72 77 2d 6f 70 73 2d c (* sdl-rw-ops- 0cd0: 74 29 29 29 20 22 49 4d 47 5f 4c 6f 61 64 57 45 t))) "IMG_LoadWE 0ce0: 42 50 5f 52 57 22 29 0a 28 64 65 66 69 6e 65 2d BP_RW").(define- 0cf0: 73 64 6c 2d 66 75 6e 63 20 28 2a 20 73 64 6c 2d sdl-func (* sdl- 0d00: 73 75 72 66 61 63 65 2d 74 29 20 69 6d 67 2d 72 surface-t) img-r 0d10: 65 61 64 2d 78 70 6d 2d 66 72 6f 6d 2d 61 72 72 ead-xpm-from-arr 0d20: 61 79 20 28 28 78 70 6d 20 76 6f 69 64 2a 29 29 ay ((xpm void*)) 0d30: 20 22 49 4d 47 5f 52 65 61 64 58 50 4d 46 72 6f "IMG_ReadXPMFro 0d40: 6d 41 72 72 61 79 22 29 0a 28 64 65 66 69 6e 65 mArray").(define 0d50: 2d 73 64 6c 2d 66 75 6e 63 20 69 6e 74 20 69 6d -sdl-func int im 0d60: 67 2d 73 61 76 65 2d 70 6e 67 20 28 28 73 75 72 g-save-png ((sur 0d70: 66 61 63 65 20 28 2a 20 73 64 6c 2d 73 75 72 66 face (* sdl-surf 0d80: 61 63 65 2d 74 29 29 20 28 66 69 6c 65 20 73 74 ace-t)) (file st 0d90: 72 69 6e 67 29 29 20 22 49 4d 47 5f 53 61 76 65 ring)) "IMG_Save 0da0: 50 4e 47 22 29 0a 28 64 65 66 69 6e 65 2d 73 64 PNG").(define-sd 0db0: 6c 2d 66 75 6e 63 20 69 6e 74 20 69 6d 67 2d 73 l-func int img-s 0dc0: 61 76 65 2d 70 6e 67 2d 72 77 20 28 28 73 75 72 ave-png-rw ((sur 0dd0: 66 61 63 65 20 28 2a 20 73 64 6c 2d 73 75 72 66 face (* sdl-surf 0de0: 61 63 65 2d 74 29 29 20 28 64 73 74 20 28 2a 20 ace-t)) (dst (* 0df0: 73 64 6c 2d 72 77 2d 6f 70 73 2d 74 29 29 20 28 sdl-rw-ops-t)) ( 0e00: 66 72 65 65 64 73 74 20 69 6e 74 29 29 20 22 49 freedst int)) "I 0e10: 4d 47 5f 53 61 76 65 50 4e 47 5f 52 57 22 29 0a MG_SavePNG_RW").