# New Ticket Created by Jerry Gay
# Please include the string: [perl #59722]
# in the subject line of all future correspondence about this issue.
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=59722 >
currently, the sysinfo_s op, implemented in src/inter_misc.c, is incomplete:
PARROT_CANNOT_RETURN_NULL
PARROT_WARN_UNUSED_RESULT
STRING *
sysinfo_s(PARROT_INTERP, INTVAL info_wanted)
{
switch (info_wanted) {
case PARROT_OS:
return const_string(interp, BUILD_OS_NAME);
case PARROT_OS_VERSION:
case PARROT_OS_VERSION_NUMBER:
case CPU_ARCH:
case CPU_TYPE:
default:
return CONST_STRING(interp, "");
}
}
one effect of this partial implementation is that the $*OSVER variable
in rakudo always contains the empty string.
~jerry