#include <SWI-Prolog.h>

int
main(int argc, char **argv)
{ if ( !PL_initialise(argc, argv) )
    PL_halt(1);

  return PL_toplevel();
}