Print this page
Add perl support KSTAT_DATA_TIME.

*** 20,29 **** --- 20,30 ---- */ /* * Copyright (c) 1999, 2010, Oracle and/or its affiliates. All rights reserved. * Copyright (c) 2014 Racktop Systems. + * Copyright 2016 Garrett D'Amore */ /* * Kstat.xs is a Perl XS (eXStension module) that makes the Solaris * kstat(3KSTAT) facility available to Perl scripts. Kstat is a general-purpose
*** 1072,1081 **** --- 1073,1085 ---- value = NEW_UV(knp->value.i64); break; case KSTAT_DATA_UINT64: value = NEW_UV(knp->value.ui64); break; + case KSTAT_DATA_TIME: + value = NEW_HRTIME(knp->value.ui64); + break; case KSTAT_DATA_STRING: if (KSTAT_NAMED_STR_PTR(knp) == NULL) value = newSVpv("null", sizeof ("null") - 1); else value = newSVpv(KSTAT_NAMED_STR_PTR(knp),