view release on metacpan or  search on metacpan

Mallinfo.xs  view on Meta::CPAN

#if HAVE_MALLOC_INFO

int
malloc_info (options, fp)
    int options
    FILE *fp

void
malloc_info_string (options)
    int options
PPCODE:
  {
    FILE *fp;
    SV *ret = &PL_sv_undef;
    int err;

    fp = tmpfile();
    if (fp != NULL) {
      err = malloc_info (options, fp);
      if (err != 0) {
        errno = err;