Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

[PATCH] perl5.005_60 cygwin port #411

Closed
p5pRT opened this issue Aug 21, 1999 · 1 comment
Closed

[PATCH] perl5.005_60 cygwin port #411

p5pRT opened this issue Aug 21, 1999 · 1 comment

Comments

@p5pRT
Copy link

p5pRT commented Aug 21, 1999

Migrated from rt.perl.org#1246 (status was 'resolved')

Searchable as RT1246$

@p5pRT
Copy link
Author

p5pRT commented Aug 21, 1999

From EFifer@sanwaint.com


Some minor fixes/cleanup of the Cygwin port.

diff -ur perl5.005_60.orig/cygwin/Makefile.SHs
perl5.005_60/cygwin/Makefile.SHs

Inline Patch
--- perl5.005_60.orig/cygwin/Makefile.SHs	Sun Aug 01 21:25:26 1999
+++ perl5.005_60/cygwin/Makefile.SHs	Tue Aug 10 12:39:49 1999
@@ -132,6 +132,7 @@
 	;;
 *)
 $spitshell >>Makefile <<'!NO!SUBS!'
+cwobj = $(obj)
 
 # perl library
 $(LIBPERL)$(LIB_EXT): $& perl$(OBJ_EXT) $(cwobj)
diff -ur perl5.005_60.orig/ext/ByteLoader/byterun.h
perl5.005_60/ext/ByteLoader/byterun.h
Inline Patch
--- perl5.005_60.orig/ext/ByteLoader/byterun.h	Tue Jul 20 18:17:55 1999
+++ perl5.005_60/ext/ByteLoader/byterun.h	Fri Aug 06 11:10:39 1999
@@ -151,7 +151,12 @@
     OPt_COP		/* 10 */
 };
 
-EXT void byterun(pTHXo_ struct bytestream bs);
+#if defined(CYGWIN)
+extern
+#else
+EXT
+#endif
+void byterun(pTHXo_ struct bytestream bs);
 
 #define INIT_SPECIALSV_LIST STMT_START { \
 	PL_specialsv_list[0] = Nullsv; \
diff -ur perl5.005_60.orig/ext/SDBM_File/sdbm/sdbm.c
perl5.005_60/ext/SDBM_File/sdbm/sdbm.c
Inline Patch
--- perl5.005_60.orig/ext/SDBM_File/sdbm/sdbm.c	Tue Jul 20 18:17:56 1999
+++ perl5.005_60/ext/SDBM_File/sdbm/sdbm.c	Fri Aug 06 11:10:39 1999
@@ -128,7 +128,7 @@
  * open the files in sequence, and stat the dirfile.
  * If we fail anywhere, undo everything, return NULL.
  */
-#if defined(OS2) || defined(MSDOS) || defined(WIN32)
+#if defined(OS2) || defined(MSDOS) || defined(WIN32) || defined(CYGWIN)
 	flags |= O_BINARY;
 #	endif
 	if ((db->pagf = open(pagname, flags, mode)) > -1) {
diff -ur perl5.005_60.orig/hints/cygwin.sh perl5.005_60/hints/cygwin.sh
--- perl5.005_60.orig/hints/cygwin.sh	Sun Aug 01 21:25:26 1999
+++ perl5.005_60/hints/cygwin.sh	Fri Aug 06 16:49:23 1999
@@ -25,6 +25,7 @@
 useshrplib='true'
 libperl='libperl.a'
 dlext='dll'
+dynamic_ext=' '
 
 man1dir=/usr/local/man/man1
 man3dir=/usr/local/man/man3
diff -ur perl5.005_60.orig/perl.h perl5.005_60/perl.h
--- perl5.005_60.orig/perl.h	Mon Aug 02 21:21:56 1999
+++ perl5.005_60/perl.h	Fri Aug 06 11:10:39 1999
@@ -2491,7 +2491,7 @@
 EXT struct perl_vars PL_Vars;
 EXT struct perl_vars *PL_VarsPtr INIT(&PL_Vars);
 #else /* PERL_CORE */
-#if !defined(__GNUC__) || !(defined(WIN32) || defined(CYGWIN))
+#if !defined(__GNUC__) || !defined(WIN32)
 EXT
 #endif /* WIN32 */
 struct perl_vars *PL_VarsPtr;
diff -ur perl5.005_60.orig/pp_sys.c perl5.005_60/pp_sys.c
--- perl5.005_60.orig/pp_sys.c	Mon Aug 02 17:07:41 1999
+++ perl5.005_60/pp_sys.c	Fri Aug 06 11:10:39 1999
@@ -4739,7 +4739,7 @@
 PP(pp_spwent)
 {
     djSP;
-#if defined(HAS_PASSWD) && defined(HAS_SETPWENT) && !defined(CYGWIN)
+#if defined(HAS_PASSWD) && defined(HAS_SETPWENT)
     setpwent();
 #   ifdef HAS_SETSPENT
     setspent();
diff -ur perl5.005_60.orig/t/io/fs.t perl5.005_60/t/io/fs.t
--- perl5.005_60.orig/t/io/fs.t	Tue Jul 20 18:18:12 1999
+++ perl5.005_60/t/io/fs.t	Fri Aug 06 13:26:49 1999
@@ -10,7 +10,7 @@
 use Config;
 
 $Is_Dosish = ($^O eq 'MSWin32' or $^O eq 'dos' or
-	      $^O eq 'os2' or $^O eq 'mint' or $^O =~ /cygwin/);
+	      $^O eq 'os2' or $^O eq 'mint');
 
 print "1..28\n";
 
diff -ur perl5.005_60.orig/t/io/tell.t perl5.005_60/t/io/tell.t
--- perl5.005_60.orig/t/io/tell.t	Tue Jul 20 18:18:12 1999
+++ perl5.005_60/t/io/tell.t	Fri Aug 06 13:26:58 1999
@@ -7,7 +7,7 @@
 $TST = 'tst';
 
 $Is_Dosish = ($^O eq 'MSWin32' or $^O eq 'dos' or
-	      $^O eq 'os2' or $^O eq 'mint' or $^O =~ /cygwin/);
+	      $^O eq 'os2' or $^O eq 'mint');
 
 open($TST, '../Configure') || (die "Can't open ../Configure");
 binmode $TST if $Is_Dosish;
