Subversion Repositories shark

Compare Revisions

Ignore whitespace Rev 1123 → Rev 1122

/demos/trunk/bca/bca.c
18,7 → 18,7
* http://shark.sssup.it
*/
 
/* CVS : $Id: bca.c,v 1.4 2003-01-07 17:10:16 pj Exp $ */
/* CVS : $Id: bca.c,v 1.3 2002-11-11 08:15:13 pj Exp $ */
 
/*
* Copyright (C) 2000 Fabio Calabrese <fabiocalabrese77@yahoo.it>
130,7 → 130,7
 
/* Default action for an kern exception is */
kern_cli();
kern_gettime(&t),
ll_gettime(TIME_EXACT, &t),
kern_printf("\nS.Ha.R.K. Exception raised!!!"
"\nTime (s:ns) :%ld:%ld"
"\nException number:%d"
191,6 → 191,8
k.ascii = '4';
keyb_hook(k,decrementa_cannoni_fun);
 
set_exchandler_grx();
 
sys_atrunlevel(my_close, NULL, RUNLEVEL_BEFORE_EXIT);
 
FAB_grx_open(800,600);