diff options
author | Steve Peters <steve@fisharerojo.org> | 2005-10-28 21:09:31 +0000 |
---|---|---|
committer | Steve Peters <steve@fisharerojo.org> | 2005-10-28 21:09:31 +0000 |
commit | 7ee2227d70915603ee41631de2babf3bbc5737c4 (patch) | |
tree | 46651047245714447d9c72e4ccfc8173989f81c9 /globals.c | |
parent | 6ea79e1700a40a6dac73786dfa0a911a945bcffb (diff) | |
download | perl-7ee2227d70915603ee41631de2babf3bbc5737c4.tar.gz |
Add a new file, mathoms.c, to hold old code kept around for binary
compatability with previous versions of Perl. Change also includes
various Makefile changes to compile the new file and link it into
libperl.
p4raw-id: //depot/perl@25866
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 */ /* |