diff options
author | Ilya Zakharevich <ilya@math.berkeley.edu> | 1997-12-13 13:09:15 -0500 |
---|---|---|
committer | Malcolm Beattie <mbeattie@sable.ox.ac.uk> | 1997-12-17 12:02:03 +0000 |
commit | dd96f567babd77c258fd51112ff376f11f0b32ac (patch) | |
tree | 25be9a2f30132eaa9bf9f5a5a2cafb22b3630ea3 /os2/OS2/REXX/REXX.xs | |
parent | 414017bba678bf057e68f59bd92234bf578ec54e (diff) | |
download | perl-dd96f567babd77c258fd51112ff376f11f0b32ac.tar.gz |
Threading patches for OS/2 (missing files taken from previous patch):
Subject: Re: 5.004_55: OS/2 patches again
p4raw-id: //depot/perl@371
Diffstat (limited to 'os2/OS2/REXX/REXX.xs')
-rw-r--r-- | os2/OS2/REXX/REXX.xs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/os2/OS2/REXX/REXX.xs b/os2/OS2/REXX/REXX.xs index df7646c42e..43c92c8b46 100644 --- a/os2/OS2/REXX/REXX.xs +++ b/os2/OS2/REXX/REXX.xs @@ -46,6 +46,7 @@ static long incompartment; static SV* exec_in_REXX(char *cmd, char * handlerName, RexxFunctionHandler *handler) { + dTHR; HMODULE hRexx, hRexxAPI; BYTE buf[200]; LONG APIENTRY (*pRexxStart) (LONG, PRXSTRING, PSZ, PRXSTRING, |