#include "perl.h"
#include "XSUB.h"
-#define __PACKAGE__ "Linux::SysInfo"
+#define __PACKAGE__ "Linux::SysInfo"
+#define __PACKAGE_LEN__ (sizeof(__PACKAGE__)-1)
/* --- Extended fields ----------------------------------------------------- */
BOOT:
{
HV *stash;
- stash = gv_stashpv(__PACKAGE__, TRUE);
+ stash = gv_stashpvn(__PACKAGE__, __PACKAGE_LEN__, TRUE);
newCONSTSUB(stash, "LS_HAS_EXTENDED", newSViv(LS_HAS_EXTENDED));
LS_KEY_DEFINE(uptime);
}
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();