This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Make multiple #line’s update dblines in evals
[perl5.git] / NetWare / nw5thread.h
index ad70db0..b1a2534 100644 (file)
@@ -1,6 +1,6 @@
 
 /*
- * Copyright © 2001 Novell, Inc. All Rights Reserved.
+ * Copyright Â© 2001 Novell, Inc. All Rights Reserved.
  *
  * You may distribute under the terms of either the GNU General Public
  * License or the Artistic License, as specified in the README file.
@@ -154,7 +154,7 @@ typedef unsigned long perl_mutex;
 #endif //#if 0
 
 //Following has to be defined CHKSGP
-#if defined(PERLDLL) && defined(USE_DECLSPEC_THREAD) && (!defined(__BORLANDC__) || defined(_DLL))
+#if defined(PERLDLL) && defined(USE_DECLSPEC_THREAD)
 extern __declspec(thread) void *PL_current_context;
 #define PERL_SET_CONTEXT(t)            (PL_current_context = t)
 #define PERL_GET_CONTEXT               PL_current_context