Browse Source

Pragmas in .js files.

Herby Vojčík 5 years ago
parent
commit
c13d106cb9
2 changed files with 73 additions and 0 deletions
  1. 23 0
      src/DOMite-Tests.js
  2. 50 0
      src/DOMite.js

+ 23 - 0
src/DOMite-Tests.js

@@ -42,6 +42,7 @@ args: ["aString"],
 source: "assertBodyEndsWith: aString\x0a\x09| sanitizedBody sanitizedAssertion |\x0a\x09sanitizedBody := document body innerHTML replace: '\x5cs*' with: ''.\x0a\x09sanitizedAssertion := aString replace: '\x5cs*' with: ''.\x0a\x09self assert: sanitizedBody size >= sanitizedAssertion size.\x0a\x09self\x0a\x09\x09assert: (sanitizedBody last: sanitizedAssertion size)\x0a\x09\x09equals: sanitizedAssertion",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["replace:with:", "innerHTML", "body", "assert:", ">=", "size", "assert:equals:", "last:"]
 }),
 $globals.DOMiteTest);
@@ -69,6 +70,7 @@ args: [],
 source: "setUp\x0a\x09fixtureDiv := document createElement: 'div'.\x0a\x09document body appendChild: fixtureDiv.\x0a\x09fixtureDiv setAttribute: 'id' to: 'fixture'.\x0a\x09fixtureDiv innerHTML: 'sentinel'",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["createElement:", "appendChild:", "body", "setAttribute:to:", "innerHTML:"]
 }),
 $globals.DOMiteTest);
@@ -101,6 +103,7 @@ args: [],
 source: "tearDown\x0a\x09| lastChild |\x0a\x09lastChild := document body lastChild.\x0a\x09self assert: lastChild equals: fixtureDiv.\x0a\x09document body removeChild: lastChild",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["lastChild", "body", "assert:equals:", "removeChild:"]
 }),
 $globals.DOMiteTest);
@@ -137,6 +140,7 @@ args: [],
 source: "testDefaultInsertElement\x0a\x0a\x09self testedClass new << (self testedClass newElement: 'p').\x0a\x09self assertBodyEndsWith: '<p></p>'.\x0a\x09document body removeChild: document body lastChild",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["<<", "new", "testedClass", "newElement:", "assertBodyEndsWith:", "removeChild:", "body", "lastChild"]
 }),
 $globals.DOMiteTest);
@@ -168,6 +172,7 @@ args: [],
 source: "testDefaultInsertString\x0a\x09self testedClass new << 'a-foo--in-a-bar'.\x0a\x09self assertBodyEndsWith: 'a-foo--in-a-bar'.\x0a\x09document body removeChild: document body lastChild",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["<<", "new", "testedClass", "assertBodyEndsWith:", "removeChild:", "body", "lastChild"]
 }),
 $globals.DOMiteTest);
@@ -207,6 +212,7 @@ args: [],
 source: "testDefaultInsertStringInFragment\x0a\x09self testedClass new << (self testedClass newStream << 'a-foo--in-a-bar').\x0a\x09self assertBodyEndsWith: 'a-foo--in-a-bar'.\x0a\x09document body removeChild: document body lastChild",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["<<", "new", "testedClass", "newStream", "assertBodyEndsWith:", "removeChild:", "body", "lastChild"]
 }),
 $globals.DOMiteTest);
@@ -263,6 +269,7 @@ args: [],
 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");
+pragmas: [],
 messageSends: ["at:", "testedClass", "assert:", "isInvalid", "deny:"]
 }),
 $globals.DOMiteTest);
@@ -290,6 +297,7 @@ args: [],
 source: "testInsertDomNode\x0a\x09| d |\x0a\x09d := self testedClass fromElement: fixtureDiv.\x0a\x09d << (document createElement: 'pre').\x0a\x09self assertBodyEndsWith: '>sentinel<pre></pre></div>'",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["fromElement:", "testedClass", "<<", "createElement:", "assertBodyEndsWith:"]
 }),
 $globals.DOMiteTest);
