ghcjs-vdom-0.2.0.0: jsbits/vdom.js

#include <ghcjs/rts.h>

/* 
 * global name for the things we need from the virtual-dom library
 */
var h$vdom;

function h$vdomEventCallback(async, action, ev) {
  var a = MK_AP1(action, MK_JSVAL(ev));
  if(async) {
    h$run(a);
  } else {
    h$runSync(a, true);
  }
}

function h$vdomMountComponentCallback(action, mnt, comp) {
  h$run(MK_AP2(action, MK_JSVAL(mnt), MK_JSVAL(comp)));
}

function h$vdomUnmountComponentCallback(action, mnt, node) {
  h$run(MK_AP2(action, MK_JSVAL(mnt), MK_JSVAL(node)));
}