(root)/
gawk-5.2.2/
missing_d/
system.c
       1  /* system.c --- replacement system() for systems missing one
       2  
       3     Copyright (C) 1986, 1988, 1989, 1991, 2023 the Free Software Foundation, Inc.
       4  
       5     This program is free software; you can redistribute it and/or modify
       6     it under the terms of the GNU General Public License as published by
       7     the Free Software Foundation; either version 2, or (at your option)
       8     any later version.
       9  
      10     This program is distributed in the hope that it will be useful,
      11     but WITHOUT ANY WARRANTY; without even the implied warranty of
      12     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
      13     GNU General Public License for more details.
      14  
      15     You should have received a copy of the GNU General Public License
      16     along with this program; if not, write to the Free Software Foundation,
      17     Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.  */
      18  
      19  extern void fatal();
      20  
      21  int
      22  system(const char *s)
      23  {
      24  	fatal("system() not supported on this system");
      25  	return 0;
      26  }