From 5628d9c0e299eea79e87aa8a5ed2d99a2895a4d0 Mon Sep 17 00:00:00 2001 From: Yaakov Selkowitz Date: Fri, 4 Dec 2015 02:28:00 -0600 Subject: [PATCH 5/6] Add s390/x support MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Signed-off-by: Petr Šabata --- lib/Sys/Syscall.pm | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/lib/Sys/Syscall.pm b/lib/Sys/Syscall.pm index ece65de..702e835 100644 --- a/lib/Sys/Syscall.pm +++ b/lib/Sys/Syscall.pm @@ -79,6 +79,13 @@ if ($^O eq "linux") { $SYS_sendfile = 186; # sys_sendfile64=226 $SYS_readahead = 191; $u64_mod_8 = 1; + } elsif ($machine =~ m/^s390/) { + $SYS_epoll_create = 249; + $SYS_epoll_ctl = 250; + $SYS_epoll_wait = 251; + $SYS_sendfile = 187; # sys_sendfile64=223 + $SYS_readahead = 222; + $u64_mod_8 = 1; } elsif ($machine eq "ia64") { $SYS_epoll_create = 1243; $SYS_epoll_ctl = 1244; -- 2.5.0