@@ -325,6 +333,7 @@ args: [],
 source: "testInsertDomNodeInFragment\x0a\x09| d |\x0a\x09d := self testedClass at: '#fixture'.\x0a\x09d << (self testedClass newStream << (document createElement: 'script')).\x0a\x09self assertBodyEndsWith: '>sentinel<script></script></div>'",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["at:", "testedClass", "<<", "newStream", "createElement:", "assertBodyEndsWith:"]
 }),
 $globals.DOMiteTest);
@@ -354,6 +363,7 @@ args: [],
 source: "testInsertDomNodeInRawDomFragment\x0a\x09| d f |\x0a\x09d := self testedClass at: '#fixture'.\x0a\x09f := document createDocumentFragment.\x0a\x09f appendChild: (document createElement: 'script').\x0a\x09d << f.\x0a\x09self assertBodyEndsWith: '>sentinel<script></script></div>'",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["at:", "testedClass", "createDocumentFragment", "appendChild:", "createElement:", "<<", "assertBodyEndsWith:"]
 }),
 $globals.DOMiteTest);
@@ -386,6 +396,7 @@ args: [],
 source: "testInsertElement\x0a\x09| d |\x0a\x09d := self testedClass at: 'html body div#fixture'.\x0a\x09d << (self testedClass newElement: 'p').\x0a\x09self assertBodyEndsWith: '>sentinel<p></p></div>'",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["at:", "testedClass", "<<", "newElement:", "assertBodyEndsWith:"]
 }),
 $globals.DOMiteTest);
@@ -435,6 +446,7 @@ args: [],
 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 assertBodyEndsWith: '>sentinel<p><span>dom-mite</span></p></div>'",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["fromElement:", "testedClass", "newElement:", "<<", "assertBodyEndsWith:"]
 }),
 $globals.DOMiteTest);
@@ -517,6 +529,7 @@ args: [],
 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 assertBodyEndsWith: '>sentinel<p><span>dom-mite</span></p></div>'",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["at:", "testedClass", "newElement:", "<<", "newStream", "assertBodyEndsWith:"]
 }),
 $globals.DOMiteTest);
@@ -636,6 +649,7 @@ args: [],
 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 assertBodyEndsWith: '>sentinel<p><span>dom-mite</span></p></div>'",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["fromElement:", "testedClass", "newElement:", "<<", "newStream", "assertBodyEndsWith:"]
 }),
 $globals.DOMiteTest);
@@ -663,6 +677,7 @@ args: [],
 source: "testInsertString\x0a\x09| d |\x0a\x09d := self testedClass fromElement: fixtureDiv.\x0a\x09d << 'a-foo--in-a-bar'.\x0a\x09self assertBodyEndsWith: '>sentinela-foo--in-a-bar</div>'",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["fromElement:", "testedClass", "<<", "assertBodyEndsWith:"]
 }),
 $globals.DOMiteTest);
@@ -698,6 +713,7 @@ args: [],
 source: "testInsertStringInFragment\x0a\x09| d |\x0a\x09d := self testedClass at: '#fixture'.\x0a\x09d << (self testedClass newStream << 'a-foo--in-a-bar').\x0a\x09self assertBodyEndsWith: '>sentinela-foo--in-a-bar</div>'",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["at:", "testedClass", "<<", "newStream", "assertBodyEndsWith:"]
 }),
 $globals.DOMiteTest);
@@ -731,6 +747,7 @@ args: [],
 source: "testInsertStringifiedJSObject\x0a\x09| d obj |\x0a\x09d := self testedClass fromElement: fixtureDiv.\x0a\x09obj := JSON parse: '{}'.\x0a\x09d << obj.\x0a\x09self assertBodyEndsWith: '>sentinel', obj asString, '</div>'",
 referencedClasses: ["JSON"],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["fromElement:", "testedClass", "parse:", "<<", "assertBodyEndsWith:", ",", "asString"]
 }),
 $globals.DOMiteTest);
@@ -758,6 +775,7 @@ args: [],
 source: "testInsertStringifiedNumber\x0a\x09| d |\x0a\x09d := self testedClass fromElement: fixtureDiv.\x0a\x09d << 42.\x0a\x09self assertBodyEndsWith: '>sentinel42</div>'",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["fromElement:", "testedClass", "<<", "assertBodyEndsWith:"]
 }),
 $globals.DOMiteTest);
