provide sdl-swapbuffers
"sdl.pfo" pfo

load-image

: create-default-blitter
	320 240 sdl-window
	( : blit >i420 sdl-blit ;; 
          : crate-default-blitter ; ) interpret-list ;