#include "EXTERN.h"
#include "perl.h"
#include "XSUB.h"

MODULE = Foo  PACKAGE = Foo

IV
get_interpreter_id()
   CODE:
      RETVAL = (IV)PERL_GET_THX;

   OUTPUT:
      RETVAL