diff options
author | Vadim Konovalov <vkonovalov@lucent.com> | 2002-08-21 05:31:52 +0400 |
---|---|---|
committer | hv <hv@crypt.org> | 2002-08-25 14:16:50 +0000 |
commit | aebd5ec7dc06344c5afdd73f107cf8809e9e60e1 (patch) | |
tree | ac26818d4cf9f01182349cff6da121d978e00a1a /wince | |
parent | 57797241ccfef1581e6f5bbaa0c50d7faa89b290 (diff) | |
download | perl-aebd5ec7dc06344c5afdd73f107cf8809e9e60e1.tar.gz |
bit more for WinCE
Message-ID: <000f01c24891$045c4990$2b5ec3d9@vad>
p4raw-id: //depot/perl@17769
Diffstat (limited to 'wince')
-rw-r--r-- | wince/Makefile.ce | 4 | ||||
-rw-r--r-- | wince/compile.bat | 4 | ||||
-rw-r--r-- | wince/win32io.c | 4 | ||||
-rw-r--r-- | wince/wince.c | 8 |
4 files changed, 10 insertions, 10 deletions
diff --git a/wince/Makefile.ce b/wince/Makefile.ce index 6339c10b3c..f31ed989b7 100644 --- a/wince/Makefile.ce +++ b/wince/Makefile.ce @@ -55,8 +55,8 @@ NOOP = @echo NULL = -CFG=DEBUG -#CFG=RELEASE +#CFG=DEBUG +CFG=RELEASE !if "$(MACHINE)" == "" MACHINE=wince-arm-hpc-wce300 diff --git a/wince/compile.bat b/wince/compile.bat index 582d422e81..851c68fb06 100644 --- a/wince/compile.bat +++ b/wince/compile.bat @@ -6,7 +6,7 @@ rem set ARG-1=PV= set ARG-2=INST_VER= -set ARG-3=INSTALL_ROOT=\Storage Card\perl-tests\perl@16376 +set ARG-3=INSTALL_ROOT=\Storage Card\perl58 set ARG-4=WCEROOT=%SDKROOT% set ARG-5=CEPATH=%WCEROOT% set ARG-6=CELIBDLLDIR=d:\personal\pocketPC\celib-palm-3.0 @@ -20,6 +20,6 @@ set ARG-10=MACHINE=wince-mips-pocket-wce300 set ARG-11=PERLCEDIR=$(MAKEDIR) set ARG-12=MSVCDIR=D:\MSVStudio\VC98 set ARG-13=CECOPY=$(HPERL) -I$(PERLCEDIR)\lib $(PERLCEDIR)\comp.pl --copy -set ARG-14=USE_PERLIO=undef +set ARG-14= nmake -f Makefile.ce "%ARG-1%" "%ARG-2%" "%ARG-3%" "%ARG-4%" "%ARG-5%" "%ARG-6%" "%ARG-7%" "%ARG-8%" "%ARG-9%" "%ARG-10%" "%ARG-11%" "%ARG-12%" "%ARG-13%" "%ARG-14%" %1 %2 %3 %4 %5 %6 %7 %8 %9 diff --git a/wince/win32io.c b/wince/win32io.c index 3683490ac4..22a142749b 100644 --- a/wince/win32io.c +++ b/wince/win32io.c @@ -53,9 +53,9 @@ PerlIOWin32_fileno(pTHX_ PerlIO *f) } IV -PerlIOWin32_pushed(pTHX_ PerlIO *f, const char *mode, SV *arg) +PerlIOWin32_pushed(pTHX_ PerlIO *f, const char *mode, SV *arg, PerlIO_funcs *tab) { - IV code = PerlIOBase_pushed(aTHX_ f,mode,arg); + IV code = PerlIOBase_pushed(aTHX_ f,mode,arg,tab); if (*PerlIONext(f)) { PerlIOWin32 *s = PerlIOSelf(f,PerlIOWin32); diff --git a/wince/wince.c b/wince/wince.c index 8aefe6ca17..16bf2d2990 100644 --- a/wince/wince.c +++ b/wince/wince.c @@ -995,15 +995,15 @@ win32_eof(int fd) DllExport int win32_dup(int fd) { - Perl_croak(aTHX_ PL_no_func, "dup"); - return -1; + //vv Perl_croak(aTHX_ PL_no_func, "dup"); + return xcedup(fd); // from celib/ceio.c; requires some more work on it. } DllExport int win32_dup2(int fd1,int fd2) { - Perl_croak(aTHX_ PL_no_func, "dup2"); - return -1; + //Perl_croak(aTHX_ PL_no_func, "dup2"); + return xcedup2(fd1,fd2); } DllExport int |