Re: ANNOUNCE : WML 1.6.8

[Hans de Graaff <nospam@thanx>]

Denis Barbier <barbier@imacs.polytechnique.fr> writes:

> In this release, many bugs have been fixed, it runs faster and i
> need your help to improve it more and more.

One bug appears not to be fixed yet. I'll include the patch
below. This fixes a compile problem with perl 5.005 with threads
included.

I guess these dTHR; lines should really be protected by some version
number check to make sure they don't break building with a perl 5.004
release, but I'm not sure how to do this, and I don't have perl 5.004
around anymore to test.

Hans

--- eperl_perl5.c~	Tue Jan 12 15:24:14 1999
+++ eperl_perl5.c	Fri Jan 15 21:37:32 1999
@@ -69,6 +69,7 @@
 #if AC_perl_vnum < 500476
     IoFLAGS(GvIOp(defoutgv)) |= IOf_FLUSH; /* $|=1 */
 #else
+    dTHR;
     IoFLAGS(GvIOp(PL_defoutgv)) |= IOf_FLUSH; /* $|=1 */
 #endif
     return;
@@ -97,6 +98,7 @@
 */
 void Perl5_SetScalar(char *pname, char *vname, char *vvalue)
 {
+    dTHR;
     ENTER;
     save_hptr(&curstash); 
     curstash = gv_stashpv(pname, TRUE);