diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 1997-11-12 07:40:54 +0000 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 1997-11-12 07:40:54 +0000 |
commit | 390b85e7c411323845dca16b7882a5a5754a433e (patch) | |
tree | 85ad2b4f7f3f7423e62b89223941e6670bce5d16 /win32/runperl.c | |
parent | 65e48ea94f536920f95a77a3a652fd45c687b28a (diff) | |
download | perl-390b85e7c411323845dca16b7882a5a5754a433e.tar.gz |
Egregious IOsubsystem code excised. Phew, what a relief! Two
files (win32/win32io.[ch]) completely removed, as are all traces
of them in makefiles and MANIFEST. RunPerl() retains the void* arg
for later. Various myfoo() things regularized to my_foo(). CPP not
required anymore to create a perl binary :)
p4raw-id: //depot/win32/perl@242
Diffstat (limited to 'win32/runperl.c')
-rw-r--r-- | win32/runperl.c | 15 |
1 files changed, 3 insertions, 12 deletions
diff --git a/win32/runperl.c b/win32/runperl.c index 07e2bd6f83..6f84c601ea 100644 --- a/win32/runperl.c +++ b/win32/runperl.c @@ -1,18 +1,9 @@ -#include <stdio.h> -#include <win32io.h> +/* Say NO to CPP! Hallelujah! */ -#ifndef _DLL -extern WIN32_IOSUBSYSTEM win32stdio; -#endif - -extern int RunPerl(int argc, char **argv, char **env, void *iosubsystem); +__declspec(dllimport) int RunPerl(int argc, char **argv, char **env, void *ios); int main(int argc, char **argv, char **env) { -#ifdef _DLL - return (RunPerl(argc, argv, env, NULL)); -#else - return (RunPerl(argc, argv, env, &win32stdio)); -#endif + return RunPerl(argc, argv, env, (void*)0); } |