Recompile changes from 6443548.

src/DOMite-Tests.js

@@ -70,24 +70,28 @@ selector: "testDefaultInsertElement",
 protocol: 'testing',
 fn: function (){
 var self=this;
-function $Domite(){return $globals.Domite||(typeof Domite=="undefined"?nil:Domite)}
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 return $core.withContext(function($ctx1) {
 //>>excludeEnd("ctx");
-var $3,$2,$1,$4;
-$recv($recv($Domite())._new()).__lt_lt($recv($Domite())._newElement_("p"));
-$3=$recv(document)._body();
+var $2,$1,$5,$4,$3,$6;
+$2=self._testedClass();
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["testedClass"]=1;
+//>>excludeEnd("ctx");
+$1=$recv($2)._new();
+$recv($1).__lt_lt($recv(self._testedClass())._newElement_("p"));
+$5=$recv(document)._body();
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["body"]=1;
 //>>excludeEnd("ctx");
-$2=$recv($3)._innerHTML();
-$1=$recv($2)._endsWith_("<p></p>");
-self._assert_($1);
-$4=$recv(document)._body();
+$4=$recv($5)._innerHTML();
+$3=$recv($4)._endsWith_("<p></p>");
+self._assert_($3);
+$6=$recv(document)._body();
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["body"]=2;
 //>>excludeEnd("ctx");
-$recv($4)._removeChild_($recv($recv(document)._body())._lastChild());
+$recv($6)._removeChild_($recv($recv(document)._body())._lastChild());
 return self;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 }, function($ctx1) {$ctx1.fill(self,"testDefaultInsertElement",{},$globals.DOMiteTest)});
@@ -95,10 +99,10 @@ return self;
 },
 //>>excludeStart("ide", pragmas.excludeIdeData);
 args: [],
-source: "testDefaultInsertElement\x0a\x09Domite new << (Domite newElement: 'p').\x0a\x09self assert: (document body innerHTML endsWith: '<p></p>').\x0a\x09document body removeChild: document body lastChild",
-referencedClasses: ["Domite"],
+source: "testDefaultInsertElement\x0a\x0a\x09self testedClass new << (self testedClass newElement: 'p').\x0a\x09self assert: (document body innerHTML endsWith: '<p></p>').\x0a\x09document body removeChild: document body lastChild",
+referencedClasses: [],
 //>>excludeEnd("ide");
-messageSends: ["<<", "new", "newElement:", "assert:", "endsWith:", "innerHTML", "body", "removeChild:", "lastChild"]
+messageSends: ["<<", "new", "testedClass", "newElement:", "assert:", "endsWith:", "innerHTML", "body", "removeChild:", "lastChild"]
 }),
 $globals.DOMiteTest);
 
@@ -108,12 +112,11 @@ selector: "testDefaultInsertString",
 protocol: 'testing',
 fn: function (){
 var self=this;
-function $Domite(){return $globals.Domite||(typeof Domite=="undefined"?nil:Domite)}
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 return $core.withContext(function($ctx1) {
 //>>excludeEnd("ctx");
 var $3,$2,$1,$4;
-$recv($recv($Domite())._new()).__lt_lt("a foo in a bar");
+$recv($recv(self._testedClass())._new()).__lt_lt("a foo in a bar");
 $3=$recv(document)._body();
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["body"]=1;
@@ -133,10 +136,10 @@ return self;
 },
 //>>excludeStart("ide", pragmas.excludeIdeData);
 args: [],
-source: "testDefaultInsertString\x0a\x09Domite new << 'a foo in a bar'.\x0a\x09self assert: (document body innerHTML endsWith: 'a foo in a bar').\x0a\x09document body removeChild: document body lastChild",
-referencedClasses: ["Domite"],
+source: "testDefaultInsertString\x0a\x09self testedClass new << 'a foo in a bar'.\x0a\x09self assert: (document body innerHTML endsWith: 'a foo in a bar').\x0a\x09document body removeChild: document body lastChild",
+referencedClasses: [],
 //>>excludeEnd("ide");
-messageSends: ["<<", "new", "assert:", "endsWith:", "innerHTML", "body", "removeChild:", "lastChild"]
+messageSends: ["<<", "new", "testedClass", "assert:", "endsWith:", "innerHTML", "body", "removeChild:", "lastChild"]
 }),
 $globals.DOMiteTest);
 
@@ -146,27 +149,31 @@ selector: "testDefaultInsertStringInFragment",
 protocol: 'testing',
 fn: function (){
 var self=this;
-function $Domite(){return $globals.Domite||(typeof Domite=="undefined"?nil:Domite)}
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 return $core.withContext(function($ctx1) {
 //>>excludeEnd("ctx");
-var $3,$2,$1,$4;
-$recv($recv($Domite())._new()).__lt_lt($recv($recv($Domite())._newStream()).__lt_lt("a foo in a bar"));
+var $2,$1,$5,$4,$3,$6;
+$2=self._testedClass();
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["testedClass"]=1;
+//>>excludeEnd("ctx");
+$1=$recv($2)._new();
+$recv($1).__lt_lt($recv($recv(self._testedClass())._newStream()).__lt_lt("a foo in a bar"));
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["<<"]=1;
 //>>excludeEnd("ctx");
-$3=$recv(document)._body();
+$5=$recv(document)._body();
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["body"]=1;
 //>>excludeEnd("ctx");
-$2=$recv($3)._innerHTML();
-$1=$recv($2)._endsWith_("a foo in a bar");
-self._assert_($1);
-$4=$recv(document)._body();
+$4=$recv($5)._innerHTML();
+$3=$recv($4)._endsWith_("a foo in a bar");
+self._assert_($3);
+$6=$recv(document)._body();
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["body"]=2;
 //>>excludeEnd("ctx");
-$recv($4)._removeChild_($recv($recv(document)._body())._lastChild());
+$recv($6)._removeChild_($recv($recv(document)._body())._lastChild());
 return self;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 }, function($ctx1) {$ctx1.fill(self,"testDefaultInsertStringInFragment",{},$globals.DOMiteTest)});
@@ -174,10 +181,10 @@ return self;
 },
 //>>excludeStart("ide", pragmas.excludeIdeData);
 args: [],
