anchor.diff:                          match Map.tryFind "code" data, Map.tryFind "comp" data with
                               | Some code, Some comp ->
                                   printfn "starting compiler"
  -                                let b = compile code comp
  +                                let b = runInRandomDomain (fun () -> compile code comp |> System.Text.ASCIIEncoding.Default.GetString) |> System.Text.ASCIIEncoding.Default.GetBytes
   
                                   printfn "reply"
                                   ctx.Response.StatusCode <- 200
  
positive.code:                 | :? System.OperationCanceledException as e -> 
                      Interlocked.Decrement(&workersRunning) |> ignore
                  | e ->
                      printfn "ERROR: %A" e
                      Interlocked.Decrement(&workersRunning) |> ignore
  
          ) |> ignore
  
negative.code:         listener.Start()
          while true do
              let ctx = listener.GetContext()
             
              ctx.Response.AddHeader("Access-Control-Allow-Origin", "*")
              worker(ctx)
  
  