4coder editor is now fully open source(github.com)

    $ml = @("-nologo","-c","-Zd","-WX","-W3")
    ...

    $clstd = @("-volatile:iso","-permissive-")
    $clangcl = @("-nologo","-diagnostics:column","-Z7","-Zo","-FC") + $clstd
    $cl = $clangcl + @("-WL","-Gm-","-utf-8")
    # -Wall > -W4 but includes very silly things like "function not inlined" for snprintf
    $clwx = @("-WX","-W4","-wd4100","-wd4127")
    ...
    $clfree = @("-D","EXAMPLE_FREESTANDING","-Zl","-GS-","-sdl-","-Gs9999999")
    $clfreedebug = $clwx + $clodebug + $cldd + $clfree + $clnortti + $clhash + $cllink + $link + $linkfree
    ...
    $out = "./x86_64-windows-free-cl-debug"
    if ("all" -in $targets -or (split-path -path $out -leaf) -in $targets) {
        new-item -itemtype directory -force $out | out-null
        try {
            push-location $out
            $buildcount++
            write-host (split-path -path $out -leaf)
            ml64 @ml $src/example-x64.asm
            cl "-Fm./example.map" "-Tc$src/example.c" ./example-x64.obj @cl @clfreedebug
        } finally { pop-location ; }
    }

    $ cat fact.st
    Stdio stdout 
        nextPutAll: 100 factorial printString; 
        nextPut: Character lf.!
    SmalltalkImage current snapshot: false andQuit: true!

    $ bin/pharo --headless Pharo10-SNAPSHOT-64bit-502addc.image fact.st
    93326215443944152681699238856266700490715968264381621468592963895217599993229915608941463976156518286253697920827223758251185210916864000000000000000000000000