-source: "testDefaultInsertStringInFragment\x0a\x09Domite new << (Domite newStream << 'a foo in a bar').\x0a\x09self assert: (document body innerHTML endsWith: 'a foo in a bar').\x0a\x09document body removeChild: document body lastChild",
-referencedClasses: ["Domite"],
+source: "testDefaultInsertStringInFragment\x0a\x09self testedClass new << (self testedClass newStream << 'a foo in a bar').\x0a\x09self assert: (document body innerHTML endsWith: 'a foo in a bar').\x0a\x09document body removeChild: document body lastChild",
+referencedClasses: [],
 //>>excludeEnd("ide");
-messageSends: ["<<", "new", "newStream", "assert:", "endsWith:", "innerHTML", "body", "removeChild:", "lastChild"]
+messageSends: ["<<", "new", "testedClass", "newStream", "assert:", "endsWith:", "innerHTML", "body", "removeChild:", "lastChild"]
 }),
 $globals.DOMiteTest);
 
@@ -188,33 +195,40 @@ protocol: 'testing',
 fn: function (){
 var self=this;
 var d;
-function $Domite(){return $globals.Domite||(typeof Domite=="undefined"?nil:Domite)}
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 return $core.withContext(function($ctx1) {
 //>>excludeEnd("ctx");
-var $1,$2;
-d=$recv($Domite())._at_("#goo");
+var $1,$2,$3,$4;
+$1=self._testedClass();
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["testedClass"]=1;
+//>>excludeEnd("ctx");
+d=$recv($1)._at_("#goo");
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["at:"]=1;
 //>>excludeEnd("ctx");
-$1=$recv(d)._isInvalid();
+$2=$recv(d)._isInvalid();
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["isInvalid"]=1;
 //>>excludeEnd("ctx");
-self._assert_($1);
-d=$recv($Domite())._at_("body");
+self._assert_($2);
+$3=self._testedClass();
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["testedClass"]=2;
+//>>excludeEnd("ctx");
+d=$recv($3)._at_("body");
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["at:"]=2;
 //>>excludeEnd("ctx");
-$2=$recv(d)._isInvalid();
+$4=$recv(d)._isInvalid();
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["isInvalid"]=2;
 //>>excludeEnd("ctx");
-self._deny_($2);
+self._deny_($4);
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["deny:"]=1;
 //>>excludeEnd("ctx");
-d=$recv($Domite())._at_("html body div#fixture");
+d=$recv(self._testedClass())._at_("html body div#fixture");
 self._deny_($recv(d)._isInvalid());
 return self;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
@@ -223,10 +237,10 @@ return self;
 },
 //>>excludeStart("ide", pragmas.excludeIdeData);
 args: [],
-source: "testFromBadSelectorIsInvalid\x0a\x09| d |\x0a\x09d := Domite at: '#goo'.\x0a\x09self assert: d isInvalid.\x0a\x09d := Domite at: 'body'.\x0a\x09self deny: d isInvalid.\x0a\x09d := Domite at: 'html body div#fixture'.\x0a\x09self deny: d isInvalid",
-referencedClasses: ["Domite"],
+source: "testFromBadSelectorIsInvalid\x0a\x09| d |\x0a\x09d := self testedClass at: '#goo'.\x0a\x09self assert: d isInvalid.\x0a\x09d := self testedClass at: 'body'.\x0a\x09self deny: d isInvalid.\x0a\x09d := self testedClass at: 'html body div#fixture'.\x0a\x09self deny: d isInvalid",
+referencedClasses: [],
 //>>excludeEnd("ide");
-messageSends: ["at:", "assert:", "isInvalid", "deny:"]
+messageSends: ["at:", "testedClass", "assert:", "isInvalid", "deny:"]
 }),
 $globals.DOMiteTest);
 
@@ -237,11 +251,10 @@ protocol: 'testing',
 fn: function (){
 var self=this;
 var d;
-function $Domite(){return $globals.Domite||(typeof Domite=="undefined"?nil:Domite)}
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 return $core.withContext(function($ctx1) {
 //>>excludeEnd("ctx");
-d=$recv($Domite())._fromElement_(self["@fixtureDiv"]);
+d=$recv(self._testedClass())._fromElement_(self["@fixtureDiv"]);
 $recv(d).__lt_lt($recv(document)._createElement_("pre"));
 self._assert_($recv($recv($recv(document)._body())._innerHTML())._endsWith_(">sentinel<pre></pre></div>"));
 return self;
@@ -251,10 +264,10 @@ return self;
 },
 //>>excludeStart("ide", pragmas.excludeIdeData);
 args: [],
-source: "testInsertDomNode\x0a\x09| d |\x0a\x09d := Domite fromElement: fixtureDiv.\x0a\x09d << (document createElement: 'pre').\x0a\x09self assert: (document body innerHTML endsWith: '>sentinel<pre></pre></div>')",
-referencedClasses: ["Domite"],
+source: "testInsertDomNode\x0a\x09| d |\x0a\x09d := self testedClass fromElement: fixtureDiv.\x0a\x09d << (document createElement: 'pre').\x0a\x09self assert: (document body innerHTML endsWith: '>sentinel<pre></pre></div>')",
+referencedClasses: [],
 //>>excludeEnd("ide");
-messageSends: ["fromElement:", "<<", "createElement:", "assert:", "endsWith:", "innerHTML", "body"]
+messageSends: ["fromElement:", "testedClass", "<<", "createElement:", "assert:", "endsWith:", "innerHTML", "body"]
 }),
 $globals.DOMiteTest);
 
