package Tie::Hash::ExpandingHash;
use strict;
use warnings;

use Tie::Hash;
our @ISA = 'Tie::StdHash';

sub CLEAR    { } # NOT IMPLEMENTED

sub FORCE_CLEAR { %{$_[0]} = () }