--- a/InstrumentingCompiler.st	Wed Nov 07 23:24:43 2012 +0100
+++ b/InstrumentingCompiler.st	Wed Nov 07 23:25:06 2012 +0100
@@ -977,6 +977,12 @@
 "
 ! !
 
+!InstrumentingCompiler::VariableAccessExecutionInfo methodsFor:'testing'!
+
+isVariableAccessExecutionInfo
+    ^ true
+! !
+
 !InstrumentingCompiler::BlockExecutionInfo class methodsFor:'documentation'!
 
 documentation
@@ -1095,9 +1101,9 @@
 !InstrumentingCompiler class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/InstrumentingCompiler.st,v 1.28 2012-11-07 22:18:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/InstrumentingCompiler.st,v 1.29 2012-11-07 22:25:06 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libcomp/InstrumentingCompiler.st,v 1.28 2012-11-07 22:18:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/InstrumentingCompiler.st,v 1.29 2012-11-07 22:25:06 cg Exp $'
 ! !