@@ -265,12 +278,16 @@ protocol: 'testing',
 fn: function (){
 var self=this;
 var d;
-function $Domite(){return $globals.Domite||(typeof Domite=="undefined"?nil:Domite)}
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 return $core.withContext(function($ctx1) {
 //>>excludeEnd("ctx");
-d=$recv($Domite())._at_("#fixture");
-$recv(d).__lt_lt($recv($recv($Domite())._newStream()).__lt_lt($recv(document)._createElement_("script")));
+var $1;
+$1=self._testedClass();
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["testedClass"]=1;
+//>>excludeEnd("ctx");
+d=$recv($1)._at_("#fixture");
+$recv(d).__lt_lt($recv($recv(self._testedClass())._newStream()).__lt_lt($recv(document)._createElement_("script")));
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["<<"]=1;
 //>>excludeEnd("ctx");
@@ -282,10 +299,10 @@ return self;
 },
 //>>excludeStart("ide", pragmas.excludeIdeData);
 args: [],
-source: "testInsertDomNodeInFragment\x0a\x09| d |\x0a\x09d := Domite at: '#fixture'.\x0a\x09d << (Domite newStream << (document createElement: 'script')).\x0a\x09self assert: (document body innerHTML endsWith: '>sentinel<script></script></div>')",
-referencedClasses: ["Domite"],
+source: "testInsertDomNodeInFragment\x0a\x09| d |\x0a\x09d := self testedClass at: '#fixture'.\x0a\x09d << (self testedClass newStream << (document createElement: 'script')).\x0a\x09self assert: (document body innerHTML endsWith: '>sentinel<script></script></div>')",
+referencedClasses: [],
 //>>excludeEnd("ide");
-messageSends: ["at:", "<<", "newStream", "createElement:", "assert:", "endsWith:", "innerHTML", "body"]
+messageSends: ["at:", "testedClass", "<<", "newStream", "createElement:", "assert:", "endsWith:", "innerHTML", "body"]
 }),
 $globals.DOMiteTest);
 
@@ -296,12 +313,16 @@ protocol: 'testing',
 fn: function (){
 var self=this;
 var d;
-function $Domite(){return $globals.Domite||(typeof Domite=="undefined"?nil:Domite)}
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 return $core.withContext(function($ctx1) {
 //>>excludeEnd("ctx");
-d=$recv($Domite())._at_("html body div#fixture");
-$recv(d).__lt_lt($recv($Domite())._newElement_("p"));
+var $1;
+$1=self._testedClass();
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["testedClass"]=1;
+//>>excludeEnd("ctx");
+d=$recv($1)._at_("html body div#fixture");
+$recv(d).__lt_lt($recv(self._testedClass())._newElement_("p"));
 self._assert_($recv($recv($recv(document)._body())._innerHTML())._endsWith_(">sentinel<p></p></div>"));
 return self;
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
@@ -310,10 +331,10 @@ return self;
 },
 //>>excludeStart("ide", pragmas.excludeIdeData);
 args: [],
-source: "testInsertElement\x0a\x09| d |\x0a\x09d := Domite at: 'html body div#fixture'.\x0a\x09d << (Domite newElement: 'p').\x0a\x09self assert: (document body innerHTML endsWith: '>sentinel<p></p></div>')",
-referencedClasses: ["Domite"],
+source: "testInsertElement\x0a\x09| d |\x0a\x09d := self testedClass at: 'html body div#fixture'.\x0a\x09d << (self testedClass newElement: 'p').\x0a\x09self assert: (document body innerHTML endsWith: '>sentinel<p></p></div>')",
+referencedClasses: [],
 //>>excludeEnd("ide");
-messageSends: ["at:", "<<", "newElement:", "assert:", "endsWith:", "innerHTML", "body"]
+messageSends: ["at:", "testedClass", "<<", "newElement:", "assert:", "endsWith:", "innerHTML", "body"]
 }),
 $globals.DOMiteTest);
 
@@ -324,12 +345,20 @@ protocol: 'testing',
 fn: function (){
 var self=this;
 var d,p,s;
-function $Domite(){return $globals.Domite||(typeof Domite=="undefined"?nil:Domite)}
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 return $core.withContext(function($ctx1) {
 //>>excludeEnd("ctx");
-d=$recv($Domite())._fromElement_(self["@fixtureDiv"]);
-p=$recv($Domite())._newElement_("p");
+var $1,$2;
+$1=self._testedClass();
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["testedClass"]=1;
+//>>excludeEnd("ctx");
+d=$recv($1)._fromElement_(self["@fixtureDiv"]);
+$2=self._testedClass();
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["testedClass"]=2;
+//>>excludeEnd("ctx");
+p=$recv($2)._newElement_("p");
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["newElement:"]=1;
 //>>excludeEnd("ctx");
@@ -337,7 +366,7 @@ $recv(d).__lt_lt(p);
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["<<"]=1;
 //>>excludeEnd("ctx");
-s=$recv($Domite())._newElement_("span");
+s=$recv(self._testedClass())._newElement_("span");
 $recv(p).__lt_lt(s);
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["<<"]=2;
@@ -351,10 +380,10 @@ return self;
 },
 //>>excludeStart("ide", pragmas.excludeIdeData);
 args: [],
-source: "testInsertElementTwoLevel\x0a\x09| d p s |\x0a\x09d := Domite fromElement: fixtureDiv.\x0a\x09p := Domite newElement: 'p'.\x0a\x09d << p.\x0a\x09s := Domite newElement: 'span'.\x0a\x09p << s.\x0a\x09s << 'dom-mite'.\x0a\x09self assert: (document body innerHTML endsWith: '>sentinel<p><span>dom-mite</span></p></div>')",
-referencedClasses: ["Domite"],
+source: "testInsertElementTwoLevel\x0a\x09| d p s |\x0a\x09d := self testedClass fromElement: fixtureDiv.\x0a\x09p := self testedClass newElement: 'p'.\x0a\x09d << p.\x0a\x09s := self testedClass newElement: 'span'.\x0a\x09p << s.\x0a\x09s << 'dom-mite'.\x0a\x09self assert: (document body innerHTML endsWith: '>sentinel<p><span>dom-mite</span></p></div>')",
+referencedClasses: [],
 //>>excludeEnd("ide");
-messageSends: ["fromElement:", "newElement:", "<<", "assert:", "endsWith:", "innerHTML", "body"]
+messageSends: ["fromElement:", "testedClass", "newElement:", "<<", "assert:", "endsWith:", "innerHTML", "body"]
 }),
 $globals.DOMiteTest);
 
