home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The CDPD Public Domain Collection for CDTV 3
/
CDPDIII.bin
/
pd
/
programming
/
gnusmalltalk
/
examples
/
pids.c
< prev
next >
Wrap
C/C++ Source or Header
|
1992-02-15
|
2KB
|
57 lines
/***********************************************************************
*
* Provide access to some UNIX system calls from Smalltalk.
* See up.st for details.
*
***********************************************************************/
/***********************************************************************
*
* Copyright (C) 1990, 1991, 1992 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);
}