/***********************************************************************
 *
 *	Provide access to some UNIX system calls from Smalltalk.
 *	See up.st for details.
 *
 ***********************************************************************/


/***********************************************************************
 *
 * Copyright (C) 1990, 1991 Free Software Foundation, Inc.
 * Written by Steve Byrne.
 *
 * This file is part of GNU Smalltalk.
 *
 * GNU Smalltalk 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 1, or (at your option) any later 
 * version.
 * 
 * GNU Smalltalk 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
 * GNU Smalltalk; see the file COPYING.  If not, write to the Free Software
 * Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.  
 *
 ***********************************************************************/



extern int getpid(), kill(), killpg(), getpgrp(), setpgrp(), getppid(),
  	   nice(), fork(), vfork(), execve(), execl(), execle(), execlp(),
  	   execvp();

definePidFuncs()
{
  defineCFunc("getpid", getpid);
  defineCFunc("kill", kill);
  defineCFunc("killpg", killpg);
  defineCFunc("getpgrp", getpgrp);
  defineCFunc("setpgrp", setpgrp);
  defineCFunc("getppid", getppid);
  defineCFunc("nice", nice);
  defineCFunc("fork", fork);
  defineCFunc("vfork", vfork);
  defineCFunc("execve", execve);
  defineCFunc("execl", execl);
  defineCFunc("execle", execle);
  defineCFunc("execlp", execlp);
  defineCFunc("execvp", execvp);
}