@@ -365,44 +394,63 @@ protocol: 'testing',
 fn: function (){
 var self=this;
 var d,p,s;
-function $Domite(){return $globals.Domite||(typeof Domite=="undefined"?nil:Domite)}
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 return $core.withContext(function($ctx1) {
 //>>excludeEnd("ctx");
-var $1,$3,$2,$4,$6,$5;
-d=$recv($Domite())._at_("#fixture");
-p=$recv($Domite())._newElement_("p");
+var $1,$2,$3,$6,$5,$4,$7,$8,$11,$10,$9;
+$1=self._testedClass();
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["testedClass"]=1;
+//>>excludeEnd("ctx");
+d=$recv($1)._at_("#fixture");
+$2=self._testedClass();
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["testedClass"]=2;
+//>>excludeEnd("ctx");
+p=$recv($2)._newElement_("p");
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["newElement:"]=1;
 //>>excludeEnd("ctx");
-$1=d;
-$3=$recv($Domite())._newStream();
+$3=d;
+$6=self._testedClass();
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["testedClass"]=3;
+//>>excludeEnd("ctx");
+$5=$recv($6)._newStream();
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["newStream"]=1;
 //>>excludeEnd("ctx");
-$2=$recv($3).__lt_lt(p);
+$4=$recv($5).__lt_lt(p);
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["<<"]=2;
 //>>excludeEnd("ctx");
-$recv($1).__lt_lt($2);
+$recv($3).__lt_lt($4);
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["<<"]=1;
 //>>excludeEnd("ctx");
-s=$recv($Domite())._newElement_("span");
-$4=p;
-$6=$recv($Domite())._newStream();
+$7=self._testedClass();
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["testedClass"]=4;
+//>>excludeEnd("ctx");
+s=$recv($7)._newElement_("span");
+$8=p;
+$11=self._testedClass();
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["testedClass"]=5;
+//>>excludeEnd("ctx");
+$10=$recv($11)._newStream();
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["newStream"]=2;
 //>>excludeEnd("ctx");
-$5=$recv($6).__lt_lt(s);
+$9=$recv($10).__lt_lt(s);
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["<<"]=4;
 //>>excludeEnd("ctx");
-$recv($4).__lt_lt($5);
+$recv($8).__lt_lt($9);
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["<<"]=3;
 //>>excludeEnd("ctx");
-$recv(s).__lt_lt($recv($recv($Domite())._newStream()).__lt_lt("dom-mite"));
+$recv(s).__lt_lt($recv($recv(self._testedClass())._newStream()).__lt_lt("dom-mite"));
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["<<"]=5;
 //>>excludeEnd("ctx");
@@ -414,10 +462,10 @@ return self;
 },
 //>>excludeStart("ide", pragmas.excludeIdeData);
 args: [],
-source: "testInsertElementTwoLevelViaFragments\x0a\x09| d p s |\x0a\x09d := Domite at: '#fixture'.\x0a\x09p := Domite newElement: 'p'.\x0a\x09d << (Domite newStream << p).\x0a\x09s := Domite newElement: 'span'.\x0a\x09p << (Domite newStream << s).\x0a\x09s << (Domite newStream << 'dom-mite').\x0a\x09self assert: (document body innerHTML endsWith: '>sentinel<p><span>dom-mite</span></p></div>')",
-referencedClasses: ["Domite"],
+source: "testInsertElementTwoLevelViaFragments\x0a\x09| d p s |\x0a\x09d := self testedClass at: '#fixture'.\x0a\x09p := self testedClass newElement: 'p'.\x0a\x09d << (self testedClass newStream << p).\x0a\x09s := self testedClass newElement: 'span'.\x0a\x09p << (self testedClass newStream << s).\x0a\x09s << (self testedClass newStream << 'dom-mite').\x0a\x09self assert: (document body innerHTML endsWith: '>sentinel<p><span>dom-mite</span></p></div>')",
+referencedClasses: [],
 //>>excludeEnd("ide");
-messageSends: ["at:", "newElement:", "<<", "newStream", "assert:", "endsWith:", "innerHTML", "body"]
+messageSends: ["at:", "testedClass", "newElement:", "<<", "newStream", "assert:", "endsWith:", "innerHTML", "body"]
 }),
 $globals.DOMiteTest);
 
