gforth/engine/io-nxt.c - diff

Return to io-nxt.c CVS log

Up to [gforth] / gforth / engine

version 1.1, 2007/04/09 22:36:26	version 1.2, 2007/04/22 20:06:26
Line 24	Line 24
#include "config.h"	#include "config.h"
#include "forth.h"	#include "forth.h"
#include "../arch/arm/nxt/AT91SAM7.h"	#include "../arch/arm/nxt/AT91SAM7.h"
	#include "../arch/arm/nxt/bt.h"

long key_avail ()	long key_avail ()
{	{
return 0;	return bt_avail();
}	}

Cell getkey()	Cell getkey()
{	{
return 0;	return bt_getkey();
}	}

int terminal_prepped = 0;	int terminal_prepped = 0;

void prep_terminal ()	void prep_terminal ()
{	{
	aic_initialise();
	interrupts_enable();
	systick_init();
	display_init();
	bt_init();

terminal_prepped = 1;	terminal_prepped = 1;
}	}

Line 49 void deprep_terminal ()	Line 56 void deprep_terminal ()

void emit_char(char x)	void emit_char(char x)
{	{
	bt_send(&x, 1);
	display_char(x);
}	}

void type_chars(char *addr, unsigned int l)	void type_chars(char *addr, unsigned int l)
{	{
	int i;
	bt_send(addr, l);
	for(i=0; i<l; i++)
	display_char(addr[i]);
}	}