Fix linux+macos next line FSI behavior (#16251)

dotnet · Nov 10, 2023 · d441308 · d441308
1 parent 9a0b9bf
commit d441308
Showing 1 changed file with 8 additions and 1 deletion.
diff --git a/src/fsi/console.fs b/src/fsi/console.fs
@@ -5,6 +5,7 @@ namespace FSharp.Compiler.Interactive
 open System
 open System.Text
 open System.Collections.Generic
+open System.Runtime.InteropServices
 open FSharp.Compiler.DiagnosticsLogger
 
 type internal Style =
@@ -242,6 +243,8 @@ type internal Anchor =
 type internal ReadLineConsole() =
     let history = new History()
 
+    static let supportsBufferHeightChange = RuntimeInformation.IsOSPlatform(OSPlatform.Windows)
+
     let mutable complete: (string option * string -> seq<string>) =
         fun (_s1, _s2) -> Seq.empty
 
@@ -347,7 +350,11 @@ type internal ReadLineConsole() =
 
             if Console.CursorLeft + charSize > Utils.bufferWidth () then
                 if Console.CursorTop + 1 = Console.BufferHeight then
-                    Console.BufferHeight <- Console.BufferHeight + 1
+                    if supportsBufferHeightChange then
+                        Console.BufferHeight <- Console.BufferHeight + 1
+                    else
+                        Console.WriteLine()
+                        anchor <- { anchor with top = (anchor).top - 1 }
 
                 Cursor.Move(0)