diff options
Diffstat (limited to 'globals.c')
-rw-r--r-- | globals.c | 23 |
1 files changed, 0 insertions, 23 deletions
@@ -23,35 +23,12 @@ * functions not used by perl itself, but the functions get * pulled into the perl executable via the refrerence here. * - * Two printf() like functions have also found their way here. - * Most likely by analogy to the API scheme above (as perl doesn't - * use them) but they probably belong elsewhere the obvious place - * being in perlio.c - * */ #include "INTERN.h" #define PERL_IN_GLOBALS_C #include "perl.h" -int -Perl_fprintf_nocontext(PerlIO *stream, const char *format, ...) -{ - dTHXs; - va_list(arglist); - va_start(arglist, format); - return PerlIO_vprintf(stream, format, arglist); -} - -int -Perl_printf_nocontext(const char *format, ...) -{ - dTHX; - va_list(arglist); - va_start(arglist, format); - return PerlIO_vprintf(PerlIO_stdout(), format, arglist); -} - #include "perlapi.h" /* bring in PL_force_link_funcs */ /* |