set the subshell's priority to normal; nice doesn't return a
defined value on all systems. Instead, since emacs_priority gives
the priority that Emacs was nastied to, we can use it to reset the
priority in a straightforward way.
[BSD4_1], [USG], [VMS] (setpriority): Remove dummy and
compatibility definitions of setpriority.
#ifdef subprocesses
close_process_descs (); /* Close Emacs's pipes/ptys */
#endif
- nice (-nice (0)); /* Give the new shell the default piority */
+
+#ifdef PRIO_PROCESS
+ {
+ extern int emacs_priority;
+
+ if (emacs_priority)
+ nice (-emacs_priority);
+ }
+#endif
+
execlp (sh, sh, 0);
write (1, "Can't execute subshell", 22);
_exit (1);
#endif /* not VMS */
\f
#ifdef BSD4_1
-/* VARARGS */
-setpriority ()
-{
- return 0;
-}
-
/*
* Partially emulate 4.2 open call.
* open is defined as this in 4.1.
#endif
-/* Set priority value to PRIO. */
-
-int
-setpriority (which, who, prio)
- int which, who, prio;
-{
- int nice ();
-
- nice (prio - nice (0));
- return (0);
-}
-
#ifndef HAVE_VFORK
/*
ulimit ()
{}
-setpriority ()
-{}
-
setpgrp ()
{}