@@ -428,69 +476,100 @@ protocol: 'testing',
 fn: function (){
 var self=this;
 var d,p,s;
-function $Domite(){return $globals.Domite||(typeof Domite=="undefined"?nil:Domite)}
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 return $core.withContext(function($ctx1) {
 //>>excludeEnd("ctx");
-var $1,$3,$5,$4,$2,$6,$8,$10,$9,$7,$11,$13,$12;
-d=$recv($Domite())._fromElement_(self["@fixtureDiv"]);
-p=$recv($Domite())._newElement_("p");
+var $1,$2,$3,$6,$5,$9,$8,$7,$4,$10,$11,$14,$13,$17,$16,$15,$12,$18,$21,$20,$19;
+$1=self._testedClass();
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["testedClass"]=1;
+//>>excludeEnd("ctx");
+d=$recv($1)._fromElement_(self["@fixtureDiv"]);
+$2=self._testedClass();
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["testedClass"]=2;
+//>>excludeEnd("ctx");
+p=$recv($2)._newElement_("p");
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["newElement:"]=1;
 //>>excludeEnd("ctx");
-$1=d;
-$3=$recv($Domite())._newStream();
+$3=d;
+$6=self._testedClass();
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["testedClass"]=3;
+//>>excludeEnd("ctx");
+$5=$recv($6)._newStream();
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["newStream"]=1;
 //>>excludeEnd("ctx");
-$5=$recv($Domite())._newStream();
+$9=self._testedClass();
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["testedClass"]=4;
+//>>excludeEnd("ctx");
+$8=$recv($9)._newStream();
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["newStream"]=2;
 //>>excludeEnd("ctx");
-$4=$recv($5).__lt_lt(p);
+$7=$recv($8).__lt_lt(p);
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["<<"]=3;
 //>>excludeEnd("ctx");
-$2=$recv($3).__lt_lt($4);
+$4=$recv($5).__lt_lt($7);
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["<<"]=2;
 //>>excludeEnd("ctx");
-$recv($1).__lt_lt($2);
+$recv($3).__lt_lt($4);
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["<<"]=1;
 //>>excludeEnd("ctx");
-s=$recv($Domite())._newElement_("span");
-$6=p;
-$8=$recv($Domite())._newStream();
+$10=self._testedClass();
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["testedClass"]=5;
+//>>excludeEnd("ctx");
+s=$recv($10)._newElement_("span");
+$11=p;
+$14=self._testedClass();
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["testedClass"]=6;
+//>>excludeEnd("ctx");
+$13=$recv($14)._newStream();
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["newStream"]=3;
 //>>excludeEnd("ctx");
-$10=$recv($Domite())._newStream();
+$17=self._testedClass();
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["testedClass"]=7;
+//>>excludeEnd("ctx");
+$16=$recv($17)._newStream();
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["newStream"]=4;
 //>>excludeEnd("ctx");
-$9=$recv($10).__lt_lt(s);
+$15=$recv($16).__lt_lt(s);
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["<<"]=6;
 //>>excludeEnd("ctx");
-$7=$recv($8).__lt_lt($9);
+$12=$recv($13).__lt_lt($15);
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["<<"]=5;
 //>>excludeEnd("ctx");
-$recv($6).__lt_lt($7);
+$recv($11).__lt_lt($12);
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["<<"]=4;
 //>>excludeEnd("ctx");
-$11=s;
-$13=$recv($Domite())._newStream();
+$18=s;
+$21=self._testedClass();
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["testedClass"]=8;
+//>>excludeEnd("ctx");
+$20=$recv($21)._newStream();
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["newStream"]=5;
 //>>excludeEnd("ctx");
-$12=$recv($13).__lt_lt($recv($recv($Domite())._newStream()).__lt_lt("dom-mite"));
+$19=$recv($20).__lt_lt($recv($recv(self._testedClass())._newStream()).__lt_lt("dom-mite"));
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["<<"]=8;
 //>>excludeEnd("ctx");
-$recv($11).__lt_lt($12);
+$recv($18).__lt_lt($19);
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["<<"]=7;
 //>>excludeEnd("ctx");
@@ -502,10 +581,10 @@ return self;
 },
 //>>excludeStart("ide", pragmas.excludeIdeData);
 args: [],
-source: "testInsertElementTwoLevelViaTwoLevelFragments\x0a\x09| d p s |\x0a\x09d := Domite fromElement: fixtureDiv.\x0a\x09p := Domite newElement: 'p'.\x0a\x09d << (Domite newStream << (Domite newStream << p)).\x0a\x09s := Domite newElement: 'span'.\x0a\x09p << (Domite newStream << (Domite newStream << s)).\x0a\x09s << (Domite newStream << (Domite newStream << 'dom-mite')).\x0a\x09self assert: (document body innerHTML endsWith: '>sentinel<p><span>dom-mite</span></p></div>')",
-referencedClasses: ["Domite"],
+source: "testInsertElementTwoLevelViaTwoLevelFragments\x0a\x09| d p s |\x0a\x09d := self testedClass fromElement: fixtureDiv.\x0a\x09p := self testedClass newElement: 'p'.\x0a\x09d << (self testedClass newStream << (self testedClass newStream << p)).\x0a\x09s := self testedClass newElement: 'span'.\x0a\x09p << (self testedClass newStream << (self testedClass newStream << s)).\x0a\x09s << (self testedClass newStream << (self testedClass newStream << 'dom-mite')).\x0a\x09self assert: (document body innerHTML endsWith: '>sentinel<p><span>dom-mite</span></p></div>')",
+referencedClasses: [],
 //>>excludeEnd("ide");
-messageSends: ["fromElement:", "newElement:", "<<", "newStream", "assert:", "endsWith:", "innerHTML", "body"]
+messageSends: ["fromElement:", "testedClass", "newElement:", "<<", "newStream", "assert:", "endsWith:", "innerHTML", "body"]
 }),
 $globals.DOMiteTest);
 
