/* Eigenmath by G. Weigt

	The starting point for a symbolic computation is in run.cpp

	Input is scanned in scan.cpp

	Expression evaluation is done in eval.cpp

	Output is formatted in display.cpp
*/

#include "defs.h"
#include "console.h"

void
clear_term()
{
}

extern void eval_print(void);

void
eval_display(void)
{
	eval_print();
}

void
printstr(char *s)
{
	Console_Output((const unsigned char *)s);
}

extern int test_flag;

#define OUTBUFLEN 10000
int out_count;

void
printchar(int c)
{
	unsigned char tmp[2];
	tmp[0] = (unsigned char)c;
	tmp[1] = (unsigned char)'\0';
	Console_Output(tmp);
}

void
printchar_nowrap(int c)
{
	printchar(c);
}

void
eval_draw(void)
{
	push(symbol(NIL));
}

void
eval_sample(void)
{
}