diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2000-11-08 22:42:55 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2000-11-08 22:42:55 +0000 |
| commit | 5dbb2e9334e536644db3f76ee525a94a427d9268 (patch) | |
| tree | 765f265b9222b87d5765ddeaadea8a554285a1c9 /ext | |
| parent | 5d7f827b4f0c7df0cc36ef4dc4a03b79d5f58be0 (diff) | |
| download | perl-5dbb2e9334e536644db3f76ee525a94a427d9268.tar.gz | |
A missing aTHX_.
p4raw-id: //depot/perl@7614
Diffstat (limited to 'ext')
| -rw-r--r-- | ext/IPC/SysV/SysV.xs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/IPC/SysV/SysV.xs b/ext/IPC/SysV/SysV.xs index 38062e028b..4a10eb90e3 100644 --- a/ext/IPC/SysV/SysV.xs +++ b/ext/IPC/SysV/SysV.xs @@ -203,7 +203,7 @@ ftok(path, id) key_t k = ftok(path, id); ST(0) = k == (key_t) -1 ? &PL_sv_undef : sv_2mortal(newSViv(k)); #else - DIE(PL_no_func, "ftok"); + DIE(aTHX_ PL_no_func, "ftok"); #endif int |