--- a/CompiledCode.st	Sun Jan 29 11:04:01 2017 +0000
+++ b/CompiledCode.st	Wed Feb 01 11:28:48 2017 +0000
@@ -1942,7 +1942,7 @@
         "/ for ST80 compatibility (where variableBindings are used...)
         lit := lit key
     ].
-    ^ (self literalsDetect:[:mthdLit| mthdLit == lit] ifNone:[nil]) ~~ nil.
+    ^ (self literalsDetect:[:mthdLit| mthdLit == lit] ifNone:[nil]) notNil.
 
     "
      (CompiledCode compiledMethodAt:#referencesLiteral:) referencesGlobal:#literalsDetect:ifNone: