[comp.lang.perl] Perl 4.003 on NeXT 2.01

louie@sayshell.umd.edu (Louis A. Mamakos) (04/19/91)

I had to make a few changes to get perl to compile on the NeXT, mostly ANSI C
stuff and prototypes and BSD compatibility stuff.


*** Configure.ORIG	Sat Apr 13 19:42:25 1991
--- Configure	Sat Apr 13 22:24:00 1991
***************
*** 746,751 ****
--- 746,752 ----
      test -f /dynix && dflt="$dflt dynix"
      test -f /dnix && dflt="$dflt dnix"
      test -f /bin/mips && /bin/mips && dflt="$dflt mips"
+     test -d /NextApps && dflt="$dflt next"
      if test -f /bin/uname || test -f /usr/bin/uname; then
  	set `uname -a | tr '[A-Z]' '[a-z]'`
  
*** perl.h.ORIG	Sat Apr 13 20:24:22 1991
--- perl.h	Sat Apr 13 20:31:48 1991
***************
*** 102,109 ****
--- 102,113 ----
  #    endif /* ndef memcpy */
  #  endif /* ndef __STDC__ */
  
+ #ifndef	HAS_BCOPY
  #define bcopy(s1,s2,l) memcpy(s2,s1,l)
+ #endif
+ #ifndef	HAS_BZERO
  #define bzero(s,l) memset(s,0,l)
+ #endif
  #endif /* HAS_MEMCPY */
  
  #ifndef HAS_BCMP		/* prefer bcmp slightly 'cuz it doesn't order */
*** perl.c.ORIG	Sat Apr 13 19:39:45 1991
--- perl.c	Sat Apr 13 22:27:29 1991
***************
*** 50,56 ****
  {
      register STR *str;
      register char *s;
!     char *index(), *strcpy(), *getenv();
      bool dosearch = FALSE;
  #ifdef DOSUID
      char *validarg = "";
--- 50,59 ----
  {
      register STR *str;
      register char *s;
! #ifndef	__STDC__
!     char *index();
! #endif
!     char *strcpy(), *getenv();
      bool dosearch = FALSE;
  #ifdef DOSUID
      char *validarg = "";
*** hints/next.sh.ORIG	Sat Apr 13 22:29:15 1991
--- hints/next.sh	Sat Apr 13 22:01:45 1991
***************
*** 1,2 ****
--- 1,4 ----
  : Just disable defaulting to -fpcc-struct-return, since gcc is native compiler.
  ccflags="$ccflags "
+ groupstype="int"
+ usemymalloc="n"