Imported Upstream version 2.9.0
[debian/cc1111] / support / regression / ports / ds390 / support.c
1 /*-------------------------------------------------------------------------
2   support.c - startup for regression tests with uCsim
3   
4    Copied from tinibios.c, which was written By - Johan Knol, johan.knol@iduna.nl
5     
6    This program is free software; you can redistribute it and/or modify it
7    under the terms of the GNU General Public License as published by the
8    Free Software Foundation; either version 2, or (at your option) any
9    later version.
10
11    This program is distributed in the hope that it will be useful,
12    but WITHOUT ANY WARRANTY; without even the implied warranty of
13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14    GNU General Public License for more details.
15    
16    You should have received a copy of the GNU General Public License
17    along with this program; if not, write to the Free Software
18    Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
19
20    In other words, you are welcome to use, share and improve this program.
21    You are forbidden to forbid anyone else to use, share and improve
22    what you give them.   Help stamp out software-hoarding!
23 -------------------------------------------------------------------------*/
24
25 #include <tinibios.h>
26
27 void
28 _putchar (char c)
29 {
30   Serial0PutChar (c);
31 }
32
33 void
34 _initEmu (void)
35 {
36 }
37
38 void
39 _exitEmu (void)
40 {
41   Serial0PutChar (' '); /* wait for the last character to be transmitted */
42                        /* before hitting the breakpoint */
43   * (char idata *) 0 = * (char xdata *) 0x7654;
44 }
45