1 # This file was automatically generated by SWIG 2 package DumpRenderTreeSupport; 3 require Exporter; 4 require DynaLoader; 5 @ISA = qw(Exporter DynaLoader); 6 package DumpRenderTreeSupportc; 7 bootstrap DumpRenderTreeSupport; 8 package DumpRenderTreeSupport; 9 @EXPORT = qw( ); 10 11 # ---------- BASE METHODS ------------- 12 13 package DumpRenderTreeSupport; 14 15 sub TIEHASH { 16 my ($classname,$obj) = @_; 17 return bless $obj, $classname; 18 } 19 20 sub CLEAR { } 21 22 sub FIRSTKEY { } 23 24 sub NEXTKEY { } 25 26 sub FETCH { 27 my ($self,$field) = @_; 28 my $member_func = "swig_${field}_get"; 29 $self->$member_func(); 30 } 31 32 sub STORE { 33 my ($self,$field,$newval) = @_; 34 my $member_func = "swig_${field}_set"; 35 $self->$member_func($newval); 36 } 37 38 sub this { 39 my $ptr = shift; 40 return tied(%$ptr); 41 } 42 43 44 # ------- FUNCTION WRAPPERS -------- 45 46 package DumpRenderTreeSupport; 47 48 *processIsCrashing = *DumpRenderTreeSupportc::processIsCrashing; 49 50 # ------- VARIABLE STUBS -------- 51 52 package DumpRenderTreeSupport; 53 54 1; 55