#include "foo_stub.h"
#include "RtsAPI.h"

static char* args[] = { "ghcDll" };

StgInt __stdcall call_foo(StgInt a0)
{
  StgInt res;
  startupHaskell(1, args,NULL);
  res = foo(a0);
  shutdownHaskell();
  return res;
}