/*
 * PCN System
 * Author:      Steve Tuecke
 *              Argonne National Laboratory
 *
 * Please see the DISCLAIMER file in the top level directory of the
 * distribution regarding the provisions under which this software
 * is distributed.
 *
 * stdio_putchar.c
 */

#include "stdio_internal.h"

void _p_stdio_putchar(c, status)
int_t *c;
int_t *status;
{
    char ch = (char) *c;
    *status = (int_t) putchar(ch); 
}