--- a/.hgtags	Thu Jan 14 06:55:40 2016 +0100
+++ b/.hgtags	Sat Jan 23 06:59:19 2016 +0100
@@ -46,6 +46,7 @@
 a1e60c9000f42ca89dbafb8617c2cfc4fdfb8ee7 expecco_2_5_0
 a59c6adef58fc6f611facc4af12fca93dec4507b expecco_2_1_0
 a8f17c7712d9763f5f518dcfabdaca6678155c4e expecco_2_8_0
+a8f17c7712d9763f5f518dcfabdaca6678155c4e expecco_2_8_0a
 a8f17c7712d9763f5f518dcfabdaca6678155c4e expecco_ALM_1_9_5
 a8f17c7712d9763f5f518dcfabdaca6678155c4e expecco_ALM_1_9_6
 ab7ea489f73140eeb729f67f80f58cd3d6937a4a expecco_1_7_0b1
@@ -70,4 +71,5 @@
 f91f6a0a56d5aa7f6d57984582b865873bd68922 rel4_1_7
 f91f6a0a56d5aa7f6d57984582b865873bd68922 release
 fa5637faa969c6790ca73a304eb9cc2605d117e3 rel3-1-2
+faf0e1db72c7ae85bce45db7c34599027b5c124a expecco_ALM_1_9_7
 ff39051e219f3005e9f78db3f79fa6dd42b10ce9 rel2_10_8_6_last2

--- a/Explainer.st	Thu Jan 14 06:55:40 2016 +0100
+++ b/Explainer.st	Sat Jan 23 06:59:19 2016 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1993 by Claus Gittinger
 	      All Rights Reserved
@@ -64,7 +62,7 @@
     expl := literalValue class name "allBold" , '-constant'.
 
     (literalValue isInteger) ifTrue:[
-        (literalValue ~= 0 and:[literalValue ~= 1]) ifTrue:[
+        (literalValue ~~ 0 and:[literalValue ~~ 1]) ifTrue:[
             expl := expl , ' ('.
             #(2 10 16) with:#('binary: ' 'decimal: ' 'hex: ')do:[:base :baseExpl |
                 |bStr|
@@ -1615,10 +1613,10 @@
 !Explainer class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/Explainer.st,v 1.141 2015-03-03 10:44:58 cg Exp $'
+    ^ '$Header$'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libcomp/Explainer.st,v 1.141 2015-03-03 10:44:58 cg Exp $'
+    ^ '$Header$'
 ! !