Error processing request
Parameters
CONTENT_LENGTH | 0 |
REQUEST_METHOD | GET |
REQUEST_URI | /revision/8%2DLine+Server?V=4 |
QUERY_STRING | V=4 |
CONTENT_TYPE | |
DOCUMENT_URI | /revision/8-Line+Server |
DOCUMENT_ROOT | /var/www/nikit/nikit/nginx/../docroot |
SCGI | 1 |
SERVER_PROTOCOL | HTTP/1.1 |
HTTPS | on |
REMOTE_ADDR | 172.70.179.136 |
REMOTE_PORT | 9986 |
SERVER_PORT | 4443 |
SERVER_NAME | wiki.tcl-lang.org |
HTTP_HOST | wiki.tcl-lang.org |
HTTP_CONNECTION | Keep-Alive |
HTTP_ACCEPT_ENCODING | gzip, br |
HTTP_X_FORWARDED_FOR | 3.22.119.251 |
HTTP_CF_RAY | 87a6060d9c076348-ORD |
HTTP_X_FORWARDED_PROTO | https |
HTTP_CF_VISITOR | {"scheme":"https"} |
HTTP_ACCEPT | */* |
HTTP_USER_AGENT | Mozilla/5.0 AppleWebKit/537.36 (KHTML, like Gecko; compatible; ClaudeBot/1.0; [email protected]) |
HTTP_CF_CONNECTING_IP | 3.22.119.251 |
HTTP_CDN_LOOP | cloudflare |
HTTP_CF_IPCOUNTRY | US |
Body
Error
Unknow state transition: LINE -> END
-code
1
-level
0
-errorstack
INNER {returnImm {Unknow state transition: LINE -> END} {}} CALL {my render_wikit {8-Line Server} {[jdp] - An 8 line server. Serves text files out of the current directory.
======
proc s {c a p} {
set o [lindex [split [gets $c] " "] 1]
puts $c [read [set f [open ".$o"]]]
close $f
close $c
}
set s [socket -server s 3210]
vwait forever
======
[jdp] - After spending time in the chatroom, with the help of [stu] and [suchenwi], it became a 1-line, 140-char server. (Interactive mode only, though.)
======
vw [soc -server {appl {{c a p} {puts $c [read [set f [open .[regsub {\.\.+} [lindex [split [gets $c] \ ] 1] x]]]][close $f];close $c}}} 80]
======
[RS] 2009-05-29: The [fcopy] version is still a few bytes shorter:
======
vw [soc -server {appl {{c a p} {fcopy [set f [open .[regsub {\.\.+} [lindex [split [gets $c] \ ] 1] x]]] $c;close $f;close $c}}} 80]
----
!!!!!!
%| enter categories here |%
!!!!!!} regexp2} CALL {my render {8-Line Server} {[jdp] - An 8 line server. Serves text files out of the current directory.
======
proc s {c a p} {
set o [lindex [split [gets $c] " "] 1]
puts $c [read [set f [open ".$o"]]]
close $f
close $c
}
set s [socket -server s 3210]
vwait forever
======
[jdp] - After spending time in the chatroom, with the help of [stu] and [suchenwi], it became a 1-line, 140-char server. (Interactive mode only, though.)
======
vw [soc -server {appl {{c a p} {puts $c [read [set f [open .[regsub {\.\.+} [lindex [split [gets $c] \ ] 1] x]]]][close $f];close $c}}} 80]
======
[RS] 2009-05-29: The [fcopy] version is still a few bytes shorter:
======
vw [soc -server {appl {{c a p} {fcopy [set f [open .[regsub {\.\.+} [lindex [split [gets $c] \ ] 1] x]]] $c;close $f;close $c}}} 80]
----
!!!!!!
%| enter categories here |%
!!!!!!}} CALL {my revision {8-Line Server}} CALL {::oo::Obj1552440 process revision/8%2DLine+Server} CALL {::oo::Obj1552438 process}
-errorcode
NONE
-errorinfo
Unknow state transition: LINE -> END
while executing
"error $msg"
(class "::Wiki" method "render_wikit" line 6)
invoked from within
"my render_$default_markup $N $C $mkup_rendering_engine"
(class "::Wiki" method "render" line 8)
invoked from within
"my render $name $C"
(class "::Wiki" method "revision" line 31)
invoked from within
"my revision $page"
(class "::Wiki" method "process" line 56)
invoked from within
"$server process [string trim $uri /]"
-errorline
4