        sequences libc shuffle alien.c-types system openal math
        namespaces threads shuffle opengl arrays ui.gadgets.worlds
        combinators math.parser ui.gadgets ui.render opengl.gl ui
-       continuations io.files hints combinators.lib sequences.lib ;
+       continuations io.files hints combinators.lib sequences.lib debugger ;
 
 IN: ogg.player
 

    dup player-gadget [
        dup { player-td player-yuv } get-slots theora_decode_YUVout drop
        dup player-rgb over player-yuv yuv>rgb
        dup player-gadget find-world draw-world
    ] when ;

: num-audio-buffers-processed ( player -- player n )

    parse-remaining-headers
    initialize-decoder
    dup player-gadget [ initialize-gui ] when*
    [ decode ] try
    wait-for-sound
    cleanup
    drop ;