diff -ur perl5.005_60.orig/t/lib/anydbm.t perl5.005_60/t/lib/anydbm.t
--- perl5.005_60.orig/t/lib/anydbm.t	Tue Jul 20 18:18:12 1999
+++ perl5.005_60/t/lib/anydbm.t	Fri Aug 06 13:27:07 1999
@@ -13,7 +13,7 @@
 print "1..12\n";
 
 $Is_Dosish = ($^O eq 'amigaos' || $^O eq 'MSWin32' or $^O eq 'dos' or
-	      $^O eq 'os2' or $^O eq 'mint' or $^O =~ /cygwin/);
+	      $^O eq 'os2' or $^O eq 'mint');
 
 unlink <Op_dbmx*>;
 
diff -ur perl5.005_60.orig/t/op/stat.t perl5.005_60/t/op/stat.t
--- perl5.005_60.orig/t/op/stat.t	Tue Jul 20 18:18:15 1999
+++ perl5.005_60/t/op/stat.t	Fri Aug 06 13:27:40 1999
@@ -13,7 +13,7 @@
 
 $Is_MSWin32 = $^O eq 'MSWin32';
 $Is_Dos = $^O eq 'dos';
-$Is_Dosish = $Is_Dos || $^O eq 'os2' || $Is_MSWin32 || $^O =~ /cygwin/;
+$Is_Dosish = $Is_Dos || $^O eq 'os2' || $Is_MSWin32;
 chop($cwd = ($Is_MSWin32 ? `cd` : `pwd`));
 
 $DEV = `ls -l /dev` unless $Is_Dosish;

-----------------------------------------------------------------

---
Site configuration information for perl 5.00560:

Configured by FiferE at Fri Aug 6 11​:18​:13 BST 1999.

Summary of my perl5 (revision 5.0 version 5 subversion 60) configuration​:
  Platform​:
  osname=cygwin_nt-4.0, osvers=20.1, archname=cygwin
  uname='cygwin_nt-4.0 sil2036 20.1 (0.311) 1998-12-3 20​:39​:18 i686
unknown '
  config_args=''
  hint=recommended, useposix=true, d_sigaction=define
  usethreads=undef useperlio=undef d_sfio=undef
  use64bits=undef usemultiplicity=undef
  Compiler​:
  cc='gcc', optimize='-g', gccversion=2.95 19990728 (release)
  cppflags='-DCYGWIN -I/usr/include -I/usr/local/include -DDEBUGGING
-I/usr/local/include'
  ccflags ='-DCYGWIN -I/usr/include -I/usr/local/include -DDEBUGGING
-I/usr/local/include'
  stdchar='char', d_stdstdio=undef, usevfork=false
  intsize=4, longsize=4, ptrsize=4, doublesize=8
  d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12
  alignbytes=8, usemymalloc=n, prototype=define
  Linker and Libraries​:
  ld='ld2', ldflags ='-L/usr/i586-cygwin32/lib -L/usr/lib
-L/usr/local/lib'
  libpth=/opt/cygnus/cygwin-b20/H-i586-cygwin32/i586-cygwin32/lib
/usr/local/lib
  libs=-lcygwin -lm -lkernel32
  libc=/opt/cygnus/cygwin-b20/H-i586-cygwin32/i586-cygwin32/lib/libc.a,
so=dll, useshrplib=true, libperl=libperl.a
  Dynamic Linking​:
  dlsrc=dl_cygwin.xs, dlext=dll, d_dlsymun=undef, ccdlflags=' '
  cccdlflags=' ', lddlflags='-L/usr/local/lib -L/usr/i586-cygwin32/lib
-L/usr/lib'

Locally applied patches​:
 


@​INC for perl 5.00560​:
  lib
  /usr/local/lib/perl5/5.00560/cygwin
  /usr/local/lib/perl5/5.00560
  /usr/local/lib/site_perl/5.00560/cygwin
  /usr/local/lib/site_perl
  .


Environment for perl 5.00560​:
  HOME=/efifer
  LANG (unset)
  LANGUAGE (unset)
  LD_LIBRARY_PATH (unset)
  LOGDIR (unset)

PATH=/opt/cygnus/cygwin-b20/H-i586-cygwin32/bin​:/usr/local/bin​:/usr/X11R6.4/
bin​:/usr/local/emacs/bin​:/share/bin​:/x86/bin​:.​:/usr/local/lib​://t/sybase/dll
://c/progra~1/barra/aegis/shared
  PERL_BADLANG (unset)
  SHELL=/opt/cygnus/cygwin-b20/H-i586-cygwin32/bin/bash.exe

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Projects
None yet
Development

No branches or pull requests

1 participant