#include <fwd/mod.h>
#include <stdio.h>

long fwdpanic(fwd_extern_args_t args)
{
	assert(args.argc == 1);
	char *str = FWD_ARG_T(args, 0, char *);
	fprintf(stderr, "%s", str);
	exit(1);
	return 0;
}

int fwdopen(fwd_state_t *state)
{
	/** @todo passing around strings might be common enough to warrant its
	 * own type? */
	FWD_REGISTER(state, fwdpanic,
			FWD_VOID, FWD_PTR);
	return 0;
}