--- a/RegressionTests__SnapshotRestartTests.st	Thu Sep 12 17:20:29 2013 +0200
+++ b/RegressionTests__SnapshotRestartTests.st	Thu Sep 12 17:52:43 2013 +0200
@@ -25,11 +25,13 @@
     innerSuite := ToRunOnFreshAndRestartedSnapshotTests buildSuite.
     expected := '%1 run, %1 passed, 0 skipped, 0 failed, 0 errors ### HERE ### ' bindWith: innerSuite tests size.
     string asStringCollection do:[:line|
-        line = expected ifTrue:[ ^ self ].
+        "/ Uss starts with because on Windows you get 0xD chars at the end, sigh
+        (line startsWith: expected) ifTrue:[ ^ self ].
     ].
     self assert: false description: 'Not all inner tests passed'.
 
     "Created: / 14-08-2013 / 20:06:30 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 12-09-2013 / 08:44:06 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !SnapshotRestartTests methodsFor:'compilation'!