diff --git a/mystic/mpl_execute.pas b/mystic/mpl_execute.pas index ab05d60..66c2e47 100644 --- a/mystic/mpl_execute.pas +++ b/mystic/mpl_execute.pas @@ -1265,12 +1265,7 @@ End; Procedure TInterpEngine.FileWriteLine (Var F: File; Str: String); Begin - {$IFDEF WINDOWS} - Str := Str + #13#10; - {$ENDIF} - {$IFDEF UNIX} - Str := Str + #10; - {$ENDIF} + Str := Str + LineTerm; BlockWrite (F, Str[1], Ord(Str[0]));