projects
/
p5sagit/p5-mst-13.2.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
PerlIO_read() can return negative.
[p5sagit/p5-mst-13.2.git]
/
doio.c
diff --git
a/doio.c
b/doio.c
index
1135a62
..
fd5b809
100644
(file)
--- a/
doio.c
+++ b/
doio.c
@@
-1395,11
+1395,13
@@
Perl_my_lstat(pTHX)
return PL_laststatval;
}
+#ifndef OS2
bool
Perl_do_aexec(pTHX_ SV *really, register SV **mark, register SV **sp)
{
return do_aexec5(really, mark, sp, 0, 0);
}
+#endif
bool
Perl_do_aexec5(pTHX_ SV *really, register SV **mark, register SV **sp,