@@ -916,6 +934,7 @@ 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 := self testedClass newElement: 'tr'.\x0a\x09tr << ((self testedClass newElement: 'td') << 'D').\x0a\x09tr << ((self testedClass newElement: 'td') << 'E').\x0a\x09tr << ((self testedClass newElement: 'td') << 'F').\x0a\x09\x0a\x09tbl << tr.\x0a\x09d << tbl.\x0a\x09 \x0a\x09self assertBodyEndsWith: '>sentinel<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: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["at:", "testedClass", "newElement:", "<<", "assertBodyEndsWith:"]
 }),
 $globals.DOMiteTest);
@@ -965,6 +984,7 @@ args: [],
 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 assertBodyEndsWith: '>sentinel<p></p><span></span>dom-mite</div>'",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["fromElement:", "testedClass", "newElement:", "<<", "assertBodyEndsWith:"]
 }),
 $globals.DOMiteTest);
@@ -1023,6 +1043,7 @@ args: [],
 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 assertBodyEndsWith: '></div>'",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["at:", "testedClass", "newElement:", "<<", "resetContents", "assertBodyEndsWith:"]
 }),
 $globals.DOMiteTest);
@@ -1073,6 +1094,7 @@ args: [],
 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 assertBodyEndsWith: '>dom-mite</div>'",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["fromElement:", "testedClass", "newElement:", "<<", "resetContents", "assertBodyEndsWith:"]
 }),
 $globals.DOMiteTest);
@@ -1091,6 +1113,7 @@ args: [],
 source: "testedClass\x0a\x0a\x09^ Domite",
 referencedClasses: ["Domite"],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: []
 }),
 $globals.DOMiteTest);

+ 50 - 0
src/DOMite.js

@@ -72,6 +72,7 @@ args: ["aDomite"],
 source: "= aDomite\x0a\x09^ self class = aDomite class and: [\x0a\x09\x09self element = aDomite element and: [\x0a\x09\x09\x09self reference = aDomite reference ]]",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["and:", "=", "class", "element", "reference"]
 }),
 $globals.Domite);
@@ -95,6 +96,7 @@ args: ["aString"],
 source: "allAt: aString\x0a\x09^ self class wrap: (PlatformDom toArray: (self element querySelectorAll: aString))",
 referencedClasses: ["PlatformDom"],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["wrap:", "class", "toArray:", "querySelectorAll:", "element"]
 }),
 $globals.Domite);
@@ -113,6 +115,7 @@ args: [],
 source: "asDomNode\x0a\x09^ element",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: []
 }),
 $globals.Domite);
@@ -136,6 +139,7 @@ args: [],
 source: "asJQuery\x0a\x09^ self asDomNode asJQuery",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["asJQuery", "asDomNode"]
 }),
 $globals.Domite);
@@ -159,6 +163,7 @@ args: ["aString"],
 source: "at: aString\x0a\x09^ self class fromElement: (self element querySelector: aString)",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["fromElement:", "class", "querySelector:", "element"]
 }),
 $globals.Domite);
@@ -182,6 +187,7 @@ args: [],
 source: "atEnd\x0a\x09^ self reference isNil",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["isNil", "reference"]
 }),
 $globals.Domite);
@@ -205,6 +211,7 @@ args: [],
 source: "atStart\x0a\x09^ self reference = self element firstChild",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["=", "reference", "firstChild", "element"]
 }),
 $globals.Domite);
@@ -235,6 +242,7 @@ args: ["aString"],
 source: "attrAt: aString\x0a\x09(element hasAttribute: aString)\x0a\x09\x09ifTrue: [ ^ element getAttribute: aString ]\x0a\x09\x09ifFalse: [ ^ nil ]",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["ifTrue:ifFalse:", "hasAttribute:", "getAttribute:"]
 }),
 $globals.Domite);
@@ -259,6 +267,7 @@ args: ["aString", "anotherString"],
 source: "attrAt: aString put: anotherString\x0a\x09element setAttribute: aString to: anotherString",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["setAttribute:to:"]
 }),
 $globals.Domite);
@@ -290,6 +299,7 @@ args: [],
 source: "back\x0a\x09self atStart\x0a\x09\x09ifTrue: [ ^ nil ]\x0a\x09\x09ifFalse: [ self setToBack. ^ self peek ]",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["ifTrue:ifFalse:", "atStart", "setToBack", "peek"]
 }),
 $globals.Domite);
