--- a/RegressionTests__BecomeTests.st	Fri Apr 29 14:20:22 2016 +0200
+++ b/RegressionTests__BecomeTests.st	Sat Apr 30 10:57:14 2016 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "{ Package: 'exept:regression' }"
 
 "{ NameSpace: RegressionTests }"
@@ -12,7 +14,7 @@
 
 !BecomeTests methodsFor:'tests'!
 
-testBecome
+test01_become
     "Test the two way become. Note. we cannot use string literals for this test"
 
     | a b c d |
@@ -30,11 +32,13 @@
 
 
     "
-     self new testBecome
+     self new test01_become
     "
+
+    "Created: / 30-04-2016 / 09:39:09 / cg"
 !
 
-testBecomeForward
+test10_becomeForward
     "Test the forward become."
 
     | a b c d |
@@ -54,11 +58,13 @@
 
 
     "
-     self new testBecomeForward
+     self new test10_becomeForward
     "
+
+    "Created: / 30-04-2016 / 09:39:19 / cg"
 !
 
-testBecomeForwardDontCopyIdentityHash
+test11_becomeForwardDontCopyIdentityHash
     "Check that
         1. the argument to becomeForward: is NOT modified to have the receiver's identity hash.
         2. the receiver's identity hash is unchanged."
@@ -76,11 +82,13 @@
         assert: b identityHash = hb.
 
     "
-     self new testBecomeForwardDontCopyIdentityHash
+     self new test11_becomeForwardDontCopyIdentityHash
     "
+
+    "Created: / 30-04-2016 / 09:39:30 / cg"
 !
 
-testBecomeForwardHash
+test12_becomeForwardHash
     | a b c hb |
 
     a := 'ab' copy.
@@ -96,11 +104,13 @@
         assert: c hash = hb.
 
     "
-     self new testBecomeForwardHash
+     self new test12_becomeForwardHash
     "
+
+    "Created: / 30-04-2016 / 09:39:38 / cg"
 !
 
-testBecomeForwardIdentityHash
+test13_becomeForwardIdentityHash
     "Check that
             1. the argument to becomeForward: is modified to have the receiver's identity hash.
             2. the receiver's identity hash is unchanged."
@@ -119,11 +129,13 @@
 
 
     "
-     self new testBecomeForwardIdentityHash
+     self new test13_becomeForwardIdentityHash
     "
+
+    "Created: / 30-04-2016 / 09:39:45 / cg"
 !
 
-testBecomeHash
+test50_becomeHash
 
     | a b c d ha hb |
 
@@ -147,11 +159,13 @@
 
 
     "
-     self new testBecomeHash
+     self new test50_becomeHash
     "
+
+    "Created: / 30-04-2016 / 09:39:53 / cg"
 !
 
-testBecomeIdentityHash
+test51_becomeIdentityHash
     "Note. The identity hash of both objects seems to change after the become:"
 
     | a b c d |
@@ -169,8 +183,10 @@
         deny: a identityHash = b identityHash.
 
     "
-     self new testBecomeIdentityHash
+     self new test51_becomeIdentityHash
     "
+
+    "Created: / 30-04-2016 / 09:40:02 / cg"
 ! !
 
 !BecomeTests class methodsFor:'documentation'!