--- a/STCCompilerInterface.st	Fri May 18 17:55:11 2018 +0200
+++ b/STCCompilerInterface.st	Fri May 18 17:56:25 2018 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
  COPYRIGHT (c) 2006 by eXept Software AG
@@ -1015,7 +1013,7 @@
     parserFlags isNil ifTrue:[ parserFlags := ParserFlags new].
 
     stFn := stFileName asFilename.
-    oFileName := stFn nameWithoutSuffix , (ObjectFileLoader objectFileExtension).
+    oFileName := (stFn withSuffix:(ObjectFileLoader objectFileSuffix)) name.
     cFileName := (stFn withSuffix:'c') name. 
 "/    ParserFlags useBorlandC ifTrue:[
 "/        cFileName := (stFn withSuffix:'sc') name.