summaryrefslogtreecommitdiff
path: root/os2
diff options
context:
space:
mode:
authorIlya Zakharevich <ilya@math.berkeley.edu>2003-09-18 12:01:06 -0700
committerJarkko Hietaniemi <jhi@iki.fi>2003-09-19 04:48:52 +0000
commitbad9d6ae0684d3030e7202e9754e1f5c44ec753a (patch)
tree8bcc483958e02b50a2298518b2cc7fa23b675853 /os2
parent2c227d667bcf910e7fef2feea02fec7046f3cb13 (diff)
downloadperl-bad9d6ae0684d3030e7202e9754e1f5c44ec753a.tar.gz
getsysinfo() broken on OS/2
Message-ID: <20030919020106.GA22511@math.berkeley.edu> p4raw-id: //depot/perl@21286
Diffstat (limited to 'os2')
-rw-r--r--os2/os2.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/os2/os2.c b/os2/os2.c
index d5c3e2ee25..88b5f5d1e5 100644
--- a/os2/os2.c
+++ b/os2/os2.c
@@ -782,7 +782,7 @@ get_sysinfo(ULONG pid, ULONG flags)
return 0;
}
psi = (PQTOPLEVEL)pbuffer;
- if (psi && pid && pid != psi->procdata->pid) {
+ if (psi && pid && psi->procdata && pid != psi->procdata->pid) {
Safefree(psi);
Perl_croak_nocontext("panic: wrong pid in sysinfo");
}