summaryrefslogtreecommitdiff
path: root/makedef.pl
diff options
context:
space:
mode:
authorBenjamin Stuhl <sho_pi@hotmail.com>2000-11-13 07:08:08 -0800
committerJarkko Hietaniemi <jhi@iki.fi>2000-11-14 01:21:09 +0000
commite601c439adce167078ac7b49550c0418ace86f94 (patch)
tree5cf09c48cc83a16ea460db17f84afc45830116d0 /makedef.pl
parent0db725d892efd38f45ece17a9db22f98fb713bb3 (diff)
downloadperl-e601c439adce167078ac7b49550c0418ace86f94.tar.gz
Get PerlIO building on Win32
Message-ID: <20001113230808.18659.qmail@web6305.mail.yahoo.com> p4raw-id: //depot/perl@7679
Diffstat (limited to 'makedef.pl')
-rw-r--r--makedef.pl86
1 files changed, 45 insertions, 41 deletions
diff --git a/makedef.pl b/makedef.pl
index a02a298213..70682f7976 100644
--- a/makedef.pl
+++ b/makedef.pl
@@ -73,7 +73,8 @@ if ($PLATFORM eq 'aix') {
}
elsif ($PLATFORM eq 'win32') {
$CCTYPE = "MSVC" unless defined $CCTYPE;
- foreach ($thrdvar_h, $intrpvar_h, $perlvars_h, $global_sym, $pp_sym, $globvar_sym) {
+ foreach ($thrdvar_h, $intrpvar_h, $perlvars_h, $global_sym,
+ $pp_sym, $globvar_sym, $perlio_sym) {
s!^!..\\!;
}
}
@@ -572,6 +573,8 @@ while (<DATA>) {
if ($PLATFORM eq 'win32') {
foreach my $symbol (qw(
+ setuid
+ setgid
boot_DynaLoader
Perl_init_os_extras
Perl_thread_create
@@ -579,35 +582,6 @@ if ($PLATFORM eq 'win32') {
RunPerl
win32_errno
win32_environ
- win32_stdin
- win32_stdout
- win32_stderr
- win32_ferror
- win32_feof
- win32_strerror
- win32_fprintf
- win32_printf
- win32_vfprintf
- win32_vprintf
- win32_fread
- win32_fwrite
- win32_fopen
- win32_fdopen
- win32_freopen
- win32_fclose
- win32_fputs
- win32_fputc
- win32_ungetc
- win32_getc
- win32_fileno
- win32_clearerr
- win32_fflush
- win32_ftell
- win32_fseek
- win32_fgetpos
- win32_fsetpos
- win32_rewind
- win32_tmpfile
win32_abort
win32_fstat
win32_stat
@@ -678,17 +652,6 @@ if ($PLATFORM eq 'win32') {
win32_getenv
win32_putenv
win32_perror
- win32_setbuf
- win32_setvbuf
- win32_flushall
- win32_fcloseall
- win32_fgets
- win32_gets
- win32_fgetc
- win32_putc
- win32_puts
- win32_getchar
- win32_putchar
win32_malloc
win32_calloc
win32_realloc
@@ -720,6 +683,47 @@ if ($PLATFORM eq 'win32') {
win32_getpid
win32_crypt
win32_dynaload
+
+ win32_stdin
+ win32_stdout
+ win32_stderr
+ win32_ferror
+ win32_feof
+ win32_strerror
+ win32_fprintf
+ win32_printf
+ win32_vfprintf
+ win32_vprintf
+ win32_fread
+ win32_fwrite
+ win32_fopen
+ win32_fdopen
+ win32_freopen
+ win32_fclose
+ win32_fputs
+ win32_fputc
+ win32_ungetc
+ win32_getc
+ win32_fileno
+ win32_clearerr
+ win32_fflush
+ win32_ftell
+ win32_fseek
+ win32_fgetpos
+ win32_fsetpos
+ win32_rewind
+ win32_tmpfile
+ win32_setbuf
+ win32_setvbuf
+ win32_flushall
+ win32_fcloseall
+ win32_fgets
+ win32_gets
+ win32_fgetc
+ win32_putc
+ win32_puts
+ win32_getchar
+ win32_putchar
))
{
try_symbol($symbol);