@@ -313,6 +323,7 @@ args: [],
 source: "canSetToUpperLevel\x0a\x09^ self element parentNode notNil",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["notNil", "parentNode", "element"]
 }),
 $globals.Domite);
@@ -348,6 +359,7 @@ args: ["aDomite"],
 source: "cutUpTo: aDomite\x0a<inlineJS: '\x0a\x09var result = document.createDocumentFragment(),\x0a\x09\x09start = $self.reference,\x0a\x09\x09end = aDomite.reference,\x0a\x09\x09tmp;\x0a\x09while (start && start != end) {\x0a\x09\x09tmp = start;\x0a\x09\x09start = start.nextSibling;\x0a\x09\x09result.appendChild(tmp);\x0a\x09}\x0a\x09$self.reference = start;\x0a\x09return $self._class()._fromElement_(result);\x0a'>",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [["inlineJS:", ["\x0a\x09var result = document.createDocumentFragment(),\x0a\x09\x09start = $self.reference,\x0a\x09\x09end = aDomite.reference,\x0a\x09\x09tmp;\x0a\x09while (start && start != end) {\x0a\x09\x09tmp = start;\x0a\x09\x09start = start.nextSibling;\x0a\x09\x09result.appendChild(tmp);\x0a\x09}\x0a\x09$self.reference = start;\x0a\x09return $self._class()._fromElement_(result);\x0a"]]],
 messageSends: []
 }),
 $globals.Domite);
@@ -366,6 +378,7 @@ args: [],
 source: "element\x0a\x09^ element",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: []
 }),
 $globals.Domite);
@@ -385,6 +398,7 @@ args: ["anObject"],
 source: "element: anObject\x0a\x09element := anObject",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: []
 }),
 $globals.Domite);
@@ -409,6 +423,7 @@ args: ["aString"],
 source: "fire: aString\x0a\x09self fire: aString detail: nil asJavaScriptObject",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["fire:detail:", "asJavaScriptObject"]
 }),
 $globals.Domite);
@@ -433,6 +448,7 @@ args: ["aString", "anObject"],
 source: "fire: aString detail: anObject\x0a\x09self fireEvent: (\x0a\x09\x09PlatformDom newCustomEvent: aString detail: anObject)",
 referencedClasses: ["PlatformDom"],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["fireEvent:", "newCustomEvent:detail:"]
 }),
 $globals.Domite);
@@ -457,6 +473,7 @@ args: ["anEvent"],
 source: "fireEvent: anEvent\x0a\x09self asDomNode dispatchEvent: anEvent",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["dispatchEvent:", "asDomNode"]
 }),
 $globals.Domite);
@@ -490,6 +507,7 @@ args: [],
 source: "initialize\x0a\x09super initialize.\x0a\x09element := document body.\x0a\x09reference := nil asJavaScriptObject",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["initialize", "body", "asJavaScriptObject"]
 }),
 $globals.Domite);
@@ -513,6 +531,7 @@ args: [],
 source: "isInvalid\x0a\x09^ self element isNil",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["isNil", "element"]
 }),
 $globals.Domite);
@@ -546,6 +565,7 @@ args: [],
 source: "next\x0a\x09self atEnd\x0a\x09\x09ifTrue: [ ^ nil ]\x0a\x09\x09ifFalse: [ | result |\x0a\x09\x09\x09result := self peek.\x0a\x09\x09\x09self setToNext.\x0a\x09\x09\x09^ result ]",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["ifTrue:ifFalse:", "atEnd", "peek", "setToNext"]
 }),
 $globals.Domite);
@@ -570,6 +590,7 @@ args: ["anObject"],
 source: "nextPut: anObject\x0a\x09self nextPutString: anObject printString",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["nextPutString:", "printString"]
 }),
 $globals.Domite);
@@ -594,6 +615,7 @@ args: ["aDomElement"],
 source: "nextPutDomNode: aDomElement\x0a\x09self element\x0a\x09\x09insertBefore: aDomElement\x0a\x09\x09reference: self reference",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["insertBefore:reference:", "element", "reference"]
 }),
 $globals.Domite);
