blob: 442658649b237e7d24ccfe8fa531279a4dc03af4 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
|
/* Copyright(c) 1986 Association of Universities for Research in Astronomy Inc.
*/
#define import_spp
#define import_libc
#define import_knames
#include <iraf.h>
/* SYSTEM -- Send a command to the host system. OK is returned if the command
** executes properly, else a positive integer error code identifying the error
** which occurred.
*/
int
system (
char *cmd /* command to be sent to host system */
)
{
PKCHAR nullstr[1];
XINT status;
nullstr[0] = EOS;
ZOSCMD (cmd, nullstr, nullstr, nullstr, &status);
return ((int) status);
}
|
