--- a/RegressionTests__StreamTests.st	Mon Jul 11 10:24:03 2016 +0100
+++ b/RegressionTests__StreamTests.st	Tue Jul 12 14:12:15 2016 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "{ Package: 'stx:goodies/regression' }"
 
 "{ NameSpace: RegressionTests }"
@@ -652,7 +650,13 @@
 !
 
 test40_eolMode
-    |fn stream lineEnd contents expected eolModeOfStream check|
+    |fn stream lineEnd contents expected eolModeOfStream check eolModePlatformDefault |
+
+    OperatingSystem isMSWINDOWSlike ifTrue:[ 
+        eolModePlatformDefault := #crlf
+    ] ifFalse:[
+        eolModePlatformDefault := #nl.
+    ].
 
     eolModeOfStream :=
         [:stream |
@@ -675,7 +679,7 @@
         fn := Filename newTemporary.
         stream := fn writeStream.
         "/ all show the same default behavior
-        self assert:(stream eolMode == #nl).
+        self assert:(stream eolMode == eolModePlatformDefault).
     ] ensure:[
         stream close.
         fn delete.  
@@ -717,6 +721,7 @@
     "
 
     "Modified: / 29-04-2016 / 14:20:12 / cg"
+    "Modified: / 12-07-2016 / 14:01:15 / jv"
 ! !
 
 !StreamTests class methodsFor:'documentation'!