Make ~(chr(a).chr(b)) eq chr(~a).chr(~b) on utf8.

[p5sagit/p5-mst-13.2.git] / makedef.pl

diff --git a/makedef.pl b/makedef.pl
index 108993c..a02a298 100644 (file)
--- a/makedef.pl
+++ b/makedef.pl
@@ -421,7 +421,7 @@ unless ($define{'USE_5005THREADS'}) {
                    Perl_find_threadsv
                    Perl_unlock_condpair
                    Perl_magic_mutexfree
-                   Perl_lock
+                   Perl_sv_lock
                    )];
 }