Lines Matching refs:wall
623 my @wall = $YY->get_dup('Wall') ;
624 my %wall ;
625 @wall{@wall} = @wall ;
626 ok 199, (@wall == 3 && $wall{'Larry'}
627 && $wall{'Stone'} && $wall{'Brick'});
637 my %wall = $YY->get_dup('Wall', 1) ;
638 ok 202, keys %wall == 3 && $wall{'Larry'} == 1 && $wall{'Stone'} == 1
639 && $wall{'Brick'} == 1 ;