@@ -624,6 +646,7 @@ args: ["aJSObject"],
 source: "nextPutJSObject: aJSObject\x0a\x09(PlatformDom isDomNode: aJSObject)\x0a\x09\x09ifTrue: [ self nextPutDomNode: aJSObject ]\x0a\x09\x09ifFalse: [ self nextPut: aJSObject ]",
 referencedClasses: ["PlatformDom"],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["ifTrue:ifFalse:", "isDomNode:", "nextPutDomNode:", "nextPut:"]
 }),
 $globals.Domite);
@@ -648,6 +671,7 @@ args: ["aString"],
 source: "nextPutString: aString\x0a\x09self nextPutDomNode: aString asString asDomNode",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["nextPutDomNode:", "asDomNode", "asString"]
 }),
 $globals.Domite);
@@ -672,6 +696,7 @@ args: ["aString", "aBlock"],
 source: "off: aString unbind: aBlock\x0a\x09self asDomNode removeEventListener: aString block: aBlock useCapture: false",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["removeEventListener:block:useCapture:", "asDomNode"]
 }),
 $globals.Domite);
@@ -696,6 +721,7 @@ args: ["aString", "aBlock"],
 source: "on: aString bind: aBlock\x0a\x09self asDomNode addEventListener: aString block: aBlock useCapture: false",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["addEventListener:block:useCapture:", "asDomNode"]
 }),
 $globals.Domite);
@@ -727,6 +753,7 @@ args: [],
 source: "peek\x0a\x09^ self reference\x0a\x09\x09ifNotNil: [ :ref | self class fromElement: ref ]",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["ifNotNil:", "reference", "fromElement:", "class"]
 }),
 $globals.Domite);
@@ -751,6 +778,7 @@ args: [],
 source: "prev\x0a\x09self deprecatedAPI: 'Use #back instead.'.\x0a\x09^ self back",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["deprecatedAPI:", "back"]
 }),
 $globals.Domite);
@@ -774,6 +802,7 @@ args: ["aString"],
 source: "propAt: aString\x0a\x09^ element at: aString",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["at:"]
 }),
 $globals.Domite);
@@ -797,6 +826,7 @@ args: ["aString", "anObject"],
 source: "propAt: aString put: anObject\x0a\x09^ element at: aString put: anObject",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["at:put:"]
 }),
 $globals.Domite);
@@ -821,6 +851,7 @@ args: ["aStream"],
 source: "putOn: aStream\x0a\x09aStream nextPutDomNode: self asDomNode",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["nextPutDomNode:", "asDomNode"]
 }),
 $globals.Domite);
@@ -839,6 +870,7 @@ args: [],
 source: "reference\x0a\x09^ reference",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: []
 }),
 $globals.Domite);
@@ -858,6 +890,7 @@ args: ["anObject"],
 source: "reference: anObject\x0a\x09reference := anObject",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: []
 }),
 $globals.Domite);
@@ -882,6 +915,7 @@ args: [],
 source: "reset\x0a\x09self reference: self element firstChild",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["reference:", "firstChild", "element"]
 }),
 $globals.Domite);
@@ -909,6 +943,7 @@ args: [],
 source: "resetContents\x0a<inlineJS: '\x0a\x09var element = $self.element, child;\x0a\x09while (child = element.firstChild) element.removeChild(child);\x0a\x09$self.reference = null;\x0a'>",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [["inlineJS:", ["\x0a\x09var element = $self.element, child;\x0a\x09while (child = element.firstChild) element.removeChild(child);\x0a\x09$self.reference = null;\x0a"]]],
 messageSends: []
 }),
 $globals.Domite);
@@ -940,6 +975,7 @@ args: [],
 source: "setToAfter\x0a\x09self\x0a\x09\x09reference: self element nextSibling;\x0a\x09\x09element: self element parentNode",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["reference:", "nextSibling", "element", "element:", "parentNode"]
 }),
 $globals.Domite);
@@ -976,6 +1012,7 @@ args: [],
 source: "setToBack\x0a\x09self atStart ifFalse: [\x0a\x09\x09self reference: (self reference\x0a\x09\x09\x09ifNil: [ self element lastChild ]\x0a\x09\x09\x09ifNotNil: [ :ref | ref previousSibling ])]",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["ifFalse:", "atStart", "reference:", "ifNil:ifNotNil:", "reference", "lastChild", "element", "previousSibling"]
 }),
 $globals.Domite);
