File: c_io.c

package info (click to toggle)
gprbuild 2011-2
  • links: PTS, VCS
  • area: main
  • in suites: wheezy
  • size: 10,396 kB
  • sloc: ada: 94,726; sh: 2,818; xml: 2,225; makefile: 471; ansic: 240; cpp: 89; fortran: 62; asm: 27
file content (34 lines) | stat: -rw-r--r-- 755 bytes parent folder | download | duplicates (3)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
void bug_putstring(
  const char *buf,
  int len
)
{
   int i;
   char c;

   for (i=0; i<len; i++) {
    
     c = buf[i];
     asm volatile( "li 10,0x020          /* Code for .OUTCHR */\n\
                    mr 3, %0             /* character */\n\
                    sc"                  /* Call EPPCBUG */
 	:: "b" (c) : "3", "10" );
   }
}

void putchar(
  const char c
)
{
   asm volatile( "li 10,0x020          /* Code for .OUTCHR */\n\
                  mr 3, %0             /* character */\n\
                  sc"                  /* Call EPPCBUG */
		 :: "b" (c) : "3", "10" );
}

void bug_putnl(void)
{
   asm volatile( "li 10,0x026          /* Code for .PCRLF */\n\
                  sc"                  /* Call EPPCBUG */
		 ::: "10" );
}