/*
 *  SPL - The SPL Programming Language
 *  Copyright (C) 2004, 2005  Clifford Wolf <clifford@clifford.at>
 *
 *  This program is free software; you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation; either version 2 of the License, or
 *  (at your option) any later version.
 *
 *  This program is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License
 *  along with this program; if not, write to the Free Software
 *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 *
 *  c-api-test4.c: Simple test for the compiler interface.
 */

#include <stdio.h>

#include "spl.h"

int main()
{
	struct spl_vm *vm = spl_vm_create();
	struct spl_asm *as = spl_asm_create();

	spl_compiler(as,
		"var x = 23;\n"
		"var y = 42;\n"
		"var z = y - x;\n"
		"debug \"x=$x y=$y z=$z\";\n",
		"<prog>", 0, 0
	);

	spl_asm_add(as, SPL_OP_HALT, 0);

	spl_asm_print(as, 0);
	fflush(stdout);

	struct spl_code *code = spl_asm_dump(as);
	spl_asm_destroy(as);

	struct spl_task *task = spl_task_create(vm, 0);
	spl_task_setcode(task, code);

	while ( task->code && !spl_exec(task) ) {}

	spl_vm_destroy(vm);
	return 0;
}