X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FLinux-SysInfo.git;a=blobdiff_plain;f=SysInfo.xs;h=8e4f0dc24542bee2ee4685f51f43802472c12b1e;hp=fdb289e362e098082baa99f83bbf18e6c613d401;hb=HEAD;hpb=70e504e113b0833d5cbf0e6f4f9659fcbb765d70 diff --git a/SysInfo.xs b/SysInfo.xs index fdb289e..8e4f0dc 100644 --- a/SysInfo.xs +++ b/SysInfo.xs @@ -94,13 +94,13 @@ BOOT: } SV *sysinfo() +PROTOTYPE: PREINIT: struct sysinfo si; NV l; HV *hv; CODE: - if (sysinfo(&si) == -1) - XSRETURN_UNDEF; + if (sysinfo(&si) == -1) XSRETURN_UNDEF; hv = newHV();