ParseNodeVisitor.st
changeset 4497 25868e8ec797
parent 4470 8e9fd99e36d9
child 4500 d3fc30ebf06e
--- a/ParseNodeVisitor.st	Mon Aug 19 14:27:13 2019 +0200
+++ b/ParseNodeVisitor.st	Mon Aug 19 16:21:27 2019 +0200
@@ -158,6 +158,17 @@
 
 !ParseNodeVisitor methodsFor:'visiting - javaScript'!
 
+doesNotUnderstand:aMessage
+    "catch to prevent stupid error reports from Explainer in end-user app (expecco)"
+
+    Smalltalk isStandAloneApp ifTrue:[^ self].
+    "/ ((aMessage selector startsWith:'visit') 
+    "/ and:[ aMessage selector endsWith:'Node:' ]) ifTrue:[
+    "/     ^ self.
+    "/ ].
+    ^ super doesNotUnderstand:aMessage.
+!
+
 visitFunctionCallNode:anObject
     self visitMessageNode:anObject
 !
@@ -166,6 +177,10 @@
     self visitFunctionCallNode:aNode
 !
 
+visitJavaScriptAssignmentNode:aNode
+    self visitAssignmentNode:aNode
+!
+
 visitJavaScriptFunctionNode:aNode
     |stmt|
 
@@ -176,6 +191,14 @@
     ].
 !
 
+visitJavaScriptInnerFunctionNode:aNode
+    self visitJavaScriptFunctionNode:aNode
+!
+
+visitJavaScriptReturnNode:aNode
+    self visitReturnNode:aNode
+!
+
 visitJavaScriptStatementNode:aNode
     self visitStatementNode:aNode
 !