{
        no strict 'refs';
        my $full_name = "${pkg}::$name";
        $declared{$full_name}++;
        if (@_ == 1) {
            my $scalar = $_[0];
            *$full_name = sub () { $scalar };
        } elsif (@_) {
            my @list = @_;
            *$full_name = sub () { @list };
        } else {
            *$full_name = sub () { };
        }
    }