RegressionTests__CryptTests.st
changeset 1403 09e8d093107c
parent 1402 5e7b9b681064
child 1447 2351db93aa5b
--- a/RegressionTests__CryptTests.st	Sat Apr 23 18:16:48 2016 +0200
+++ b/RegressionTests__CryptTests.st	Tue Apr 26 17:54:00 2016 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "{ Package: 'exept:regression' }"
 
 "{ NameSpace: RegressionTests }"
@@ -309,7 +311,7 @@
     s := '12345678'.
     10 timesRepeat:[
         s2 := ByteArray new:s size.
-        des cryptBlock:s from:1 to:nil into:s2 startingAt:1 encrypt:true.
+        des cryptBlock:s from:1 "to:nil" into:s2 startingAt:1 encrypt:true.
         s := s2.
     ].
     self assert:(s = #[212 114 83 160 109 1 37 83]).