Skip to content

Instantly share code, notes, and snippets.

View GregRos's full-sized avatar

Greg Ros GregRos

View GitHub Profile
@GregRos
GregRos / startTerminator.vbs
Created April 27, 2019 00:20 — forked from ropnop/startTerminator.vbs
VBS Script to Launch Terminator through WSL
' terminator.vbs
myCd = "~"
If WScript.Arguments.Length > 0 Then
myCd = "'$(wslpath -u '" & WScript.Arguments(0) & "')'"
End If
args = "bash" & " -c ""cd " & myCd & "; DISPLAY=:0 terminator"""
WScript.CreateObject("Shell.Application").ShellExecute "C:\Windows\System32\wsl.exe", args, "", "open", 0
let lst = FunqList.ofSeq [0 .. 0]
let x =
match lst with
| Last(initial, last1, last2, last3) -> sprintf "%A" last3
| Last(initial, last1, last2) -> sprintf "%A" last2
| Last(Nil, last1) -> sprintf "%A" last1
| Last(initial, last1) -> sprintf "%A" last1