Fix to some 64-bit compatibility warnings in auto4_perl (note: please cast to size_t before casting to wxThread::ExitCode in the future)

Originally committed to SVN as r1830.
This commit is contained in:
Rodrigo Braz Monteiro 2008-01-24 17:52:46 +00:00
parent 542b8a1a61
commit 6487948d10
1 changed files with 4 additions and 4 deletions

View File

@ -468,12 +468,12 @@ namespace Automation4 {
ExitCode ec = NULL;
switch(type) {
case CALL:
if(sv) ec = (ExitCode)call_sv(sv, flags);
else if(pv) ec = (ExitCode)call_pv(pv, flags);
if(sv) ec = (ExitCode)((size_t)call_sv(sv, flags));
else if(pv) ec = (ExitCode)((size_t)call_pv(pv, flags));
break;
case EVAL:
if(sv) ec = (ExitCode)eval_sv(sv, flags);
else if(pv) ec = (ExitCode)eval_pv(pv, flags);
if(sv) ec = (ExitCode)((size_t)eval_sv(sv, flags));
else if(pv) ec = (ExitCode)((size_t)eval_pv(pv, flags));
}
if(SvTRUE(ERRSV)) {