Change 30132 by [EMAIL PROTECTED] on 2007/02/05 17:37:09
Integrate:
[ 26071]
Subject: [PATCH @26062] wince patch
From: "Konovalov, Vadim" <[EMAIL PROTECTED]>
Date: Wed, 9 Nov 2005 20:22:52 +0300
Message-ID: <[EMAIL PROTECTED]>
[ 26072]
Really apply change #26071.
[ 26140]
Subject: [PATCH @26137] for wince
From: "Konovalov, Vadim" <[EMAIL PROTECTED]>
Date: Wed, 16 Nov 2005 20:57:13 +0300
Message-ID: <[EMAIL PROTECTED]>
[ 26200]
Subject: [PATCH @26198] perlce touches
From: Konovalov, Vadim <[EMAIL PROTECTED]>
Date: Nov 23, 2005 8:55 PM
Message-ID: <[EMAIL PROTECTED]>
[ 26201]
Delete a README made redundant by change 26200.
Affected files ...
... //depot/maint-5.8/perl/INSTALL#40 integrate
... //depot/maint-5.8/perl/MANIFEST#304 integrate
... //depot/maint-5.8/perl/README.ce#6 integrate
... //depot/maint-5.8/perl/configpm#20 integrate
... //depot/maint-5.8/perl/ext/Cwd/Cwd.xs#9 integrate
... //depot/maint-5.8/perl/makedef.pl#38 integrate
... //depot/maint-5.8/perl/wince/Makefile.ce#21 integrate
... //depot/maint-5.8/perl/wince/README.perlce#4 delete
... //depot/maint-5.8/perl/wince/config.ce#14 integrate
... //depot/maint-5.8/perl/wince/config_H.ce#13 integrate
... //depot/maint-5.8/perl/wince/config_h.PL#2 integrate
... //depot/maint-5.8/perl/wince/config_sh.PL#2 integrate
... //depot/maint-5.8/perl/wince/wince.c#10 integrate
Differences ...
==== //depot/maint-5.8/perl/INSTALL#40 (text) ====
Index: perl/INSTALL
--- perl/INSTALL#39~30046~ 2007-01-27 15:25:32.000000000 -0800
+++ perl/INSTALL 2007-02-05 09:37:09.000000000 -0800
@@ -1902,7 +1902,7 @@
=item WinCE/PocketPC
-README.ce, wince/README.perlce
+README.ce
=item Open Zaurus
==== //depot/maint-5.8/perl/MANIFEST#304 (text) ====
Index: perl/MANIFEST
--- perl/MANIFEST#303~30115~ 2007-02-04 10:49:54.000000000 -0800
+++ perl/MANIFEST 2007-02-05 09:37:09.000000000 -0800
@@ -3130,7 +3130,6 @@
wince/perllib.c WinCE port
wince/perlmain.c WinCE port
wince/perl.rc WinCE port
-wince/README.perlce WinCE port
wince/registry.bat WinCE port
wince/runperl.c WinCE port
wince/splittree.pl WinCE port
==== //depot/maint-5.8/perl/README.ce#6 (text) ====
Index: perl/README.ce
--- perl/README.ce#5~21894~ 2003-12-13 09:59:41.000000000 -0800
+++ perl/README.ce 2007-02-05 09:37:09.000000000 -0800
@@ -6,27 +6,65 @@
perlce - Perl for WinCE
-=head1 DESCRIPTION
+=head1 Building Perl for WinCE
+
+=head2 DESCRIPTION
This file gives the instructions for building Perl5.8 and above for
WinCE. Please read and understand the terms under which this
software is distributed.
-=head1 BUILD
+=head2 General explanations on cross-compiling WinCE
-This section describes the steps to be performed to build PerlCE.
-You may find additional and newer information about building perl
-for WinCE using following URL:
+=over
+
+=item *
+
+C<miniperl> is built. This is a single executable (without DLL), intended
+to run on Win32, and it will facilitate remaining build process; all binaries
+built after it are foreign and should not run locally.
+
+C<miniperl> is built using ../win32/Makefile; this is part of normal
+build process invoked as dependency from wince/Makefile.ce
+
+=item *
+
+After C<miniperl> is built, 'configpm' is invoked to create right Config.pm
+in right place and its corresponding Cross.pm.
+
+Unlike Win32 build, miniperl will not have Config.pm of host within reach;
+it rather will use Config.pm from within cross-compilation directories.
+
+File Cross.pm is dead simple: for given cross-architecture places in @INC
+a path where perl modules are, and right Config.pm in that place.
- http://perlce.sourceforge.net
+That said, C<miniperl -Ilib -MConfig -we 1> should report an error, because
+it can not find Config.pm. If it does not gives an error -- wrong Config.pm
+is substituted, and resulting binaries will be a mess.
-There should also be pre-built binaries there.
+C<miniperl -MCross -MConfig -we 1> should run okay, and it will provide right
+Config.pm for further compilations.
-Don't be confused by large size of downloaded distribution or constructed
-binaries: entire distribution could be large for WinCE ideology, but
-you may strip it at your wish and use only required parts.
+=item *
+
+During extensions build phase, a script C<./win32/buldext.pl> is invoked,
+which in turn steps in ./ext subdirectories and performs a build of
+each extension in turn.
+
+All invokes of Makefile.PL are provided with C<-MCross> so to enable cross-
+compile.
+
+=item *
+
+=back
+
+=head2 BUILD
+
+This section describes the steps to be performed to build PerlCE.
+You may find additional information about building perl for WinCE
+at L<http://perlce.sourceforge.net> and some pre-built binaries.
-=head2 Tools & SDK
+=head3 Tools & SDK
For compiling, you need following:
@@ -42,18 +80,12 @@
=back
-Needed source files can be downloaded via:
-www.rainer-keuchel.de/wince/dirlist.html
+Needed source files can be downloaded at
+L<http://www.rainer-keuchel.de/wince/dirlist.html>
-=head2 Make
+=head3 Make
-Please pay attention that starting from 5.8.0 miniperl *is* built
-and it facilitates in further building process. This means that
-in addition to compiler installation for mobile device you also need
-to have Microsoft Visual C++ installed as well.
-
-On the bright side, you do not need to edit any files from ./win32
-subdirectory. Normally you only need to edit ./wince/compile.bat
+Normally you only need to edit ./wince/compile.bat
to reflect your system and run it.
File ./wince/compile.bat is actually a wrapper to call
@@ -118,20 +150,149 @@
to refer a cross-compilation that was created last time.
-
-If you decided to build with fcrypt.c file, please refer to README.win32
-file, as long as all legal considerations and steps to do are exactly same
-in this case.
-
All questions related to building for WinCE devices could be asked in
[EMAIL PROTECTED] mailing list.
+=head1 Using Perl on WinCE
+
+=head2 DESCRIPTION
+
+PerlCE is currently linked with a simple console window, so it also
+works on non-hpc devices.
+
+The simple stdio implementation creates the files stdin.txt,
+stdout.txt and stderr.txt, so you might examine them if your
+console has only a liminted number of cols.
+
+When exitcode is non-zero, a message box appears, otherwise the
+console closes, so you might have to catch an exit with
+status 0 in your program to see any output.
+
+stdout/stderr now go into the files /perl-stdout.txt and
+/perl-stderr.txt.
+
+=head2 LIMITATIONS
+
+No fork(), pipe(), popen() etc.
+
+=head2 ENVIRONMENT
+
+All environment vars must be stored in HKLM\Environment as
+strings. They are read at process startup.
+
+ PERL5LIB - Usual perl lib path (semi-list).
+ PATH - Semi-list for executables.
+ TMP - Tempdir.
+ UNIXROOTPATH - Root for accessing some special files,
+ i.e. /dev/null, /etc/services.
+ ROWS/COLS - Rows/cols for console.
+ HOME - Home directory.
+ CONSOLEFONTSIZE - Size for console font.
+
+You can set these with cereg.exe, a (remote) registry editor
+or via the PerlIDE.
+
+=head2 REGISTRY
+
+To start perl by clicking on a perl source file, you have
+to make the according entries in HKCR (see wince-reg.bat).
+cereg.exe (which must be executed on a desktop pc with
+ActiveSync) is reported not to work on some devices.
+You have to create the registry entries by hand using a
+registry editor.
+
+=head2 PERLFILES
+
+The following files are a reasonable minimum if you want to do
+some socket stuff:
+
+ ./auto
+ ./auto/DynaLoader
+ ./auto/DynaLoader/autosplit.ix
+ ./auto/DynaLoader/dl_expandspec.al
+ ./auto/DynaLoader/dl_findfile.al
+ ./auto/DynaLoader/dl_find_symbol_anywhere.al
+ ./auto/IO
+ ./auto/IO/IO.bs
+ ./auto/IO/IO.dll
+ ./auto/Socket
+ ./auto/Socket/Socket.bs
+ ./auto/Socket/Socket.dll
+ ./Carp
+ ./Carp/Heavy.pm
+ ./Carp.pm
+ ./Config.pm
+ ./DynaLoader.pm
+ ./Exporter
+ ./Exporter/Heavy.pm
+ ./Exporter.pm
+ ./IO
+ ./IO/File.pm
+ ./IO/Handle.pm
+ ./IO/Socket.pm
+ ./IO.pm
+ ./SelectSaver.pm
+ ./Socket.pm
+ ./strict.pm
+ ./Symbol.pm
+ ./warnings
+ ./warnings/register.pm
+ ./warnings.pm
+ ./XSLoader.pm
+
+=head2 XS
+
+The following Win32-Methods are built-in:
+
+ newXS("Win32::GetCwd", w32_GetCwd, file);
+ newXS("Win32::SetCwd", w32_SetCwd, file);
+ newXS("Win32::GetTickCount", w32_GetTickCount, file);
+ newXS("Win32::GetOSVersion", w32_GetOSVersion, file);
+ newXS("Win32::IsWinNT", w32_IsWinNT, file);
+ newXS("Win32::IsWin95", w32_IsWin95, file);
+ newXS("Win32::IsWinCE", w32_IsWinCE, file);
+ newXS("Win32::CopyFile", w32_CopyFile, file);
+ newXS("Win32::Sleep", w32_Sleep, file);
+ newXS("Win32::MessageBox", w32_MessageBox, file);
+ newXS("Win32::GetPowerStatus", w32_GetPowerStatus, file);
+ newXS("Win32::GetOemInfo", w32_GetOemInfo, file);
+ newXS("Win32::ShellEx", w32_ShellEx, file);
+
+=head2 BUGS
+
+Opening files for read-write is currently not supported if
+they use stdio (normal perl file handles).
+
+If you find bugs or if it does not work at all on your
+device, send mail to the address below. Please report
+the details of your device (processor, ceversion,
+devicetype (hpc/palm/pocket)) and the date of the downloaded
+files.
+
+=head2 INSTALLATION
+
+Currently installation instructions are at L<http://perlce.sourceforge.net/>.
+
+After installation & testing processes will stabilize, information will
+be more precise.
+
=head1 ACKNOWLEDGEMENTS
The port for Win32 was used as a reference.
=head1 AUTHORS
-Rainer Keuchel ([EMAIL PROTECTED])
-Vadim Konovalov ([EMAIL PROTECTED])
+=over
+
+=item Rainer Keuchel <[EMAIL PROTECTED]>
+
+provided initial port of Perl, which appears to be most essential work, as
+it was a breakthrough on having Perl ported at all.
+Many thanks and obligations to Rainer!
+
+=item Vadim Konovalov
+
+made further support of WinCE port.
+
+=back
==== //depot/maint-5.8/perl/configpm#20 (xtext) ====
Index: perl/configpm
--- perl/configpm#19~28211~ 2006-05-16 10:29:06.000000000 -0700
+++ perl/configpm 2007-02-05 09:37:09.000000000 -0800
@@ -966,6 +966,7 @@
print CROSS $cross;
close CROSS;
print "written lib/Cross.pm\n";
+ unshift(@INC,"xlib/$Opts{cross}");
}
# Now do some simple tests on the Config.pm file we have created
==== //depot/maint-5.8/perl/ext/Cwd/Cwd.xs#9 (text) ====
Index: perl/ext/Cwd/Cwd.xs
--- perl/ext/Cwd/Cwd.xs#8~25376~ 2005-09-10 12:39:28.000000000 -0700
+++ perl/ext/Cwd/Cwd.xs 2007-02-05 09:37:09.000000000 -0800
@@ -434,7 +434,7 @@
#endif
}
-#ifdef WIN32
+#if defined(WIN32) && !defined(UNDER_CE)
void
getdcwd(...)
==== //depot/maint-5.8/perl/makedef.pl#38 (text) ====
Index: perl/makedef.pl
--- perl/makedef.pl#37~29846~ 2007-01-17 03:36:40.000000000 -0800
+++ perl/makedef.pl 2007-02-05 09:37:09.000000000 -0800
@@ -36,7 +36,7 @@
defined $PLATFORM || die "PLATFORM undefined, must be one of: @PLATFORM\n";
exists $PLATFORM{$PLATFORM} || die "PLATFORM must be one of: @PLATFORM\n";
-if ($PLATFORM eq 'win32' or $PLATFORM eq "aix") {
+if ($PLATFORM eq 'win32' or $PLATFORM eq 'wince' or $PLATFORM eq "aix") {
# Add the compile-time options that miniperl was built with to %define.
# On Win32 these are not the same options as perl itself will be built
# with since miniperl is built with a canned config (one of the win32/
@@ -45,7 +45,8 @@
# source files and header files and don't include any BUILDOPT's that
# the user might have chosen to disable because the canned configs are
# minimal configs that don't include any of those options.
- my $config = `$^X -Ilib -V`;
+ my $opts = ($PLATFORM eq 'wince' ? '-MCross' : ''); # for wince need
Cross.pm to get Config.pm
+ my $config = `$^X $opts -Ilib -V`;
my($options) = $config =~ /^ Compile-time options: (.*?)\n^ \S/ms;
$options =~ s/\s+/ /g;
print STDERR "Options: ($options)\n";
==== //depot/maint-5.8/perl/wince/Makefile.ce#21 (text) ====
Index: perl/wince/Makefile.ce
--- perl/wince/Makefile.ce#20~27303~ 2006-02-24 02:56:28.000000000 -0800
+++ perl/wince/Makefile.ce 2007-02-05 09:37:09.000000000 -0800
@@ -543,6 +543,16 @@
CONFIGPM = ..\xlib\$(CROSS_NAME)\Config.pm
MINIMOD = ..\lib\ExtUtils\Miniperl.pm
+# Unicode data files generated by mktables
+UNIDATAFILES = ..\lib\unicore\Canonical.pl ..\lib\unicore\Exact.pl \
+ ..\lib\unicore\Properties ..\lib\unicore\Decomposition.pl \
+ ..\lib\unicore\CombiningClass.pl ..\lib\unicore\Name.pl \
+ ..\lib\unicore\PVA.pl
+
+# Directories of Unicode data files generated by mktables
+UNIDATADIR1 = ..\lib\unicore\To
+UNIDATADIR2 = ..\lib\unicore\lib
+
# Nominate a target which causes extensions to be re-built
# This used to be $(PERLEXE), but at worst it is the .dll that they depend
# on and really only the interface - i.e. the .def file used to export symbols
@@ -704,7 +714,8 @@
"archname=$(ARCHNAME)" \
"CC=$(CC)" \
"ccflags=$(OPTIMIZE) $(DEFINES) $(BUILDOPT)" \
- "cf_by=Rainer Keuchel" \
+ "cppflags=$(OPTIMIZE) $(DEFINES) $(BUILDOPT)" \
+ "cf_by=vkon" \
"cf_email=$(EMAIL)" \
"d_crypt=$(D_CRYPT)" \
"d_mymalloc=$(PERL_MALLOC)" \
@@ -728,7 +739,7 @@
# Top targets
#
-all: hostminiperl $(MINIMOD) $(CONFIGPM) $(PERLEXE) Extensions
+all: hostminiperl $(MINIMOD) $(CONFIGPM) $(UNIDATAFILES) $(PERLEXE) Extensions
$(DYNALOADER)$(o) : $(DYNALOADER).c $(CORE_H) $(EXTDIR)\DynaLoader\dlutils.c
@@ -741,8 +752,7 @@
$(XCOPY) ..\ext\re\re.pm $(LIBDIR)\*.*
$(RCOPY) include $(XCOREDIR)\*.*
$(XCOPY) ..\win32\include $(XCOREDIR)\*.*
- -$(HPERL) -I..\lib -MCross=$(CROSS_NAME) config_h.PL
"INST_VER=$(INST_VER)" "CORE_DIR=$(XCOREDIR)"
- if errorlevel 1 $(MAKE) /$(MAKEFLAGS) $(CONFIGPM)
+ $(HPERL) -I..\lib -MCross=$(CROSS_NAME) config_h.PL
"INST_VER=$(INST_VER)" "CORE_DIR=$(XCOREDIR)"
.\config.h:
-del /f config.h
@@ -929,13 +939,6 @@
mv perl-$(MACHINE).tar.gz h:/freenet/new
cd ..
-!if "$(MACHINE)" == "wince-arm-hpc-wce300"
-install: all
- $(CECOPY) pc:$(MACHINE)/perl.exe ce:$(INSTALL_ROOT)/bin
- $(CECOPY) pc:$(MACHINE)/perl$(PV).dll ce:$(INSTALL_ROOT)/bin
-install_dlls: dlls
- $(CECOPY) pc:../lib/auto/IO/io.dll ce:$(INSTALL_ROOT)/lib/auto/IO/io.dll
-!else
install: all
-cemkdir "$(INSTALL_ROOT)"
-cemkdir "$(INSTALL_ROOT)\bin"
@@ -943,7 +946,10 @@
$(CECOPY) "pc:$(MACHINE)/perl.exe" "ce:$(INSTALL_ROOT)/bin"
$(CECOPY) "pc:$(MACHINE)/perl$(PV).dll" "ce:$(INSTALL_ROOT)/bin"
$(CECOPY) "pc:../xlib/$(CROSS_NAME)/Config.pm" "ce:$(INSTALL_ROOT)/lib"
-!endif
+
+$(UNIDATAFILES) : $(HPERL) $(CONFIGPM) ..\lib\unicore\mktables
+ cd ..\lib\unicore && \
+ $(HPERL) -I.. mktables
dist: all
$(HPERL) -I..\lib -MCross=$(CROSS_NAME) makedist.pl
--distdir=dist-$(CROSS_NAME) --cross-name=$(CROSS_NAME)
==== //depot/maint-5.8/perl/wince/config.ce#14 (text) ====
Index: perl/wince/config.ce
--- perl/wince/config.ce#13~28207~ 2006-05-16 06:57:39.000000000 -0700
+++ perl/wince/config.ce 2007-02-05 09:37:09.000000000 -0800
@@ -1,6 +1,6 @@
## Configured by: ~cf_email~
## Target system: WINCE
-Author='Rainer Keuchel <[EMAIL PROTECTED]'
+Author=''
PERL_CONFIG_SH='true'
CONFIGDOTSH='true'
Date='$Date'
@@ -417,7 +417,7 @@
d_socklen_t='undef'
d_sockpair='undef'
d_socks5_init='undef'
-d_sprintf_returns_strlen='undef'
+d_sprintf_returns_strlen='define'
d_sqrtl='undef'
d_srand48_r='undef'
d_srandom_r='undef'
@@ -930,6 +930,7 @@
useithreads='~USE_ITHREADS~'
uselargefiles='undef'
uselongdouble='undef'
+usemallocwrap='define'
usemorebits='undef'
usemultiplicity='undef'
usemymalloc='n'
@@ -977,4 +978,4 @@
PERL_API_SUBVERSION='~PERL_API_SUBVERSION~'
PERL_API_VERSION='~PERL_API_VERSION~'
PATCHLEVEL='~PERL_VERSION~'
-SUBVERSION='~PERL_SUBVERSION~'
+PERL_CONFIG_SH='true'
==== //depot/maint-5.8/perl/wince/config_H.ce#13 (text) ====
Index: perl/wince/config_H.ce
--- perl/wince/config_H.ce#12~23578~ 2004-11-30 08:56:12.000000000 -0800
+++ perl/wince/config_H.ce 2007-02-05 09:37:09.000000000 -0800
@@ -13,8 +13,8 @@
/*
* Package name : perl5
* Source directory :
- * Configuration time: Sat May 11 22:30:48 2002
- * Configured by : Rainer Keuchel
+ * Configuration time: Thu Nov 10 20:47:18 2005
+ * Configured by : vkon
* Target system :
*/
@@ -26,30 +26,12 @@
*/
#define LOC_SED "" /**/
-/* HAS_AINTL:
- * This symbol, if defined, indicates that the aintl routine is
- * available. If copysignl is also present we can emulate modfl.
- */
-/*#define HAS_AINTL / **/
-
/* HAS_ALARM:
* This symbol, if defined, indicates that the alarm routine is
* available.
*/
/*#define HAS_ALARM /**/
-/* HASATTRIBUTE:
- * This symbol indicates the C compiler can check for function attributes,
- * such as printf formats. This is normally only supported by GNU cc.
- */
-/*#define HASATTRIBUTE /**/
-#ifndef HASATTRIBUTE
-#ifdef __attribute__
-#undef __attribute__
-#endif
-#define __attribute__(_arg_)
-#endif
-
/* HAS_BCMP:
* This symbol is defined if the bcmp() routine is available to
* compare blocks of memory.
@@ -887,47 +869,6 @@
*/
/*#define I_VFORK /**/
-/* INTSIZE:
- * This symbol contains the value of sizeof(int) so that the C
- * preprocessor can make decisions based on it.
- */
-/* LONGSIZE:
- * This symbol contains the value of sizeof(long) so that the C
- * preprocessor can make decisions based on it.
- */
-/* SHORTSIZE:
- * This symbol contains the value of sizeof(short) so that the C
- * preprocessor can make decisions based on it.
- */
-#define INTSIZE 4 /**/
-#define LONGSIZE 4 /**/
-#define SHORTSIZE 2 /**/
-
-/* MULTIARCH:
- * This symbol, if defined, signifies that the build
- * process will produce some binary files that are going to be
- * used in a cross-platform environment. This is the case for
- * example with the NeXT "fat" binaries that contain executables
- * for several CPUs.
- */
-/*#define MULTIARCH /**/
-
-/* HAS_QUAD:
- * This symbol, if defined, tells that there's a 64-bit integer type,
- * Quad_t, and its unsigned counterpar, Uquad_t. QUADKIND will be one
- * of QUAD_IS_INT, QUAD_IS_LONG, QUAD_IS_LONG_LONG, or QUAD_IS_INT64_T.
- */
-/*#define HAS_QUAD /**/
-#ifdef HAS_QUAD
-# define Quad_t __int64 /**/
-# define Uquad_t unsigned __int64 /**/
-# define QUADKIND 5 /**/
-# define QUAD_IS_INT 1
-# define QUAD_IS_LONG 2
-# define QUAD_IS_LONG_LONG 3
-# define QUAD_IS_INT64_T 4
-#endif
-
/* HAS_ACCESSX:
* This symbol, if defined, indicates that the accessx routine is
* available to do extended access checks.
@@ -965,6 +906,27 @@
#define OSNAME "MSWin32" /**/
#define OSVERS "4.0" /**/
+/* USE_CROSS_COMPILE:
+ * This symbol, if defined, indicates that Perl is being cross-compiled.
+ */
+/* PERL_TARGETARCH:
+ * This symbol, if defined, indicates the target architecture
+ * Perl has been cross-compiled to. Undefined if not a cross-compile.
+ */
+#ifndef USE_CROSS_COMPILE
+/*#define USE_CROSS_COMPILE /**/
+#define PERL_TARGETARCH "undef" /**/
+#endif
+
+/* MULTIARCH:
+ * This symbol, if defined, signifies that the build
+ * process will produce some binary files that are going to be
+ * used in a cross-platform environment. This is the case for
+ * example with the NeXT "fat" binaries that contain executables
+ * for several CPUs.
+ */
+/*#define MULTIARCH /**/
+
/* MEM_ALIGNBYTES:
* This symbol contains the number of bytes required to align a
* double, or a long double when applicable. Usual values are 2,
@@ -989,7 +951,7 @@
* This symbol contains the ~name expanded version of ARCHLIB, to be used
* in programs that are not prepared to deal with ~ expansion at run-time.
*/
-#define ARCHLIB "\\Storage Card\\perl-tests\\bleadperl\\lib" /**/
+#define ARCHLIB "\\Storage Card\\perl58m\\lib" /**/
/*#define ARCHLIB_EXP "" /**/
/* ARCHNAME:
@@ -998,7 +960,7 @@
* where library files may be held under a private library, for
* instance.
*/
-#define ARCHNAME "MS Pocket PC-WCE300-MIPS" /**/
+#define ARCHNAME "MS Pocket PC-WCE300-ARM" /**/
/* HAS_ATOLF:
* This symbol, if defined, indicates that the atolf routine is
@@ -1020,8 +982,24 @@
* This symbol is the filename expanded version of the BIN symbol, for
* programs that do not want to deal with that at run-time.
*/
-#define BIN "\\Storage Card\\perl-tests\\bleadperl\\bin" /**/
-#define BIN_EXP "\\Storage Card\\perl-tests\\bleadperl\\bin" /**/
+#define BIN "\\Storage Card\\perl58m\\bin" /**/
+#define BIN_EXP "\\Storage Card\\perl58m\\bin" /**/
+
+/* INTSIZE:
+ * This symbol contains the value of sizeof(int) so that the C
+ * preprocessor can make decisions based on it.
+ */
+/* LONGSIZE:
+ * This symbol contains the value of sizeof(long) so that the C
+ * preprocessor can make decisions based on it.
+ */
+/* SHORTSIZE:
+ * This symbol contains the value of sizeof(short) so that the C
+ * preprocessor can make decisions based on it.
+ */
+#define INTSIZE 4 /**/
+#define LONGSIZE 4 /**/
+#define SHORTSIZE 2 /**/
/* BYTEORDER:
* This symbol holds the hexadecimal constant defined in byteorder,
@@ -1067,7 +1045,7 @@
#endif /* NeXT */
/* CAT2:
- * This macro catenates 2 tokens together.
+ * This macro concatenates 2 tokens together.
*/
/* STRINGIFY:
* This macro surrounds its token with double quotes.
@@ -1115,9 +1093,9 @@
* This symbol is intended to be used along with CPPRUN in the same manner
* symbol CPPMINUS is used with CPPSTDIN. It contains either "-" or "".
*/
-#define CPPSTDIN " -nologo -E"
+#define CPPSTDIN "clarm.exe -nologo -E"
#define CPPMINUS ""
-#define CPPRUN " -nologo -E"
+#define CPPRUN "clarm.exe -nologo -E"
#define CPPLAST ""
/* HAS__FWALK:
@@ -1139,6 +1117,9 @@
*/
/* ASCTIME_R_PROTO:
* This symbol encodes the prototype of asctime_r.
+ * It is zero if d_asctime_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_asctime_r
+ * is defined.
*/
/*#define HAS_ASCTIME_R /**/
#define ASCTIME_R_PROTO 0 /**/
@@ -1200,6 +1181,9 @@
*/
/* CRYPT_R_PROTO:
* This symbol encodes the prototype of crypt_r.
+ * It is zero if d_crypt_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_crypt_r
+ * is defined.
*/
/*#define HAS_CRYPT_R /**/
#define CRYPT_R_PROTO 0 /**/
@@ -1221,6 +1205,9 @@
*/
/* CTIME_R_PROTO:
* This symbol encodes the prototype of ctime_r.
+ * It is zero if d_ctime_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_ctime_r
+ * is defined.
*/
/*#define HAS_CTIME_R /**/
#define CTIME_R_PROTO 0 /**/
@@ -1239,6 +1226,9 @@
*/
/* DRAND48_R_PROTO:
* This symbol encodes the prototype of drand48_r.
+ * It is zero if d_drand48_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_drand48_r
+ * is defined.
*/
/*#define HAS_DRAND48_R /**/
#define DRAND48_R_PROTO 0 /**/
@@ -1263,6 +1253,9 @@
*/
/* ENDGRENT_R_PROTO:
* This symbol encodes the prototype of endgrent_r.
+ * It is zero if d_endgrent_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_endgrent_r
+ * is defined.
*/
/*#define HAS_ENDGRENT_R /**/
#define ENDGRENT_R_PROTO 0 /**/
@@ -1297,6 +1290,9 @@
*/
/* ENDPWENT_R_PROTO:
* This symbol encodes the prototype of endpwent_r.
+ * It is zero if d_endpwent_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_endpwent_r
+ * is defined.
*/
/*#define HAS_ENDPWENT_R /**/
#define ENDPWENT_R_PROTO 0 /**/
@@ -1307,12 +1303,6 @@
*/
/*#define HAS_ENDSERVENT /**/
-/* HAS_FAST_STDIO:
- * This symbol, if defined, indicates that the "fast stdio"
- * is available to manipulate the stdio buffers directly.
- */
-/*#define HAS_FAST_STDIO /**/
-
/* HAS_FCHDIR:
* This symbol, if defined, indicates that the fchdir routine is
* available to change directory using a file descriptor.
@@ -1444,6 +1434,12 @@
*/
/*#define HAS_FTELLO /**/
+/* HAS_FUTIMES:
+ * This symbol, if defined, indicates that the futimes routine is
+ * available to change file descriptor time stamps with struct timevals.
+ */
+/*#define HAS_FUTIMES /**/
+
/* Gconvert:
* This preprocessor macro is defined to convert a floating point
* number to a string without a trailing decimal point. This
@@ -1491,6 +1487,9 @@
*/
/* GETGRENT_R_PROTO:
* This symbol encodes the prototype of getgrent_r.
+ * It is zero if d_getgrent_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_getgrent_r
+ * is defined.
*/
/*#define HAS_GETGRENT_R /**/
#define GETGRENT_R_PROTO 0 /**/
@@ -1501,6 +1500,9 @@
*/
/* GETGRGID_R_PROTO:
* This symbol encodes the prototype of getgrgid_r.
+ * It is zero if d_getgrgid_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_getgrgid_r
+ * is defined.
*/
/*#define HAS_GETGRGID_R /**/
#define GETGRGID_R_PROTO 0 /**/
@@ -1511,6 +1513,9 @@
*/
/* GETGRNAM_R_PROTO:
* This symbol encodes the prototype of getgrnam_r.
+ * It is zero if d_getgrnam_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_getgrnam_r
+ * is defined.
*/
/*#define HAS_GETGRNAM_R /**/
#define GETGRNAM_R_PROTO 0 /**/
@@ -1582,6 +1587,9 @@
*/
/* GETLOGIN_R_PROTO:
* This symbol encodes the prototype of getlogin_r.
+ * It is zero if d_getlogin_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_getlogin_r
+ * is defined.
*/
/*#define HAS_GETLOGIN_R /**/
#define GETLOGIN_R_PROTO 0 /**/
@@ -1686,6 +1694,9 @@
*/
/* GETPWENT_R_PROTO:
* This symbol encodes the prototype of getpwent_r.
+ * It is zero if d_getpwent_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_getpwent_r
+ * is defined.
*/
/*#define HAS_GETPWENT_R /**/
#define GETPWENT_R_PROTO 0 /**/
@@ -1696,6 +1707,9 @@
*/
/* GETPWNAM_R_PROTO:
* This symbol encodes the prototype of getpwnam_r.
+ * It is zero if d_getpwnam_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_getpwnam_r
+ * is defined.
*/
/*#define HAS_GETPWNAM_R /**/
#define GETPWNAM_R_PROTO 0 /**/
@@ -1706,6 +1720,9 @@
*/
/* GETPWUID_R_PROTO:
* This symbol encodes the prototype of getpwuid_r.
+ * It is zero if d_getpwuid_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_getpwuid_r
+ * is defined.
*/
/*#define HAS_GETPWUID_R /**/
#define GETPWUID_R_PROTO 0 /**/
@@ -1736,6 +1753,9 @@
*/
/* GETSPNAM_R_PROTO:
* This symbol encodes the prototype of getspnam_r.
+ * It is zero if d_getspnam_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_getspnam_r
+ * is defined.
*/
/*#define HAS_GETSPNAM_R /**/
#define GETSPNAM_R_PROTO 0 /**/
@@ -1757,6 +1777,9 @@
*/
/* GMTIME_R_PROTO:
* This symbol encodes the prototype of gmtime_r.
+ * It is zero if d_gmtime_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_gmtime_r
+ * is defined.
*/
/*#define HAS_GMTIME_R /**/
#define GMTIME_R_PROTO 0 /**/
@@ -1801,12 +1824,6 @@
#define HAS_NTOHL /**/
#define HAS_NTOHS /**/
-/* HAS_ILOGBL:
- * This symbol, if defined, indicates that the ilogbl routine is
- * available. If scalbnl is also present we can emulate frexpl.
- */
-/*#define HAS_ILOGBL /**/
-
/* HAS_INT64_T:
* This symbol will defined if the C compiler supports int64_t.
* Usually the <inttypes.h> needs to be included, but sometimes
@@ -1865,6 +1882,9 @@
*/
/* LOCALTIME_R_PROTO:
* This symbol encodes the prototype of localtime_r.
+ * It is zero if d_localtime_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_localtime_r
+ * is defined.
*/
/*#define HAS_LOCALTIME_R /**/
#define LOCALTIME_R_PROTO 0 /**/
@@ -1910,6 +1930,18 @@
*/
/*#define HAS_MADVISE /**/
+/* HAS_MALLOC_SIZE:
+ * This symbol, if defined, indicates that the malloc_size
+ * routine is available for use.
+ */
+/*#define HAS_MALLOC_SIZE /**/
+
+/* HAS_MALLOC_GOOD_SIZE:
+ * This symbol, if defined, indicates that the malloc_good_size
+ * routine is available for use.
+ */
+/*#define HAS_MALLOC_GOOD_SIZE /**/
+
/* HAS_MEMCHR:
* This symbol, if defined, indicates that the memchr routine is available
* to locate characters within a C string.
@@ -1953,6 +1985,11 @@
* available to split a long double x into a fractional part f and
* an integer part i such that |f| < 1.0 and (f + i) = x.
*/
+/* HAS_MODFL_PROTO:
+ * This symbol, if defined, indicates that the system provides
+ * a prototype for the modfl() function. Otherwise, it is up
+ * to the program to supply one.
+ */
/* HAS_MODFL_POW32_BUG:
* This symbol, if defined, indicates that the modfl routine is
* broken for long doubles >= pow(2, 32).
@@ -1961,6 +1998,7 @@
* release 2.2.2 is known to be okay.
*/
/*#define HAS_MODFL /**/
+/*#define HAS_MODFL_PROTO /**/
/*#define HAS_MODFL_POW32_BUG /**/
/* HAS_MPROTECT:
@@ -2002,12 +2040,6 @@
*/
/*#define OLD_PTHREAD_CREATE_JOINABLE /**/
-/* HAS_PTHREAD_ATFORK:
- * This symbol, if defined, indicates that the pthread_atfork routine
- * is available to setup fork handlers.
- */
-/*#define HAS_PTHREAD_ATFORK / **/
-
/* HAS_PTHREAD_YIELD:
* This symbol, if defined, indicates that the pthread_yield
* routine is available to yield the execution of the current
@@ -2033,6 +2065,9 @@
*/
/* RANDOM_R_PROTO:
* This symbol encodes the prototype of random_r.
+ * It is zero if d_random_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_random_r
+ * is defined.
*/
/*#define HAS_RANDOM_R /**/
#define RANDOM_R_PROTO 0 /**/
@@ -2043,6 +2078,9 @@
*/
/* READDIR_R_PROTO:
* This symbol encodes the prototype of readdir_r.
+ * It is zero if d_readdir_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_readdir_r
+ * is defined.
*/
/*#define HAS_READDIR_R /**/
#define READDIR_R_PROTO 0 /**/
@@ -2092,12 +2130,6 @@
*/
/*#define HAS_SBRK_PROTO /**/
-/* HAS_SCALBNL:
- * This symbol, if defined, indicates that the scalbnl routine is
- * available. If ilogbl is also present we can emulate frexpl.
- */
-/*#define HAS_SCALBNL /**/
-
/* HAS_SEM:
* This symbol, if defined, indicates that the entire sem*(2) library is
* supported.
@@ -2122,6 +2154,9 @@
*/
/* SETGRENT_R_PROTO:
* This symbol encodes the prototype of setgrent_r.
+ * It is zero if d_setgrent_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_setgrent_r
+ * is defined.
*/
/*#define HAS_SETGRENT_R /**/
#define SETGRENT_R_PROTO 0 /**/
@@ -2187,6 +2222,9 @@
*/
/* SETPWENT_R_PROTO:
* This symbol encodes the prototype of setpwent_r.
+ * It is zero if d_setpwent_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_setpwent_r
+ * is defined.
*/
/*#define HAS_SETPWENT_R /**/
#define SETPWENT_R_PROTO 0 /**/
@@ -2253,6 +2291,12 @@
#define Siglongjmp(buf,retval) longjmp((buf),(retval))
#endif
+/* USE_SITECUSTOMIZE:
+ * This symbol, if defined, indicates that sitecustomize should
+ * be used.
+ */
+/*#define USE_SITECUSTOMIZE /**/
+
/* HAS_SOCKET:
* This symbol, if defined, indicates that the BSD socket interface is
* supported.
@@ -2318,6 +2362,9 @@
*/
/* SRAND48_R_PROTO:
* This symbol encodes the prototype of srand48_r.
+ * It is zero if d_srand48_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_srand48_r
+ * is defined.
*/
/*#define HAS_SRAND48_R /**/
#define SRAND48_R_PROTO 0 /**/
@@ -2328,6 +2375,9 @@
*/
/* SRANDOM_R_PROTO:
* This symbol encodes the prototype of srandom_r.
+ * It is zero if d_srandom_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_srandom_r
+ * is defined.
*/
/*#define HAS_SRANDOM_R /**/
#define SRANDOM_R_PROTO 0 /**/
@@ -2458,6 +2508,9 @@
*/
/* STRERROR_R_PROTO:
* This symbol encodes the prototype of strerror_r.
+ * It is zero if d_strerror_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_strerror_r
+ * is defined.
*/
/*#define HAS_STRERROR_R /**/
#define STRERROR_R_PROTO 0 /**/
@@ -2530,6 +2583,9 @@
*/
/* TMPNAM_R_PROTO:
* This symbol encodes the prototype of tmpnam_r.
+ * It is zero if d_tmpnam_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_tmpnam_r
+ * is defined.
*/
/*#define HAS_TMPNAM_R /**/
#define TMPNAM_R_PROTO 0 /**/
@@ -2569,6 +2625,12 @@
*/
/*#define HAS_UNORDERED /**/
+/* HAS_UNSETENV:
+ * This symbol, if defined, indicates that the unsetenv () routine is
+ * available for use.
+ */
+/*#define HAS_UNSETENV /**/
+
/* HAS_USTAT:
* This symbol, if defined, indicates that the ustat system call is
* available to query file system statistics by dev_t.
@@ -2919,10 +2981,15 @@
* This symbol, if defined, indicates to the C program that
* the struct tm has a tm_zone field.
*/
+/* HAS_TM_TM_GMTOFF:
+ * This symbol, if defined, indicates to the C program that
+ * the struct tm has a tm_gmtoff field.
+ */
/*#define I_TIME /**/
/*#define I_SYS_TIME /**/
/*#define I_SYS_TIME_KERNEL /**/
/*#define HAS_TM_TM_ZONE /**/
+/*#define HAS_TM_TM_GMTOFF /**/
/* I_USTAT:
* This symbol, if defined, indicates that <ustat.h> exists and
@@ -2991,10 +3058,15 @@
#define Malloc_t void * /**/
#define Free_t void /**/
+/* PERL_MALLOC_WRAP:
+ * This symbol, if defined, indicates that we'd like malloc wrap checks.
+ */
+#define PERL_MALLOC_WRAP /**/
+
/* MYMALLOC:
* This symbol, if defined, indicates that we're using our own malloc.
*/
-/*#define MYMALLOC /**/
+#define MYMALLOC /**/
/* Mode_t:
* This symbol holds the type used to declare file modes
@@ -3073,6 +3145,22 @@
*/
/*#define PERL_OTHERLIBDIRS "" /**/
+/* HAS_QUAD:
+ * This symbol, if defined, tells that there's a 64-bit integer type,
+ * Quad_t, and its unsigned counterpar, Uquad_t. QUADKIND will be one
+ * of QUAD_IS_INT, QUAD_IS_LONG, QUAD_IS_LONG_LONG, or QUAD_IS_INT64_T.
+ */
+/*#define HAS_QUAD /**/
+#ifdef HAS_QUAD
+# define Quad_t __int64 /**/
+# define Uquad_t unsigned __int64 /**/
+# define QUADKIND 5 /**/
+# define QUAD_IS_INT 1
+# define QUAD_IS_LONG 2
+# define QUAD_IS_LONG_LONG 3
+# define QUAD_IS_INT64_T 4
+#endif
+
/* IVTYPE:
* This symbol defines the C type used for Perl's IV.
*/
@@ -3147,6 +3235,10 @@
* This symbol contains the number of bits a variable of type NVTYPE
* can preserve of a variable of type UVTYPE.
*/
+/* NV_ZERO_IS_ALLBITS_ZERO:
+ * This symbol, if defined, indicates that a variable of type NVTYPE
+ * stores 0.0 in memory as all bits zero.
+ */
#define IVTYPE long /**/
#define UVTYPE unsigned long /**/
#define I8TYPE char /**/
@@ -3175,6 +3267,20 @@
#define NVSIZE 8 /**/
#define NV_PRESERVES_UV
#define NV_PRESERVES_UV_BITS undef
+#undef NV_ZERO_IS_ALLBITS_ZERO
+#if UVSIZE == 8
+# ifdef BYTEORDER
+# if BYTEORDER == 0x1234
+# undef BYTEORDER
+# define BYTEORDER 0x12345678
+# else
+# if BYTEORDER == 0x4321
+# undef BYTEORDER
+# define BYTEORDER 0x87654321
+# endif
+# endif
+# endif
+#endif
/* IVdf:
* This symbol defines the format string used for printing a Perl IV
@@ -3234,8 +3340,8 @@
* This symbol contains the ~name expanded version of PRIVLIB, to be used
* in programs that are not prepared to deal with ~ expansion at run-time.
*/
-#define PRIVLIB "\\Storage Card\\perl-tests\\bleadperl\\lib" /**/
-#define PRIVLIB_EXP (win32_get_privlib("5.8.0")) /**/
+#define PRIVLIB "\\Storage Card\\perl58m\\lib" /**/
+#define PRIVLIB_EXP (win32_get_privlib("5.9.3")) /**/
/* PTRSIZE:
* This symbol contains the size of a pointer, so that the C preprocessor
@@ -3299,7 +3405,9 @@
* etc., where nn is the actual signal number (e.g. NUM37).
* The signal number for sig_name[i] is stored in sig_num[i].
* The last element is 0 to terminate the list with a NULL. This
- * corresponds to the 0 at the end of the sig_num list.
+ * corresponds to the 0 at the end of the sig_name_init list.
+ * Note that this variable is initialized from the sig_name_init,
+ * not from sig_name (which is unused).
*/
/* SIG_NUM:
* This symbol contains a list of signal numbers, in the same order as the
@@ -3313,7 +3421,9 @@
* The signal number corresponding to sig_name[i] is sig_number[i].
* if (i < NSIG) then sig_number[i] == i.
* The last element is 0, corresponding to the 0 at the end of
- * the sig_name list.
+ * the sig_name_init list.
+ * Note that this variable is initialized from the sig_num_init,
+ * not from sig_num (which is unused).
*/
/* SIG_SIZE:
* This variable contains the number of elements of the SIG_NAME
@@ -3321,7 +3431,7 @@
*/
#define SIG_NAME "ZERO", "NUM01", "INT", "QUIT", "ILL", "NUM05", "NUM06",
"NUM07", "FPE", "KILL", "NUM10", "SEGV", "NUM12", "PIPE", "ALRM", "TERM",
"NUM16", "NUM17", "NUM18", "NUM19", "CHLD", "BREAK", "ABRT", "STOP", "NUM24",
"CONT", "CLD", 0 /**/
#define SIG_NUM 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17,
18, 19, 20, 21, 22, 23, 24, 25, 20, 0 /**/
-#define SIG_SIZE 0 /**/
+#define SIG_SIZE 27 /**/
/* SITEARCH:
* This symbol contains the name of the private library for this package.
@@ -3338,7 +3448,7 @@
* This symbol contains the ~name expanded version of SITEARCH, to be used
* in programs that are not prepared to deal with ~ expansion at run-time.
*/
-#define SITEARCH "\\Storage Card\\perl-tests\\bleadperl\\site\\lib"
/**/
+#define SITEARCH "\\Storage Card\\perl58m\\site\\lib" /**/
/*#define SITEARCH_EXP "" /**/
/* SITELIB:
@@ -3361,8 +3471,8 @@
* removed. The elements in inc_version_list (inc_version_list.U) can
* be tacked onto this variable to generate a list of directories to
search.
*/
-#define SITELIB "\\Storage Card\\perl-tests\\bleadperl\\site\\lib"
/**/
-#define SITELIB_EXP (win32_get_sitelib("5.8.0")) /**/
+#define SITELIB "\\Storage Card\\perl58m\\site\\lib" /**/
+#define SITELIB_EXP (win32_get_sitelib("5.9.3")) /**/
#define SITELIB_STEM "" /**/
/* Size_t_size:
@@ -3467,15 +3577,6 @@
/*#define USE_64_BIT_ALL /**/
#endif
-/* USE_FAST_STDIO:
- * This symbol, if defined, indicates that Perl should
- * be built to use 'fast stdio'.
- * Defaults to define in Perls 5.8 and earlier, to undef later.
- */
-#ifndef USE_FAST_STDIO
-#define USE_FAST_STDIO /**/
-#endif
-
/* USE_LARGE_FILES:
* This symbol, if defined, indicates that large file support
* should be used when available.
@@ -3514,7 +3615,7 @@
* used in a fully backward compatible manner.
*/
#ifndef USE_PERLIO
-/*#define USE_PERLIO /**/
+#define USE_PERLIO /**/
#endif
/* USE_SOCKS:
@@ -3605,6 +3706,35 @@
#define M_VOID /* Xenix strikes again */
#endif
+/* HASATTRIBUTE_FORMAT:
+ * Can we handle GCC attribute for checking printf-style formats
+ */
+/* HASATTRIBUTE_MALLOC:
+ * Can we handle GCC attribute for malloc-style functions.
+ */
+/* HASATTRIBUTE_NONNULL:
+ * Can we handle GCC attribute for nonnull function parms.
+ */
+/* HASATTRIBUTE_NORETURN:
+ * Can we handle GCC attribute for functions that do not return
+ */
+/* HASATTRIBUTE_PURE:
+ * Can we handle GCC attribute for pure functions
+ */
+/* HASATTRIBUTE_UNUSED:
+ * Can we handle GCC attribute for unused variables and arguments
+ */
+/* HASATTRIBUTE_WARN_UNUSED_RESULT:
+ * Can we handle GCC attribute for warning on unused results
+ */
+/*#define HASATTRIBUTE_FORMAT /**/
+/*#define HASATTRIBUTE_NORETURN /**/
+/*#define HASATTRIBUTE_MALLOC /**/
+/*#define HASATTRIBUTE_NONNULL /**/
+/*#define HASATTRIBUTE_PURE /**/
+/*#define HASATTRIBUTE_UNUSED /**/
+/*#define HASATTRIBUTE_WARN_UNUSED_RESULT /**/
+
/* HAS_CRYPT:
* This symbol, if defined, indicates that the crypt routine is available
* to encrypt passwords and the like.
@@ -3689,17 +3819,17 @@
*/
#define SH_PATH "cmd /x /c" /**/
-/* USE_CROSS_COMPILE:
- * This symbol, if defined, indicates that Perl is being cross-compiled.
+/* HAS_AINTL:
+ * This symbol, if defined, indicates that the aintl routine is
+ * available. If copysignl is also present we can emulate modfl.
*/
-/* PERL_TARGETARCH:
- * This symbol, if defined, indicates the target architecture
- * Perl has been cross-compiled to. Undefined if not a cross-compile.
+/*#define HAS_AINTL /**/
+
+/* HAS_CLEARENV:
+ * This symbol, if defined, indicates that the clearenv () routine is
+ * available for use.
*/
-#ifndef USE_CROSS_COMPILE
-/*#define USE_CROSS_COMPILE /**/
-#define PERL_TARGETARCH "undef" /**/
-#endif
+/*#define HAS_CLEARENV /**/
/* HAS_COPYSIGNL:
* This symbol, if defined, indicates that the copysignl routine is
@@ -3721,6 +3851,12 @@
*/
/*#define HAS_DIRFD /**/
+/* HAS_FAST_STDIO:
+ * This symbol, if defined, indicates that the "fast stdio"
+ * is available to manipulate the stdio buffers directly.
+ */
+/*#define HAS_FAST_STDIO /**/
+
/* HAS_FLOCK_PROTO:
* This symbol, if defined, indicates that the system provides
* a prototype for the flock() function. Otherwise, it is up
@@ -3747,6 +3883,18 @@
*/
/*#define HAS_FPCLASSL /**/
+/* HAS_ILOGBL:
+ * This symbol, if defined, indicates that the ilogbl routine is
+ * available. If scalbnl is also present we can emulate frexpl.
+ */
+/*#define HAS_ILOGBL /**/
+
+/* LIBM_LIB_VERSION:
+ * This symbol, if defined, indicates that libm exports _LIB_VERSION
+ * and that math.h defines the enum to manipulate it.
+ */
+/*#define LIBM_LIB_VERSION /**/
+
/* HAS_NL_LANGINFO:
* This symbol, if defined, indicates that the nl_langinfo routine is
* available to return local data. You will also need <langinfo.h>
@@ -3773,7 +3921,13 @@
* system call is available to set the contention scope attribute of
* a thread attribute object.
*/
-/*#define HAS_PTHREAD_ATTR_SETSCOPE / **/
+/*#define HAS_PTHREAD_ATTR_SETSCOPE /**/
+
+/* HAS_SCALBNL:
+ * This symbol, if defined, indicates that the scalbnl routine is
+ * available. If ilogbl is also present we can emulate frexpl.
+ */
+/*#define HAS_SCALBNL /**/
/* HAS_SIGPROCMASK:
* This symbol, if defined, indicates that the sigprocmask
@@ -3796,6 +3950,14 @@
*/
/*#define HAS_SOCKATMARK_PROTO /**/
+/* SPRINTF_RETURNS_STRLEN:
+ * This variable defines whether sprintf returns the length of the string
+ * (as per the ANSI spec). Some C libraries retain compatibility with
+ * pre-ANSI C and return a pointer to the passed in buffer; for these
+ * this variable will be undef.
+ */
+#define SPRINTF_RETURNS_STRLEN /**/
+
/* HAS_SETRESGID_PROTO:
* This symbol, if defined, indicates that the system provides
* a prototype for the setresgid() function. Otherwise, it is up
@@ -3818,17 +3980,17 @@
*/
/*#define HAS_STRFTIME /**/
-/* HAS_STRLCAT
- * This symbol, if defined, indicates that the strlcat routine is
- * available to do string concatenation.
+/* HAS_STRLCAT:
+ * This symbol, if defined, indicates that the strlcat () routine is
+ * available to do string concatenation.
*/
-/*#define HAS_STRLCAT /**/
+/*#define HAS_STRLCAT /**/
/* HAS_STRLCPY:
- * This symbol, if defined, indicates that the strlcpy routine is
- * available to do string copying.
+ * This symbol, if defined, indicates that the strlcpy () routine is
+ * available to do string copying.
*/
-/*#define HAS_STRLCPY /**/
+/*#define HAS_STRLCPY /**/
/* HAS_SYSCALL_PROTO:
* This symbol, if defined, indicates that the system provides
@@ -3873,12 +4035,30 @@
*/
/*#define I_LANGINFO /**/
+/* USE_FAST_STDIO:
+ * This symbol, if defined, indicates that Perl should
+ * be built to use 'fast stdio'.
+ * Defaults to define in Perls 5.8 and earlier, to undef later.
+ */
+#ifndef USE_FAST_STDIO
+/*#define USE_FAST_STDIO /**/
+#endif
+
+/* PERL_RELOCATABLE_INC:
+ * This symbol, if defined, indicates that we'd like to relocate entries
+ * in @INC at run time based on the location of the perl binary.
+ */
+#define PERL_RELOCATABLE_INC "undef" /**/
+
/* HAS_CTERMID_R:
* This symbol, if defined, indicates that the ctermid_r routine
* is available to ctermid re-entrantly.
*/
/* CTERMID_R_PROTO:
* This symbol encodes the prototype of ctermid_r.
+ * It is zero if d_ctermid_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_ctermid_r
+ * is defined.
*/
/*#define HAS_CTERMID_R /**/
#define CTERMID_R_PROTO 0 /**/
@@ -3889,6 +4069,9 @@
*/
/* ENDHOSTENT_R_PROTO:
* This symbol encodes the prototype of endhostent_r.
+ * It is zero if d_endhostent_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_endhostent_r
+ * is defined.
*/
/*#define HAS_ENDHOSTENT_R /**/
#define ENDHOSTENT_R_PROTO 0 /**/
@@ -3899,6 +4082,9 @@
*/
/* ENDNETENT_R_PROTO:
* This symbol encodes the prototype of endnetent_r.
+ * It is zero if d_endnetent_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_endnetent_r
+ * is defined.
*/
/*#define HAS_ENDNETENT_R /**/
#define ENDNETENT_R_PROTO 0 /**/
@@ -3909,6 +4095,9 @@
*/
/* ENDPROTOENT_R_PROTO:
* This symbol encodes the prototype of endprotoent_r.
+ * It is zero if d_endprotoent_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_endprotoent_r
+ * is defined.
*/
/*#define HAS_ENDPROTOENT_R /**/
#define ENDPROTOENT_R_PROTO 0 /**/
@@ -3919,6 +4108,9 @@
*/
/* ENDSERVENT_R_PROTO:
* This symbol encodes the prototype of endservent_r.
+ * It is zero if d_endservent_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_endservent_r
+ * is defined.
*/
/*#define HAS_ENDSERVENT_R /**/
#define ENDSERVENT_R_PROTO 0 /**/
@@ -3929,6 +4121,9 @@
*/
/* GETHOSTBYADDR_R_PROTO:
* This symbol encodes the prototype of gethostbyaddr_r.
+ * It is zero if d_gethostbyaddr_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_gethostbyaddr_r
+ * is defined.
*/
/*#define HAS_GETHOSTBYADDR_R /**/
#define GETHOSTBYADDR_R_PROTO 0 /**/
@@ -3939,6 +4134,9 @@
*/
/* GETHOSTBYNAME_R_PROTO:
* This symbol encodes the prototype of gethostbyname_r.
+ * It is zero if d_gethostbyname_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_gethostbyname_r
+ * is defined.
*/
/*#define HAS_GETHOSTBYNAME_R /**/
#define GETHOSTBYNAME_R_PROTO 0 /**/
@@ -3949,6 +4147,9 @@
*/
/* GETHOSTENT_R_PROTO:
* This symbol encodes the prototype of gethostent_r.
+ * It is zero if d_gethostent_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_gethostent_r
+ * is defined.
*/
/*#define HAS_GETHOSTENT_R /**/
#define GETHOSTENT_R_PROTO 0 /**/
@@ -3959,6 +4160,9 @@
*/
/* GETNETBYADDR_R_PROTO:
* This symbol encodes the prototype of getnetbyaddr_r.
+ * It is zero if d_getnetbyaddr_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_getnetbyaddr_r
+ * is defined.
*/
/*#define HAS_GETNETBYADDR_R /**/
#define GETNETBYADDR_R_PROTO 0 /**/
@@ -3969,6 +4173,9 @@
*/
/* GETNETBYNAME_R_PROTO:
* This symbol encodes the prototype of getnetbyname_r.
+ * It is zero if d_getnetbyname_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_getnetbyname_r
+ * is defined.
*/
/*#define HAS_GETNETBYNAME_R /**/
#define GETNETBYNAME_R_PROTO 0 /**/
@@ -3979,6 +4186,9 @@
*/
/* GETNETENT_R_PROTO:
* This symbol encodes the prototype of getnetent_r.
+ * It is zero if d_getnetent_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_getnetent_r
+ * is defined.
*/
/*#define HAS_GETNETENT_R /**/
#define GETNETENT_R_PROTO 0 /**/
@@ -3989,6 +4199,9 @@
*/
/* GETPROTOBYNAME_R_PROTO:
* This symbol encodes the prototype of getprotobyname_r.
+ * It is zero if d_getprotobyname_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_getprotobyname_r
+ * is defined.
*/
/*#define HAS_GETPROTOBYNAME_R /**/
#define GETPROTOBYNAME_R_PROTO 0 /**/
@@ -3999,6 +4212,9 @@
*/
/* GETPROTOBYNUMBER_R_PROTO:
* This symbol encodes the prototype of getprotobynumber_r.
+ * It is zero if d_getprotobynumber_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_getprotobynumber_r
+ * is defined.
*/
/*#define HAS_GETPROTOBYNUMBER_R /**/
#define GETPROTOBYNUMBER_R_PROTO 0 /**/
@@ -4009,6 +4225,9 @@
*/
/* GETPROTOENT_R_PROTO:
* This symbol encodes the prototype of getprotoent_r.
+ * It is zero if d_getprotoent_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_getprotoent_r
+ * is defined.
*/
/*#define HAS_GETPROTOENT_R /**/
#define GETPROTOENT_R_PROTO 0 /**/
@@ -4019,6 +4238,9 @@
*/
/* GETSERVBYNAME_R_PROTO:
* This symbol encodes the prototype of getservbyname_r.
+ * It is zero if d_getservbyname_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_getservbyname_r
+ * is defined.
*/
/*#define HAS_GETSERVBYNAME_R /**/
#define GETSERVBYNAME_R_PROTO 0 /**/
@@ -4029,6 +4251,9 @@
*/
/* GETSERVBYPORT_R_PROTO:
* This symbol encodes the prototype of getservbyport_r.
+ * It is zero if d_getservbyport_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_getservbyport_r
+ * is defined.
*/
/*#define HAS_GETSERVBYPORT_R /**/
#define GETSERVBYPORT_R_PROTO 0 /**/
@@ -4039,6 +4264,9 @@
*/
/* GETSERVENT_R_PROTO:
* This symbol encodes the prototype of getservent_r.
+ * It is zero if d_getservent_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_getservent_r
+ * is defined.
*/
/*#define HAS_GETSERVENT_R /**/
#define GETSERVENT_R_PROTO 0 /**/
@@ -4055,6 +4283,9 @@
*/
/* READDIR64_R_PROTO:
* This symbol encodes the prototype of readdir64_r.
+ * It is zero if d_readdir64_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_readdir64_r
+ * is defined.
*/
/*#define HAS_READDIR64_R /**/
#define READDIR64_R_PROTO 0 /**/
@@ -4065,6 +4296,9 @@
*/
/* SETHOSTENT_R_PROTO:
* This symbol encodes the prototype of sethostent_r.
+ * It is zero if d_sethostent_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_sethostent_r
+ * is defined.
*/
/*#define HAS_SETHOSTENT_R /**/
#define SETHOSTENT_R_PROTO 0 /**/
@@ -4075,6 +4309,9 @@
*/
/* SETLOCALE_R_PROTO:
* This symbol encodes the prototype of setlocale_r.
+ * It is zero if d_setlocale_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_setlocale_r
+ * is defined.
*/
/*#define HAS_SETLOCALE_R /**/
#define SETLOCALE_R_PROTO 0 /**/
@@ -4085,6 +4322,9 @@
*/
/* SETNETENT_R_PROTO:
* This symbol encodes the prototype of setnetent_r.
+ * It is zero if d_setnetent_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_setnetent_r
+ * is defined.
*/
/*#define HAS_SETNETENT_R /**/
#define SETNETENT_R_PROTO 0 /**/
@@ -4095,6 +4335,9 @@
*/
/* SETPROTOENT_R_PROTO:
* This symbol encodes the prototype of setprotoent_r.
+ * It is zero if d_setprotoent_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_setprotoent_r
+ * is defined.
*/
/*#define HAS_SETPROTOENT_R /**/
#define SETPROTOENT_R_PROTO 0 /**/
@@ -4105,6 +4348,9 @@
*/
/* SETSERVENT_R_PROTO:
* This symbol encodes the prototype of setservent_r.
+ * It is zero if d_setservent_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_setservent_r
+ * is defined.
*/
/*#define HAS_SETSERVENT_R /**/
#define SETSERVENT_R_PROTO 0 /**/
@@ -4115,6 +4361,9 @@
*/
/* TTYNAME_R_PROTO:
* This symbol encodes the prototype of ttyname_r.
+ * It is zero if d_ttyname_r is undef, and one of the
+ * REENTRANT_PROTO_T_ABC macros of reentr.h if d_ttyname_r
+ * is defined.
*/
/*#define HAS_TTYNAME_R /**/
#define TTYNAME_R_PROTO 0 /**/
==== //depot/maint-5.8/perl/wince/config_h.PL#2 (text) ====
Index: perl/wince/config_h.PL
--- perl/wince/config_h.PL#1~17645~ 2002-07-19 12:29:57.000000000 -0700
+++ perl/wince/config_h.PL 2007-02-05 09:37:09.000000000 -0800
@@ -18,7 +18,6 @@
}
$opt{CONFIG_H} ||= 'config.h';
-$opt{CORE_DIR} ||= '../lib/CORE';
warn "Writing $opt{CONFIG_H}\n";
@@ -53,7 +52,7 @@
die "$str:$@" if $@;
open(H,">$file.new") || die "Cannot open $file.new:$!";
-binmode H; # no CRs (which cause a spurious rebuild)
+#binmode H; # no CRs (which cause a spurious rebuild)
while (<SH>)
{
last if /^$term$/o;
==== //depot/maint-5.8/perl/wince/config_sh.PL#2 (text) ====
Index: perl/wince/config_sh.PL
--- perl/wince/config_sh.PL#1~17645~ 2002-07-19 12:29:57.000000000 -0700
+++ perl/wince/config_sh.PL 2007-02-05 09:37:09.000000000 -0800
@@ -44,8 +44,8 @@
shift(@{$optref});
}
-my @dynamic = FindExt::dynamic_extensions();
-my @noxs = FindExt::noxs_extensions();
+my @dynamic = FindExt::dynamic_ext();
+my @noxs = FindExt::nonxs_ext();
my @known = sort(@dynamic,split(/\s+/,$opt{'staticext'}),@noxs);
$opt{'known_extensions'} = join(' ',@known);
==== //depot/maint-5.8/perl/wince/wince.c#10 (text) ====
Index: perl/wince/wince.c
--- perl/wince/wince.c#9~25572~ 2005-09-22 09:46:28.000000000 -0700
+++ perl/wince/wince.c 2007-02-05 09:37:09.000000000 -0800
@@ -466,13 +466,10 @@
return -1;
}
-/* TODO */
Sighandler_t
win32_signal(int sig, Sighandler_t subcode)
{
- dTHX;
- Perl_croak_nocontext("signal() TBD on this platform");
- return FALSE;
+ return xcesignal(sig, subcode);
}
static void
End of Patch.
