]> pd.if.org Git - pdclib/blob - fputc.c
a89d2984b7ab57cd60ba6a33259eaf094775b14f
[pdclib] / fputc.c
1 // ----------------------------------------------------------------------------
2 // $Id$
3 // ----------------------------------------------------------------------------
4 // Public Domain C Library - http://pdclib.sourceforge.net
5 // This code is Public Domain. Use, modify, and redistribute at will.
6 // ----------------------------------------------------------------------------
7
8 int fputc( int c, FILE * stream ) { /* TODO */ };
9
10 /* PDPC code - unreviewed
11 {
12     char buf[1];
13
14 #ifndef __MVS__
15     stream->quickBin = 0;
16     if ((stream->upto < (stream->endbuf - 2))
17         && (stream->bufTech != _IONBF))
18     {
19         if (stream->textMode)
20         {
21             if (c == '\n')
22             {
23                 if (stream->bufTech == _IOFBF)
24                 {
25                     *stream->upto++ = '\r';
26                     *stream->upto++ = '\n';
27                 }
28                 else
29                 {
30                     buf[0] = (char)c;
31                     if (fwrite(buf, 1, 1, stream) != 1)
32                     {
33                         return (EOF);
34                     }
35                 }
36             }
37             else
38             {
39                 *stream->upto++ = (char)c;
40             }
41         }
42         else
43         {
44             *stream->upto++ = (char)c;
45         }
46     }
47     else
48 #endif
49     {
50         buf[0] = (char)c;
51         if (fwrite(buf, 1, 1, stream) != 1)
52         {
53             return (EOF);
54         }
55     }
56     return (c);
57 }
58 */