Ticket Change Details

Artifact ID: f87cb911159f138483ed30b6cebbcda161121b2efbc7247e5ccf57410d3e9470
Ticket: 207094dd9de1343af9d874b8562fc1b4169c3e44
Multiple request in progress can step on each others toes
User & Date: drh 2019-07-30 17:56:45

  1. icomment:
    Here is a test Wapp script I am using:
    source ./wapp.tcl
    proc wapp-default {} {
      wapp-trim {
        <p>Visit the <a href='%html([wapp-param BASE_URL]/slow)'>slow</a>
        page for a slow-to-load case.</p>
    proc wapp-page-slow {} {
      set x [expr {abs(int(rand()*100000))}]
      for {set i 0} {$i<20000000} {incr i} {
        set x [expr {$x+1}]
      wapp-trim {
        <h1>Slow page</h1>
        <p>x = %html($x)</p>
    wapp-start $argv
    I run this as "tclsh slow.tcl --server 8080" and then look at the /slow page
    in a webbrowser.  Then I start hammering the refresh button.  Everything works
    fine for me.  No errors.  (Tcl 8.7, Firefox, Ubuntu)
    Do you have another test case that will better demonstrate the problem?
  2. login: "drh"
  3. mimetype: "text/x-fossil-wiki"