diff options
Diffstat (limited to 'os2/OS2')
-rw-r--r-- | os2/OS2/PrfDB/PrfDB.xs | 2 | ||||
-rw-r--r-- | os2/OS2/REXX/REXX.xs | 1 |
2 files changed, 2 insertions, 1 deletions
diff --git a/os2/OS2/PrfDB/PrfDB.xs b/os2/OS2/PrfDB/PrfDB.xs index a5b2c89ca6..5465e1d136 100644 --- a/os2/OS2/PrfDB/PrfDB.xs +++ b/os2/OS2/PrfDB/PrfDB.xs @@ -22,7 +22,7 @@ Prf_Get(HINI hini, PSZ app, PSZ key) { if (CheckWinError(PrfQueryProfileSize(hini, app, key, &len))) return &sv_undef; sv = newSVpv("", 0); - SvGROW(sv, len); + SvGROW(sv, len + 1); if (CheckWinError(PrfQueryProfileData(hini, app, key, SvPVX(sv), &len)) || (len == 0 && (app == NULL || key == NULL))) { /* Somewhy needed. */ SvREFCNT_dec(sv); 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, |