changed component assignment operation

Author: degawa

src/stdlib_bitsets_large.fypp

@@ -95,8 +95,7 @@ contains
         type(bitset_large), intent(in)    :: set2
 
         set1 % num_bits = set2 % num_bits
-        allocate( set1 % blocks( size( set2 % blocks, kind=bits_kind ) ) )
-        set1 % blocks(:) = set2 % blocks(:)
+        set1 % blocks = set2 % blocks(:)
 
     end subroutine assign_large