mirror/perl
1
0
Fork 0
mirror of https://github.com/Perl/perl5.git synced 2026-01-27 01:44:43 +00:00
Code Issues Packages Projects Releases Wiki Activity

Purge remaining references to PerlIO_sprintf and PerlIO_vsprintf().

Browse Source 
Eliminate their function prototypes. Eliminate references in perlio.sym and
makedef.pl which caused them to still be added to the Win32 linker
definitions.
This commit is contained in:
Nicholas Clark 2013-10-07 10:32:39 +02:00
parent 29b43da272
commit 5eb9f461ff
5 changed files with 0 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
makedef.pl
View File

@ -677,7 +677,6 @@ if ($define{'USE_PERLIO'}) {
PerlIO_set_cnt
PerlIO_set_ptrcnt
PerlIO_setlinebuf
PerlIO_sprintf
PerlIO_stderr
PerlIO_stdin
PerlIO_stdout
@ -805,9 +804,7 @@ try_symbols(qw(
PerlIO_getpos
PerlIO_init
PerlIO_setpos
PerlIO_sprintf
PerlIO_tmpfile
PerlIO_vsprintf
));
if ($ARGS{PLATFORM} eq 'win32') {

4
perlio.h
View File

@ -281,10 +281,6 @@ PERL_EXPORT_C void PerlIO_setlinebuf(PerlIO *);
PERL_EXPORT_C int PerlIO_printf(PerlIO *, const char *, ...)
__attribute__format__(__printf__, 2, 3);
#endif
#ifndef PerlIO_sprintf
PERL_EXPORT_C int PerlIO_sprintf(char *, int, const char *, ...)
__attribute__format__(__printf__, 3, 4);
#endif
#ifndef PerlIO_vprintf
PERL_EXPORT_C int PerlIO_vprintf(PerlIO *, const char *, va_list);
#endif

2
perlio.sym
View File

@ -21,10 +21,8 @@ PerlIO_releaseFILE
PerlIO_reopen
PerlIO_rewind
PerlIO_setpos
PerlIO_sprintf
PerlIO_stdoutf
PerlIO_teardown
PerlIO_tmpfile
PerlIO_ungetc
PerlIO_vprintf
PerlIO_vsprintf

2
perliol.h
View File

@ -158,8 +158,6 @@ PERL_EXPORT_C PerlIO_list_t * PerlIO_resolve_layers(pTHX_ const char *layers, co
PERL_EXPORT_C PerlIO_funcs * PerlIO_default_layer(pTHX_ I32 n);
PERL_EXPORT_C PerlIO_list_t * PerlIO_default_layers(pTHX);
PERL_EXPORT_C PerlIO * PerlIO_reopen(const char *path, const char *mode, PerlIO *f);
PERL_EXPORT_C int PerlIO_vsprintf(char *s, int n, const char *fmt, va_list ap)
__attribute__format__(__printf__,3,0);
PERL_EXPORT_C PerlIO_list_t *PerlIO_list_alloc(pTHX);
PERL_EXPORT_C PerlIO_list_t *PerlIO_clone_list(pTHX_ PerlIO_list_t *proto, CLONE_PARAMS *param);

1
perlsfio.h
View File

@ -43,7 +43,6 @@ extern int _stdprintf _ARG_((const char*, ...));
#define PerlIO_puts(f,s) sfputr(f,s,-1)
#define PerlIO_putc(f,c) sfputc(f,c)
#define PerlIO_ungetc(f,c) sfungetc(f,c)
#define PerlIO_sprintf sfsprintf
#define PerlIO_getc(f) sfgetc(f)
#define PerlIO_eof(f) sfeof(f)
#define PerlIO_error(f) sferror(f)