ghcjs-base-0.8.0.0: jsbits/animationFrame.js

//#OPTIONS: CPP
function h$animationFrameCancel(h) {
    if(h.handle) window.cancelAnimationFrame(h.handle);
    if(h.callback) {
        h$release(h.callback)
        h.callback = null;
    }
}

function h$animationFrameRequest(h) {
    h.handle = window.requestAnimationFrame(function(ts) {
        var cb = h.callback;
        if(cb) {
	        h$release(cb);
	        h.callback = null;
	        cb(ts);
        }
    });
}