ext/DynaLoader/dl_none.xs

   1 /* dl_none.xs
   2  *
   3  * Stubs for platforms that do not support dynamic linking
   4  */
   5
   6 #define PERL_EXT
   7 #include "EXTERN.h"
   8 #define PERL_IN_DL_NONE_XS
   9 #include "perl.h"
  10 #include "XSUB.h"
  11
  12 MODULE = DynaLoader     PACKAGE = DynaLoader
  13
  14 char *
  15 dl_error()
  16     CODE:
  17     RETVAL = "Not implemented";
  18     OUTPUT:
  19     RETVAL
  20
  21 # end.