33 lines
844 B
Diff
33 lines
844 B
Diff
From f9344c91a4ca48288bba30dc94a2d712d0659670 Mon Sep 17 00:00:00 2001
|
|
From: Oleg Nesterov <oleg@redhat.com>
|
|
Date: Wed, 4 Jul 2012 08:21:15 -0700
|
|
Subject: [PATCH] [perl #113980] pp_syscall: "I32 retval" truncates the
|
|
returned value
|
|
|
|
I noticed today that syscall(9, ...) (mmap) doesn't work for me.
|
|
|
|
The problem is obvious, pp_syscall() uses I32 for retval and the
|
|
"long" address doesn't fit into "int".
|
|
|
|
The one-liner below should fix the problem.
|
|
---
|
|
pp_sys.c | 2 +-
|
|
1 file changed, 1 insertion(+), 1 deletion(-)
|
|
|
|
diff --git a/pp_sys.c b/pp_sys.c
|
|
index fb93732..c5d63ac 100644
|
|
--- a/pp_sys.c
|
|
+++ b/pp_sys.c
|
|
@@ -5456,7 +5456,7 @@ PP(pp_syscall)
|
|
register I32 items = SP - MARK;
|
|
unsigned long a[20];
|
|
register I32 i = 0;
|
|
- I32 retval = -1;
|
|
+ IV retval = -1;
|
|
|
|
if (PL_tainting) {
|
|
while (++MARK <= SP) {
|
|
--
|
|
1.7.11.4
|
|
|