constant.pm: Remove redundant truth checks

It is not possible to reach these without $symtab’s having been
assigned a stash reference.

1 files changed, 2 insertions, 2 deletions

diff --git a/dist/constant/lib/constant.pm b/dist/constant/lib/constant.pm
index a838d7ee02..d1b32c57d7 100644
--- a/dist/constant/lib/constant.pm
+++ b/dist/constant/lib/constant.pm
@@ -162,7 +162,7 @@ sub import {
 		    # The check in Perl_ck_rvconst knows that inlinable
 		    # constants from cv_const_sv are read only. So we have to:
 		    Internals::SvREADONLY($scalar, 1);
-		    if ($symtab && !exists $symtab->{$name}) {
+		    if (!exists $symtab->{$name}) {
 			$symtab->{$name} = \$scalar;
 			++$flush_mro->{$pkg};
 		    }
@@ -178,7 +178,7 @@ sub import {
 		if (_CAN_PCS_FOR_ARRAY) {
 		    _make_const($list[$_]) for 0..$#list;
 		    _make_const(@list);
-		    if ($symtab && !exists $symtab->{$name}) {
+		    if (!exists $symtab->{$name}) {
 			$symtab->{$name} = \@list;
 			$flush_mro->{$pkg}++;
 		    }