--- a/RegressionTests__JavaScriptTests.st Fri Sep 20 12:47:39 2013 +0200
+++ b/RegressionTests__JavaScriptTests.st Fri Sep 20 21:31:16 2013 +0200
@@ -94,7 +94,12 @@
!
execute:code for:receiver arguments:arguments
- |f result|
+ |parser f result|
+
+ "/ First, validate the tree
+ parser := JavaScriptParser parseMethod: code in: nil.
+ self assert: parser tree notNil.
+ JavaScriptParseNodeValidator validate: parser tree source: code.
"/ Transcript showCR:(thisContext sender selector , '...').
@@ -115,6 +120,7 @@
^ result
"Modified: / 09-10-2011 / 11:41:51 / cg"
+ "Modified (format): / 20-09-2013 / 11:56:10 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
execute:code for:receiver arguments:arguments expect:expectedResult
@@ -170,10 +176,12 @@
setUp
JavaScriptCompiler isNil ifTrue:[
- Smalltalk loadPackage:'stx:libjavascript'
+ Smalltalk loadPackage:'stx:libjavascript'.
+ JavaScriptParseNodeValidator autoload.
].
"Created: / 09-08-2011 / 23:12:13 / cg"
+ "Modified: / 20-09-2013 / 11:58:56 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
withTranscriptRedirectedTo:aStream do:aBlock