This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
perl.h: Remove ';' from 'NOOP;'
authorKarl Williamson <khw@cpan.org>
Tue, 1 Dec 2020 14:28:13 +0000 (07:28 -0700)
committerKarl Williamson <khw@cpan.org>
Fri, 4 Dec 2020 21:43:13 +0000 (14:43 -0700)
These are useless here

perl.h

diff --git a/perl.h b/perl.h
index 8bccfb4..047b4ee 100644 (file)
--- a/perl.h
+++ b/perl.h
@@ -3081,10 +3081,10 @@ typedef struct padname PADNAME;
 #  define ENV_INIT            MUTEX_INIT(&PL_env_mutex);
 #  define ENV_TERM            MUTEX_DESTROY(&PL_env_mutex);
 #else
-#  define ENV_LOCK       NOOP;
-#  define ENV_UNLOCK     NOOP;
-#  define ENV_INIT       NOOP;
-#  define ENV_TERM       NOOP;
+#  define ENV_LOCK       NOOP
+#  define ENV_UNLOCK     NOOP
+#  define ENV_INIT       NOOP
+#  define ENV_TERM       NOOP
 #endif
 
 /* Some critical sections need to lock both the locale and the environment.