Propagate NL spelling change to PlatformWindows.

This commit is contained in:
David Brown 2016-09-29 10:28:40 +01:00
parent 25d99fd36a
commit 08bf8d2fc3

View file

@ -50,7 +50,7 @@ VAR
InterruptHandler: SignalHandler; InterruptHandler: SignalHandler;
nl-: ARRAY 3 OF CHAR; (* Platform specific newline representation *) NL-: ARRAY 3 OF CHAR; (* Platform specific newline representation *)
@ -616,7 +616,7 @@ BEGIN
StdOut := getstdouthandle(); StdOut := getstdouthandle();
StdErr := getstderrhandle(); StdErr := getstderrhandle();
nl[0] := 0DX; (* CR *) NL[0] := 0DX; (* CR *)
nl[1] := 0AX; (* LF *) NL[1] := 0AX; (* LF *)
nl[2] := 0X; NL[2] := 0X;
END Platform. END Platform.