V10/libF77/notused/outstr_.c

Compare this file to the similar file:
Show the results in this format: 

#include <stdio.h>

/* print a character string */
outstr_(s, n)
register char *s;
register long n;
{
while ( --n >= 0)
	putchar(*s++);
}