kc3-lang/gnulib/tests/test-closein.c

• Show log

  Commit

• Hash : 87c456bf
  Author :
  Date : 2017-02-15T15:33:17
  

  tests: Adjust to recent SET_BINARY change
  
  * tests/test-binary-io.c (main):
  * tests/test-binary-io.sh: Remove test for SET_BINARY.
  * tests/test-closein.c, tests/test-fflush2.c, tests/test-ftell.c:
  * tests/test-ftello.c, tests/test-nonblocking-pipe-child.c:
  * tests/test-yesno.c: Use set_binary_mode, not SET_BINARY.
  

Download

• tests/test-closein.c

• /* Test of closein module.
     Copyright (C) 2007-2017 Free Software Foundation, Inc.
  
     This program is free software; you can redistribute it and/or modify
     it under the terms of the GNU General Public License as published by
     the Free Software Foundation; either version 3, or (at your option)
     any later version.
  
     This program is distributed in the hope that it will be useful,
     but WITHOUT ANY WARRANTY; without even the implied warranty of
     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
     GNU General Public License for more details.
  
     You should have received a copy of the GNU General Public License
     along with this program; if not, see <http://www.gnu.org/licenses/>.  */
  
  /* Written by Eric Blake.  */
  
  #include <config.h>
  
  #include "closein.h"
  
  #include <stdio.h>
  #include <stdlib.h>
  #include <unistd.h>
  
  #include "binary-io.h"
  #include "ignore-value.h"
  
  /* With no arguments, do nothing.  With arguments, attempt to consume
     first 6 bytes of stdin.  In either case, let exit() take care of
     closing std streams and changing exit status if ferror(stdin).  */
  int
  main (int argc, char **argv)
  {
    char buf[7];
    atexit (close_stdin);
  
    /* close_stdin currently relies on ftell, but mingw ftell is
       unreliable on text mode input.  */
    set_binary_mode (0, O_BINARY);
  
    if (argc > 2)
      close (0);
  
    if (argc > 1)
      ignore_value (fread (buf, 1, 6, stdin));
    return 0;
  }
  

Download