@@ -516,11 +595,10 @@ protocol: 'testing',
 fn: function (){
 var self=this;
 var d;
-function $Domite(){return $globals.Domite||(typeof Domite=="undefined"?nil:Domite)}
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 return $core.withContext(function($ctx1) {
 //>>excludeEnd("ctx");
-d=$recv($Domite())._fromElement_(self["@fixtureDiv"]);
+d=$recv(self._testedClass())._fromElement_(self["@fixtureDiv"]);
 $recv(d).__lt_lt("a foo in a bar");
 self._assert_($recv($recv($recv(document)._body())._innerHTML())._endsWith_(">sentinela foo in a bar</div>"));
 return self;
@@ -530,10 +608,10 @@ return self;
 },
 //>>excludeStart("ide", pragmas.excludeIdeData);
 args: [],
-source: "testInsertString\x0a\x09| d |\x0a\x09d := Domite fromElement: fixtureDiv.\x0a\x09d << 'a foo in a bar'.\x0a\x09self assert: (document body innerHTML endsWith: '>sentinela foo in a bar</div>')",
-referencedClasses: ["Domite"],
+source: "testInsertString\x0a\x09| d |\x0a\x09d := self testedClass fromElement: fixtureDiv.\x0a\x09d << 'a foo in a bar'.\x0a\x09self assert: (document body innerHTML endsWith: '>sentinela foo in a bar</div>')",
+referencedClasses: [],
 //>>excludeEnd("ide");
-messageSends: ["fromElement:", "<<", "assert:", "endsWith:", "innerHTML", "body"]
+messageSends: ["fromElement:", "testedClass", "<<", "assert:", "endsWith:", "innerHTML", "body"]
 }),
 $globals.DOMiteTest);
 
@@ -544,12 +622,16 @@ protocol: 'testing',
 fn: function (){
 var self=this;
 var d;
-function $Domite(){return $globals.Domite||(typeof Domite=="undefined"?nil:Domite)}
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 return $core.withContext(function($ctx1) {
 //>>excludeEnd("ctx");
-d=$recv($Domite())._at_("#fixture");
-$recv(d).__lt_lt($recv($recv($Domite())._newStream()).__lt_lt("a foo in a bar"));
+var $1;
+$1=self._testedClass();
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["testedClass"]=1;
+//>>excludeEnd("ctx");
+d=$recv($1)._at_("#fixture");
+$recv(d).__lt_lt($recv($recv(self._testedClass())._newStream()).__lt_lt("a foo in a bar"));
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["<<"]=1;
 //>>excludeEnd("ctx");
@@ -561,10 +643,153 @@ return self;
 },
 //>>excludeStart("ide", pragmas.excludeIdeData);
 args: [],
-source: "testInsertStringInFragment\x0a\x09| d |\x0a\x09d := Domite at: '#fixture'.\x0a\x09d << (Domite newStream << 'a foo in a bar').\x0a\x09self assert: (document body innerHTML endsWith: '>sentinela foo in a bar</div>')",
+source: "testInsertStringInFragment\x0a\x09| d |\x0a\x09d := self testedClass at: '#fixture'.\x0a\x09d << (self testedClass newStream << 'a foo in a bar').\x0a\x09self assert: (document body innerHTML endsWith: '>sentinela foo in a bar</div>')",
+referencedClasses: [],
+//>>excludeEnd("ide");
+messageSends: ["at:", "testedClass", "<<", "newStream", "assert:", "endsWith:", "innerHTML", "body"]
+}),
+$globals.DOMiteTest);
+
+$core.addMethod(
+$core.method({
+selector: "testInsertTable",
+protocol: 'testing',
+fn: function (){
+var self=this;
+var d,tbl,tr;
+function $Domite(){return $globals.Domite||(typeof Domite=="undefined"?nil:Domite)}
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+return $core.withContext(function($ctx1) {
+//>>excludeEnd("ctx");
+var $1,$2,$3,$4,$7,$6,$5,$8,$11,$10,$9,$12,$14,$13,$15,$17,$16,$18,$20,$19,$21,$22;
+$1=self._testedClass();
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["testedClass"]=1;
+//>>excludeEnd("ctx");
+d=$recv($1)._at_("html body div#fixture");
+$2=self._testedClass();
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["testedClass"]=2;
+//>>excludeEnd("ctx");
+tbl=$recv($2)._newElement_("table");
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["newElement:"]=1;
+//>>excludeEnd("ctx");
+$3=self._testedClass();
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["testedClass"]=3;
+//>>excludeEnd("ctx");
+tr=$recv($3)._newElement_("tr");
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["newElement:"]=2;
+//>>excludeEnd("ctx");
+$4=tr;
+$7=self._testedClass();
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["testedClass"]=4;
+//>>excludeEnd("ctx");
+$6=$recv($7)._newElement_("td");
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["newElement:"]=3;
+//>>excludeEnd("ctx");
+$5=$recv($6).__lt_lt("A");
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["<<"]=2;
+//>>excludeEnd("ctx");
+$recv($4).__lt_lt($5);
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["<<"]=1;
+//>>excludeEnd("ctx");
+$8=tr;
+$11=self._testedClass();
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["testedClass"]=5;
+//>>excludeEnd("ctx");
+$10=$recv($11)._newElement_("td");
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["newElement:"]=4;
+//>>excludeEnd("ctx");
+$9=$recv($10).__lt_lt("B");
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["<<"]=4;
+//>>excludeEnd("ctx");
+$recv($8).__lt_lt($9);
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["<<"]=3;
+//>>excludeEnd("ctx");
+$12=tr;
+$14=$recv(self._testedClass())._newElement_("td");
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["newElement:"]=5;
+//>>excludeEnd("ctx");
+$13=$recv($14).__lt_lt("C");
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["<<"]=6;
+//>>excludeEnd("ctx");
+$recv($12).__lt_lt($13);
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["<<"]=5;
+//>>excludeEnd("ctx");
+$recv(tbl).__lt_lt(tr);
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["<<"]=7;
+//>>excludeEnd("ctx");
+tr=$recv($Domite())._newElement_("tr");
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["newElement:"]=6;
+//>>excludeEnd("ctx");
+$15=tr;
+$17=$recv($Domite())._newElement_("td");
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["newElement:"]=7;
+//>>excludeEnd("ctx");
+$16=$recv($17).__lt_lt("D");
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["<<"]=9;
+//>>excludeEnd("ctx");
+$recv($15).__lt_lt($16);
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["<<"]=8;
+//>>excludeEnd("ctx");
+$18=tr;
+$20=$recv($Domite())._newElement_("td");
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["newElement:"]=8;
+//>>excludeEnd("ctx");
+$19=$recv($20).__lt_lt("E");
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["<<"]=11;
+//>>excludeEnd("ctx");
+$recv($18).__lt_lt($19);
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["<<"]=10;
+//>>excludeEnd("ctx");
+$21=tr;
+$22=$recv($recv($Domite())._newElement_("td")).__lt_lt("F");
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["<<"]=13;
+//>>excludeEnd("ctx");
+$recv($21).__lt_lt($22);
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["<<"]=12;
+//>>excludeEnd("ctx");
+$recv(tbl).__lt_lt(tr);
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["<<"]=14;
+//>>excludeEnd("ctx");
+$recv(d).__lt_lt(tbl);
+self._assert_($recv($recv($recv(document)._body())._innerHTML())._endsWith_("table><tr><td>A</td><td>B</td><td>C</td></tr><tr><td>D</td><td>E</td><td>F</td></tr></table></div>"));
+return self;
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+}, function($ctx1) {$ctx1.fill(self,"testInsertTable",{d:d,tbl:tbl,tr:tr},$globals.DOMiteTest)});
+//>>excludeEnd("ctx");
+},
+//>>excludeStart("ide", pragmas.excludeIdeData);
+args: [],
+source: "testInsertTable\x0a\x09| d tbl tr |\x0a\x09d := self testedClass at: 'html body div#fixture'.\x0a\x09tbl := self testedClass newElement: 'table'.\x0a\x09\x0a\x09tr := self testedClass newElement: 'tr'.\x0a\x09tr << ((self testedClass newElement: 'td') << 'A').\x0a\x09tr << ((self testedClass newElement: 'td') << 'B').\x0a\x09tr << ((self testedClass newElement: 'td') << 'C').\x0a\x09\x0a\x09tbl << tr.\x0a\x09\x0a\x09tr := Domite newElement: 'tr'.\x0a\x09tr << ((Domite newElement: 'td') << 'D').\x0a\x09tr << ((Domite newElement: 'td') << 'E').\x0a\x09tr << ((Domite newElement: 'td') << 'F').\x0a\x09\x0a\x09tbl << tr.\x0a\x09d << tbl.\x0a\x09 \x0a\x09self assert: (document body innerHTML endsWith: 'table><tr><td>A</td><td>B</td><td>C</td></tr><tr><td>D</td><td>E</td><td>F</td></tr></table></div>')",
 referencedClasses: ["Domite"],
 //>>excludeEnd("ide");
-messageSends: ["at:", "<<", "newStream", "assert:", "endsWith:", "innerHTML", "body"]
+messageSends: ["at:", "testedClass", "newElement:", "<<", "assert:", "endsWith:", "innerHTML", "body"]
 }),
 $globals.DOMiteTest);
 
