Closed callmekohei closed 6 years ago
add following
let ps = new System.Diagnostics.Process()
ps.StartInfo.FileName <- "/bin/stty"
ps.StartInfo.Arguments <- "echo"
ps.Start() |> ignore
Log.Info(string(ps.Id))
()
Hello! I'm callmekohei
!
It's need to sleep time ( 5ms ).
open Mono.Debugger.Client
open Mono.Debugging.Client
open System.IO
[<Sealed; Command>]
type MyCommand() =
inherit Command()
override __.Names = [|"mycmd"|]
override __.Summary = "aaa bbb ccc"
override __.Syntax = "ddd eee fff"
override __.Help = "Help Help Help"
override __.Process(args) =
let file = new FileInfo(args)
Debugger.Run(file)
let width = System.Console.WindowWidth
Log.Info(String.replicate width "─" )
Process.Start("stty","echo")
System.Threading.Thread.Sleep 5
()
Thanks (^_^)/
Hello! I'm
callmekohei
!Problesm
Readline() not work well.
like this
repro
open System.IO
[<Sealed; Command>] type MyCommand() = inherit Command() override .Names = [|"mycmd"|] override .Summary = "aaa bbb ccc" override .Syntax = "ddd eee fff" override .Help = "Help Help Help" override __.Process(args) =
$ fsharpc -a -r:$(dirname $(which sdb))/../lib/sdb/sdb.exe test.fsx $ mv test.dll ../.sdb/
$ sdb (sdb) mycmd foo.exe ... (sdb) // <--- I can not watch input strings (^_^;;;