Can't create more than max_prepared_stmt_count statements (current value: 16382)
    while executing
"my statementCreate Stmt::[incr statementSeq] [self] $sqlcode"
    (class "::tdbc::connection" method "prepare" line 2)
    invoked from within
"::DIO::Tdbc::tdbc::mysql#0 prepare {select * from rivet_session WHERE 1 = 1 AND ip_address = '216.73.217.134' AND session_id = '5F8D5A94BE45F35D3FB1E0..."
    ("uplevel" body line 1)
    invoked from within
"uplevel 1 $connector prepare [::list $sql]"
    (object "::DIO::tdbc0" method "::DIO::Tdbc::exec" body line 11)
    invoked from within
"exec $req"
    (object "::DIO::tdbc0" method "::DIO::Database::store" body line 11)
    invoked from within
"$dioObject store a -table $sessionTable -keyfield $kf"
    (object "::SESSION" method "::Session::create_session" body line 12)
    invoked from within
"create_session"
    (object "::SESSION" method "::Session::activate" body line 21)
    invoked from within
"::SESSION activate"
    (file "/home/massimo/lifebarbie/before.tcl" line 23)
    invoked from within
"source $::rivetweb::site_before_script"
    (in namespace eval "::rivetweb" script line 50)
    invoked from within
"namespace eval ::rivetweb {

    ::rivet::apache_log_error debug "running rivetweb request handler ([pwd])"

# determining if the 'rewrite_par' argume..."
    (file "/home/massimo/rivetweb/tcl/before.tcl" line 14)
    invoked from within
"source [file join $rweb_root tcl before.tcl]"
    ("eval" body line 1)
    invoked from within
"eval $script"
    ("::try" body line 6)
OUTPUT BUFFER:
source [file join $rweb_root tcl before.tcl]