@@ -575,12 +800,20 @@ protocol: 'testing',
 fn: function (){
 var self=this;
 var d,p,s;
-function $Domite(){return $globals.Domite||(typeof Domite=="undefined"?nil:Domite)}
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 return $core.withContext(function($ctx1) {
 //>>excludeEnd("ctx");
-d=$recv($Domite())._fromElement_(self["@fixtureDiv"]);
-p=$recv($Domite())._newElement_("p");
+var $1,$2;
+$1=self._testedClass();
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["testedClass"]=1;
+//>>excludeEnd("ctx");
+d=$recv($1)._fromElement_(self["@fixtureDiv"]);
+$2=self._testedClass();
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["testedClass"]=2;
+//>>excludeEnd("ctx");
+p=$recv($2)._newElement_("p");
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["newElement:"]=1;
 //>>excludeEnd("ctx");
@@ -588,7 +821,7 @@ $recv(d).__lt_lt(p);
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["<<"]=1;
 //>>excludeEnd("ctx");
-s=$recv($Domite())._newElement_("span");
+s=$recv(self._testedClass())._newElement_("span");
 $recv(d).__lt_lt(s);
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["<<"]=2;
@@ -602,10 +835,10 @@ return self;
 },
 //>>excludeStart("ide", pragmas.excludeIdeData);
 args: [],
-source: "testMultipleInserts\x0a\x09| d p s |\x0a\x09d := Domite fromElement: fixtureDiv.\x0a\x09p := Domite newElement: 'p'.\x0a\x09d << p.\x0a\x09s := Domite newElement: 'span'.\x0a\x09d << s.\x0a\x09d << 'dom-mite'.\x0a\x09self assert: (document body innerHTML endsWith: '>sentinel<p></p><span></span>dom-mite</div>')",
-referencedClasses: ["Domite"],
+source: "testMultipleInserts\x0a\x09| d p s |\x0a\x09d := self testedClass fromElement: fixtureDiv.\x0a\x09p := self testedClass newElement: 'p'.\x0a\x09d << p.\x0a\x09s := self testedClass newElement: 'span'.\x0a\x09d << s.\x0a\x09d << 'dom-mite'.\x0a\x09self assert: (document body innerHTML endsWith: '>sentinel<p></p><span></span>dom-mite</div>')",
+referencedClasses: [],
 //>>excludeEnd("ide");
-messageSends: ["fromElement:", "newElement:", "<<", "assert:", "endsWith:", "innerHTML", "body"]
+messageSends: ["fromElement:", "testedClass", "newElement:", "<<", "assert:", "endsWith:", "innerHTML", "body"]
 }),
 $globals.DOMiteTest);
 
