view release on metacpan or  search on metacpan

Manager.xs  view on Meta::CPAN

#define RETURN_BOOL(b) if (b) XSRETURN_YES; else XSRETURN_NO;

MODULE = App::Manager		PACKAGE = App::Manager

PROTOTYPES: ENABLE

char *
LIBTRACER_SO()
  	CODE:
        RETVAL = LIBTRACER_SO;
        OUTPUT:
        RETVAL

char *
LIBDIR()
  	CODE:
        RETVAL = LIBDIR;
        OUTPUT:
        RETVAL

# damn, POSIX doesn't include S_ISLNK!

void
S_ISDIR(mode)
  	int	mode
        PPCODE:
        RETURN_BOOL (S_ISDIR (mode));