/[gcl]/gcl/o/file.d
ViewVC logotype

Diff of /gcl/o/file.d

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.6 by camm, Sun Feb 3 18:44:08 2002 UTC revision 1.7 by camm, Fri May 24 21:55:19 2002 UTC
# Line 488  BEGIN: Line 488  BEGIN:
488              fflush(stderr);              fflush(stderr);
489            }            }
490            else {            else {
491    #ifdef HAVE_NSOCKET
492            if (GET_STREAM_FLAG(strm,gcl_sm_output))            if (GET_STREAM_FLAG(strm,gcl_sm_output))
493                {  gclFlushSocket(strm);                {  
494                    gclFlushSocket(strm);
495                   /* there are two for one fd so close only one */                   /* there are two for one fd so close only one */
496                    tcpCloseSocket(SOCKET_STREAM_FD(strm));                    tcpCloseSocket(SOCKET_STREAM_FD(strm));
497                 }                 }
498    #endif
499            SOCKET_STREAM_FD(strm)=-1;            SOCKET_STREAM_FD(strm)=-1;
500            }            }
501    
# Line 848  BEGIN: Line 851  BEGIN:
851                          STREAM_FILE_COLUMN(strm)++;                          STREAM_FILE_COLUMN(strm)++;
852                  if (strm->sm.sm_fp == NULL)                  if (strm->sm.sm_fp == NULL)
853                    {                    {
854    #ifdef HAVE_NSOCKET
855                      if (strm->sm.sm_mode == smm_socket && strm->sm.sm_fd>=0)                      if (strm->sm.sm_mode == smm_socket && strm->sm.sm_fd>=0)
856                        putCharGclSocket(strm,c);                        putCharGclSocket(strm,c);
857                      else                      else
858    #endif
859                        if (!GET_STREAM_FLAG(strm,gcl_sm_had_error))                        if (!GET_STREAM_FLAG(strm,gcl_sm_had_error))
860                          closed_stream(strm);                          closed_stream(strm);
861                    } else {                    } else {
# Line 963  BEGIN: Line 968  BEGIN:
968            fflush(strm->sm.sm_fp);            fflush(strm->sm.sm_fp);
969            break;            break;
970          case smm_socket:          case smm_socket:
971    #ifdef HAVE_NSOCKET
972                  if (SOCKET_STREAM_FD(strm) >0)                  if (SOCKET_STREAM_FD(strm) >0)
973                    gclFlushSocket(strm);                    gclFlushSocket(strm);
974                  else                  else
975    #endif
976                    closed_stream(strm);                    closed_stream(strm);
977                  break;                  break;
978          case smm_synonym:          case smm_synonym:

Legend:
Removed from v.1.6  
changed lines
  Added in v.1.7

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26