Wapp

Ticket Change Details
Login
Overview

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

  1. Change icomment to:
    Here is a test Wapp script I am using:
    
    <blockquote><verbatim>
    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
    </verbatim></blockquote>
    
    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. Change login to "drh"
  3. Change mimetype to "text/x-fossil-wiki"