develooper Front page | perl.perl5.porters | Postings from November 2000

[PATCH 5.7.0] for -Dusemultiplicity; was Re: perl@7777

Thread Next
From:
Robin Barker
Date:
November 21, 2000 05:36
Subject:
[PATCH 5.7.0] for -Dusemultiplicity; was Re: perl@7777
Message ID:
200011211336.NAA20657@tempest.npl.co.uk

> My try to build perl@7777 on cygwin/NT4 failed.
> 
> ./Configure -Dusedevel -des -Dusemultiplicity -Duseperlio 2>&1 | tee log.configure
> ...[snip]
> make -k -w 2>&1 | tee log.make
> ...[snip]
> `sh  cflags liblibperl5_7_0 mg.o`  mg.c
>           CCCMD =  gcc -DPERL_CORE -c -DPERL_USE_SAFE_PUTENV -fno-strict-aliasing
> -I/usr/local/include -O2
> [Errors in mg.c, etc.]

This was due to an error in scope.h.  
Patch attached.

Robin

--- scope.h.orig        Mon Nov 20 03:49:00 2000
+++ scope.h     	Tue Nov 21 13:03:12 2000
@@ -173,9 +173,9 @@
  * SSPTR() converts the index returned by SSNEW/SSNEWa() into a pointer.
  */
 
-#define SSNEW(size)             save_alloc(aTHX_ (size), 0)
+#define SSNEW(size)             save_alloc(size, 0)
 #define SSNEWt(n,t)             SSNEW((n)*sizeof(t))
-#define SSNEWa(size,align)     save_alloc(aTHX_ (size), \
+#define SSNEWa(size,align)     save_alloc(size, \
     (align - ((int)((caddr_t)&PL_savestack[PL_savestack_ix]) % align)) % align)
 #define SSNEWat(n,t,align)     SSNEWa((n)*sizeof(t), align)
 

-- 
Robin Barker                        | Email: Robin.Barker@npl.co.uk
CMSC, Building 10,                  | Phone: +44 (0) 20 8943 7090
National Physical Laboratory,       | Fax:   +44 (0) 20 8977 7091
Teddington, Middlesex, UK. TW11 OLW | WWW:   http://www.npl.co.uk

Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About