Ruby
view release on metacpan or search on metacpan
/*
$Id: plrb.h,v 1.5 2004/04/11 05:04:46 jigoro Exp $
*/
#ifndef PERL_RUBY_PM_H
#define PERL_RUBY_PM_H
#define getuid _ruby_getuid
#define getgid _ruby_getgid
#define geteuid _ruby_geteuid
#define getegid _ruby_getegid
#define setuid _ruby_setuid
#define setgid _ruby_setgid
#define kill _ruby_kill
#define chown _ruby_chown
#define tms _ruby_tms
#if MY_RUBY_VERSION_INT >= 190
#include <ruby/ruby.h>
#else
#include <ruby.h>
#include "rbport.h"
#endif
#undef getuid
#undef getgid
#undef geteuid
#undef getegid
#undef setuid
#undef setgid
#undef kill
#undef chown
#undef tms
#undef yyparse
#undef yylex
#undef yyerror
#undef yylval
#undef isnan
#undef getenv
#undef fclose
#undef fputc
#undef close
#undef mktemp
#undef read
#undef rename
#undef stat
#undef umask
#undef unlink
#undef utime
#undef write
#undef sleep
#undef times
#undef getpid
#undef accept
#undef bind
#undef connect
#undef gethostbyaddr
#undef gethostbyname
#undef gethostname
#undef getpeername
#undef getprotobyname
#undef getprotobynumber
#undef getservbyname
#undef getservbyport
#undef getsockname
#undef getsockopt
#undef listen
#undef recv
#undef recvfrom
#undef select
#undef send
#undef sendto
#undef setsockopt
#undef shutdown
#undef socket
#undef mkdir
#undef rmdir
#undef isatty
#undef execv
#define PERL_NO_GET_CONTEXT
#include <EXTERN.h>
#include <perl.h>
#include <XSUB.h>
#include "ppport.h"
( run in 0.922 second using v1.01-cache-2.11-cpan-5511b514fd6 )