--- ray/src/meta/syscalls.c 2003/02/22 02:07:26 1.1 +++ ray/src/meta/syscalls.c 2003/08/01 14:14:24 1.4 @@ -1,17 +1,15 @@ #ifndef lint -static const char RCSid[] = "$Id: syscalls.c,v 1.1 2003/02/22 02:07:26 greg Exp $"; +static const char RCSid[] = "$Id: syscalls.c,v 1.4 2003/08/01 14:14:24 schorsch Exp $"; #endif /* * System calls for meta-file routines */ - +#include "rtprocess.h" /* getpid() */ +#include "rterror.h" #include "meta.h" - - - FILE * efopen(fname, mode) /* open a file, report errors */ @@ -39,11 +37,9 @@ char *mode; { char *mdir, stemp[MAXFNAME]; -#if UNIX || MAC char *getenv(); if ((mdir = getenv("MDIR")) == NULL) -#endif mdir = MDIR; sprintf(stemp, "%s%s", mdir, fname); @@ -51,23 +47,3 @@ char *mode; } - -#ifdef CPM -getpid() /* for CP/M, get user number */ - -{ - - return(getusr()); - } -#endif - - - -#ifdef MAC -getpid() /* dummy value for MacIntosh */ - -{ - - return(0); - } -#endif