--- a/Block.st	Mon Jun 01 12:42:14 2015 +0100
+++ b/Block.st	Mon Jun 01 14:39:23 2015 +0100
@@ -2937,6 +2937,19 @@
     sourcePos := aString  "/ misuse the sourcePosition slot
 !
 
+sourcePosition
+    "Returns the source position withing method's source.
+     The position is 1-based offset of opening bracket.
+     If the source position is not known (because of lack of
+     support in compiler and/or virtual machine or anut other 
+     reason, nil is returned"
+
+    ^ sourcePos
+
+    "Created: / 01-06-2015 / 13:05:16 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+
+!   
+
 sourcePosition:position
     "set the position of the source within my method.
      This interface is for the compiler only."