diff -r 4f2f89ce4247 -r 303757a437d3 WebKitTools/DumpRenderTree/mac/PerlSupport/DumpRenderTreeSupportTiger.pm --- a/WebKitTools/DumpRenderTree/mac/PerlSupport/DumpRenderTreeSupportTiger.pm Fri Sep 17 09:02:29 2010 +0300 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,54 +0,0 @@ -# This file was automatically generated by SWIG -package DumpRenderTreeSupport; -require Exporter; -require DynaLoader; -@ISA = qw(Exporter DynaLoader); -package DumpRenderTreeSupportc; -bootstrap DumpRenderTreeSupport; -package DumpRenderTreeSupport; -@EXPORT = qw( ); - -# ---------- BASE METHODS ------------- - -package DumpRenderTreeSupport; - -sub TIEHASH { - my ($classname,$obj) = @_; - return bless $obj, $classname; -} - -sub CLEAR { } - -sub FIRSTKEY { } - -sub NEXTKEY { } - -sub FETCH { - my ($self,$field) = @_; - my $member_func = "swig_${field}_get"; - $self->$member_func(); -} - -sub STORE { - my ($self,$field,$newval) = @_; - my $member_func = "swig_${field}_set"; - $self->$member_func($newval); -} - -sub this { - my $ptr = shift; - return tied(%$ptr); -} - - -# ------- FUNCTION WRAPPERS -------- - -package DumpRenderTreeSupport; - -*processIsCrashing = *DumpRenderTreeSupportc::processIsCrashing; - -# ------- VARIABLE STUBS -------- - -package DumpRenderTreeSupport; - -1;