@@ -1006,6 +1043,7 @@ args: [],
 source: "setToBefore\x0a\x09self\x0a\x09\x09reference: self element;\x0a\x09\x09element: self element parentNode",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["reference:", "element", "element:", "parentNode"]
 }),
 $globals.Domite);
@@ -1030,6 +1068,7 @@ args: [],
 source: "setToEnd\x0a\x09self reference: nil asJavaScriptObject \x22null\x22",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["reference:", "asJavaScriptObject"]
 }),
 $globals.Domite);
@@ -1058,6 +1097,7 @@ args: [],
 source: "setToNext\x0a\x09self atEnd ifFalse: [\x0a\x09\x09self reference: self reference nextSibling ]",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["ifFalse:", "atEnd", "reference:", "nextSibling", "reference"]
 }),
 $globals.Domite);
@@ -1082,6 +1122,7 @@ args: [],
 source: "setToPrev\x0a\x09self deprecatedAPI: 'Use #setToBack instead'.\x0a\x09^ self setToBack",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["deprecatedAPI:", "setToBack"]
 }),
 $globals.Domite);
@@ -1106,6 +1147,7 @@ args: ["aString"],
 source: "allAt: aString\x0a\x09^ self wrap: (PlatformDom toArray: (document querySelectorAll: aString))",
 referencedClasses: ["PlatformDom"],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["wrap:", "toArray:", "querySelectorAll:"]
 }),
 $globals.Domite.a$cls);
@@ -1129,6 +1171,7 @@ args: ["aString"],
 source: "at: aString\x0a\x09^ self fromElement: (document querySelector: aString)",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["fromElement:", "querySelector:"]
 }),
 $globals.Domite.a$cls);
@@ -1163,6 +1206,7 @@ args: ["aDomElement"],
 source: "fromElement: aDomElement\x0a\x09aDomElement ifNotNil: [\x0a\x09\x09(PlatformDom isDomNode: aDomElement) ifFalse: [\x0a\x09\x09\x09self error: self name, ': Need a DOM node' ]].\x0a\x09^ self new\x0a\x09\x09element: aDomElement;\x0a\x09\x09yourself",
 referencedClasses: ["PlatformDom"],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["ifNotNil:", "ifFalse:", "isDomNode:", "error:", ",", "name", "element:", "new", "yourself"]
 }),
 $globals.Domite.a$cls);
@@ -1189,6 +1233,7 @@ args: ["aDomElement", "anotherDomElement"],
 source: "fromElement: aDomElement cursorBefore: anotherDomElement\x0a\x09^ (self fromElement: aDomElement)\x0a\x09\x09reference: anotherDomElement;\x0a\x09\x09yourself",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["reference:", "fromElement:", "yourself"]
 }),
 $globals.Domite.a$cls);
@@ -1212,6 +1257,7 @@ args: ["aString"],
 source: "newElement: aString\x0a\x09^ self fromElement: (document createElement: aString)",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["fromElement:", "createElement:"]
 }),
 $globals.Domite.a$cls);
@@ -1235,6 +1281,7 @@ args: ["aString", "anotherString"],
 source: "newElement: aString xmlns: anotherString \x0a\x0a\x09^ self fromElement: (document createElementNS: anotherString tagName: aString)",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["fromElement:", "createElementNS:tagName:"]
 }),
 $globals.Domite.a$cls);
@@ -1258,6 +1305,7 @@ args: [],
 source: "newStream\x0a\x09^ self fromElement: #() asDomNode",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["fromElement:", "asDomNode"]
 }),
 $globals.Domite.a$cls);
@@ -1289,6 +1337,7 @@ args: ["aCollection"],
 source: "wrap: aCollection\x0a\x09^ aCollection collect: [ :each | self fromElement: each ]",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["collect:", "fromElement:"]
 }),
 $globals.Domite.a$cls);
@@ -1313,6 +1362,7 @@ args: ["aNode"],
 source: "nextPutDomNode: aNode\x0a\x09self nextPut: aNode",
 referencedClasses: [],
 //>>excludeEnd("ide");
+pragmas: [],
 messageSends: ["nextPut:"]
 }),
 $globals.ProtoStream);