OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [newlib-1.17.0/] [libgloss/] [hp74x/] [test.c] - Blame information for rev 840

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 148 jeremybenn
extern int led_putnum();
2
#define DELAY 900000
3
extern char strobe(),putDebugChar(),print(),putnum();
4
extern char foobar();
5
extern char breakpoint();
6
 
7
#define TESTSTUB 1
8
 
9
main()
10
{
11
  unsigned char x;
12
  char buf[20];
13
 
14
#if TESTIO
15
  strobe();
16
  outbyte ('\n');
17
  outbyte ('$');
18
  write (2, "Enter 5 characters... ", 24);
19
  read (0, buf, 5);
20
  print (buf);
21
  print ("\r\n");
22
  strobe ();
23
#endif
24
 
25
#if TESTSTUB
26
  print ("\r\nInit vectors...\r\n");
27
/***  set_debug_traps(); ***/
28
  print ("\r\nSet a breakpoint...\r\n");
29
  handle_exception();
30
/***  breakpoint(); ***/
31
#endif
32
 
33
  print ("\r\nTest foobar\r\n");
34
  foobar();
35
  /* whew, we made it */
36
  print ("\r\nDone...");
37
}
38
 
39
/*
40
 * FIXME: this is only hear so things will link.
41
 */
42
int
43
puts(s)
44
     char *s;
45
{
46
  s++;
47
}

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.