Change 13636: This time I test compiled. Honest.

[Jarkko Hietaniemi]

Change 13636 by jhi@alpha on 2001/12/12 00:22:16

        This time I test compiled.  Honest.

Affected files ...

.... //depot/perl/beos/beos.c#3 edit

Differences ...

==== //depot/perl/beos/beos.c#3 (text) ====
Index: perl/beos/beos.c
--- perl/beos/beos.c.~1~        Tue Dec 11 17:30:05 2001
+++ perl/beos/beos.c    Tue Dec 11 17:30:05 2001
@@ -1,3 +1,5 @@
+#include "beosish.h"
+
 #undef waitpid
 
 #include <sys/wait.h>
@@ -9,8 +11,8 @@
  * of this, though.) */
 
 pid_t beos_waitpid(pid_t process_id, int *status_location, int options) {
-    pid_t got = waitpid(procedd_is, status_location, options);
+    pid_t got = waitpid(process_id, status_location, options);
     if (status_location)
-        *status_location <<= 8;
+      *status_location <<= 8; /* What about the POSIX low bits? */
     return got;
 }
End of Patch.