summaryrefslogtreecommitdiff
path: root/perl.c
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>2000-05-28 20:35:16 +0000
committerGurusamy Sarathy <gsar@cpan.org>2000-05-28 20:35:16 +0000
commit23da6c43783f76b0a8ab328bffdf5056143cc812 (patch)
treeaab69d00196c72f2c7da5c1767b49997f4308b0f /perl.c
parent985777a996e880e5c56185272852a3da184fcdd4 (diff)
downloadperl-23da6c43783f76b0a8ab328bffdf5056143cc812.tar.gz
OS/2 tweaks for usethreads build (from Rocco Caputo
<troc@netrus.net>) p4raw-id: //depot/perl@6149
Diffstat (limited to 'perl.c')
-rw-r--r--perl.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl.c b/perl.c
index 81287331c0..ff730d7733 100644
--- a/perl.c
+++ b/perl.c
@@ -3264,7 +3264,7 @@ S_init_postdump_symbols(pTHX_ register int argc, register char **argv, register
}
if ((tmpgv = gv_fetchpv("\030",TRUE, SVt_PV)))
#ifdef OS2
- sv_setpv(GvSV(tmpgv), os2_execname());
+ sv_setpv(GvSV(tmpgv), os2_execname(aTHX));
#else
sv_setpv(GvSV(tmpgv),PL_origargv[0]);
#endif