The Easiest Way to Save and Share Code Snippets on the web

#FSharp (usual F# code) yes, it's easy to parse

ocaml | by: Oxitomi

posted: Nov, 30th 2011 | jump to bottom

  1. let internal (<%=) W Z clear async N =
  2. let X thriller =
  3. (W : Dev).ListPos .Clear()
  4. if clear then W.Out .Clear()
  5. thriller()
  6. if async then
  7. W.Thread <- new Thread( new ThreadStart( fun () -> W.Run(N) ) )
  8. W.Thread.Start()
  9. else W.Run N
  10. X <| fun () -> Array.iter(fun z -> W.ListPos.Add <| z) Z
154 views