@@ -616,12 +849,20 @@ protocol: 'testing',
 fn: function (){
 var self=this;
 var d,p,s;
-function $Domite(){return $globals.Domite||(typeof Domite=="undefined"?nil:Domite)}
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 return $core.withContext(function($ctx1) {
 //>>excludeEnd("ctx");
-d=$recv($Domite())._at_("#fixture");
-p=$recv($Domite())._newElement_("p");
+var $1,$2;
+$1=self._testedClass();
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["testedClass"]=1;
+//>>excludeEnd("ctx");
+d=$recv($1)._at_("#fixture");
+$2=self._testedClass();
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["testedClass"]=2;
+//>>excludeEnd("ctx");
+p=$recv($2)._newElement_("p");
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["newElement:"]=1;
 //>>excludeEnd("ctx");
@@ -629,7 +870,7 @@ $recv(d).__lt_lt(p);
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["<<"]=1;
 //>>excludeEnd("ctx");
-s=$recv($Domite())._newElement_("span");
+s=$recv(self._testedClass())._newElement_("span");
 $recv(d).__lt_lt(s);
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["<<"]=2;
@@ -652,10 +893,10 @@ return self;
 },
 //>>excludeStart("ide", pragmas.excludeIdeData);
 args: [],
-source: "testMultipleInsertsWithClear\x0a\x09| d p s |\x0a\x09d := Domite at: '#fixture'.\x0a\x09p := Domite newElement: 'p'.\x0a\x09d << p.\x0a\x09s := Domite newElement: 'span'.\x0a\x09d << s.\x0a\x09d resetContents.\x0a\x09d << 'dom-mite'.\x0a\x09d resetContents.\x0a\x09d resetContents.\x0a\x09self assert: (document body innerHTML endsWith: '></div>')",
-referencedClasses: ["Domite"],
+source: "testMultipleInsertsWithClear\x0a\x09| d p s |\x0a\x09d := self testedClass at: '#fixture'.\x0a\x09p := self testedClass newElement: 'p'.\x0a\x09d << p.\x0a\x09s := self testedClass newElement: 'span'.\x0a\x09d << s.\x0a\x09d resetContents.\x0a\x09d << 'dom-mite'.\x0a\x09d resetContents.\x0a\x09d resetContents.\x0a\x09self assert: (document body innerHTML endsWith: '></div>')",
+referencedClasses: [],
 //>>excludeEnd("ide");
-messageSends: ["at:", "newElement:", "<<", "resetContents", "assert:", "endsWith:", "innerHTML", "body"]
+messageSends: ["at:", "testedClass", "newElement:", "<<", "resetContents", "assert:", "endsWith:", "innerHTML", "body"]
 }),
 $globals.DOMiteTest);
 
@@ -666,12 +907,20 @@ protocol: 'testing',
 fn: function (){
 var self=this;
 var d,p,s;
-function $Domite(){return $globals.Domite||(typeof Domite=="undefined"?nil:Domite)}
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 return $core.withContext(function($ctx1) {
 //>>excludeEnd("ctx");
-d=$recv($Domite())._fromElement_(self["@fixtureDiv"]);
-p=$recv($Domite())._newElement_("p");
+var $1,$2;
+$1=self._testedClass();
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["testedClass"]=1;
+//>>excludeEnd("ctx");
+d=$recv($1)._fromElement_(self["@fixtureDiv"]);
+$2=self._testedClass();
+//>>excludeStart("ctx", pragmas.excludeDebugContexts);
+$ctx1.sendIdx["testedClass"]=2;
+//>>excludeEnd("ctx");
+p=$recv($2)._newElement_("p");
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["newElement:"]=1;
 //>>excludeEnd("ctx");
@@ -679,7 +928,7 @@ $recv(d).__lt_lt(p);
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["<<"]=1;
 //>>excludeEnd("ctx");
-s=$recv($Domite())._newElement_("span");
+s=$recv(self._testedClass())._newElement_("span");
 $recv(d).__lt_lt(s);
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx1.sendIdx["<<"]=2;
@@ -694,10 +943,29 @@ return self;
 },
 //>>excludeStart("ide", pragmas.excludeIdeData);
 args: [],
-source: "testMultipleInsertsWithClearInBetween\x0a\x09| d p s |\x0a\x09d := Domite fromElement: fixtureDiv.\x0a\x09p := Domite newElement: 'p'.\x0a\x09d << p.\x0a\x09s := Domite newElement: 'span'.\x0a\x09d << s.\x0a\x09d resetContents.\x0a\x09d << 'dom-mite'.\x0a\x09self assert: (document body innerHTML endsWith: '>dom-mite</div>')",
+source: "testMultipleInsertsWithClearInBetween\x0a\x09| d p s |\x0a\x09d := self testedClass fromElement: fixtureDiv.\x0a\x09p := self testedClass newElement: 'p'.\x0a\x09d << p.\x0a\x09s := self testedClass newElement: 'span'.\x0a\x09d << s.\x0a\x09d resetContents.\x0a\x09d << 'dom-mite'.\x0a\x09self assert: (document body innerHTML endsWith: '>dom-mite</div>')",
+referencedClasses: [],
+//>>excludeEnd("ide");
+messageSends: ["fromElement:", "testedClass", "newElement:", "<<", "resetContents", "assert:", "endsWith:", "innerHTML", "body"]
+}),
+$globals.DOMiteTest);
+
+$core.addMethod(
+$core.method({
+selector: "testedClass",
+protocol: 'fixture',
+fn: function (){
+var self=this;
+function $Domite(){return $globals.Domite||(typeof Domite=="undefined"?nil:Domite)}
+return $Domite();
+
+},
+//>>excludeStart("ide", pragmas.excludeIdeData);
+args: [],
+source: "testedClass\x0a\x0a ^Domite",
 referencedClasses: ["Domite"],
 //>>excludeEnd("ide");
-messageSends: ["fromElement:", "newElement:", "<<", "resetContents", "assert:", "endsWith:", "innerHTML", "body"]
+messageSends: []
 }),
 $globals.DOMiteTest);