extensions.st
changeset 421 0d146090b05a
parent 396 015297b155fe
child 423 60c930c93819
--- a/extensions.st	Thu Feb 19 06:35:25 2015 +0000
+++ b/extensions.st	Thu Feb 19 16:43:08 2015 +0000
@@ -448,6 +448,26 @@
     "Created: / 15-10-2014 / 09:34:49 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
+!RBProgramNode methodsFor:'inspecting'!
+
+inspector2TabRBParseTreeInspector
+    <inspector2Tab>
+
+    ^ (self newInspector2Tab)
+        label:'Parse Tree (RB)';
+        priority:35;
+        application:
+                [
+                    | src |
+
+                    src := self source.
+                    SmallSense::ParseTreeInspector new node:self source:src.
+                ];
+        yourself
+
+    "Created: / 19-02-2015 / 15:22:01 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
 !RBProgramNode methodsFor:'accessing'!
 
 startPosition