Error processing request

Parameters

Body

Error

Unknow state transition: LINE -> END

-code

1

-level

0

-errorstack

INNER {returnImm {Unknow state transition: LINE -> END} {}} CALL {my render_wikit {Eight Queens, minimalistic} \[WDB\]:\n\n======\npackage\ require\ Tcl\ 8.5\npackage\ require\ Tk\n\nbind\ Tk\ <Destroy>\ exit\nwm\ resizable\ .\ no\ no\n\napply\ \{canvas\ \{\n\ \ destroy\ \$canvas\n\ \ pack\ \[canvas\ \$canvas\ -width\ 320\ -height\ 320\]\n\ \ foreach\ i\ \{0\ 1\ 2\ 3\ 4\ 5\ 6\ 7\}\ \{\n\ \ \ \ \ \ foreach\ j\ \{0\ 1\ 2\ 3\ 4\ 5\ 6\ 7\}\ \{\n\ \ \ \ \ \ \ \ set\ o\ \[expr\ \{(\$i+\$j)%2\ ?\ \"odd\"\ :\ \"even\"\}\]\n\ \ \ \ \ \ \ \ set\ coords\ \[list\ \[*\ \$i\ 40\]\ \[*\ \$j\ 40\]\\\n\ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \[*\ \[+\ \$i\ 1\]\ 40\]\ \[*\ \[+\ \$j\ 1\]\ 40\]\]\n\ \ \ \ \ \ \ \ \$canvas\ create\ rectangle\ \$coords\\\n\ \ \ \ \ \ \ \ \ \ -tags\ \[list\ f\ \$o\ r\$j\ c\$i\]\n\ \ \ \ \ \ \ \ \$canvas\ create\ text\\\n\ \ \ \ \ \ \ \ \ \ \[+\ \[*\ \$i\ 40\]\ 20\]\ \[+\ \[*\ \$j\ 40\]\ 20\]\\\n\ \ \ \ \ \ \ \ \ \ -tags\ \[list\ q\ r\$j\ c\$i\]\n\ \ \ \ \ \ \ \ \$canvas\ bind\ r\$j&&c\$i\ <1>\ \"check\ \$j\ \$i\"\n\ \ \ \ \ \ \}\n\ \ \ \ \}\n\ \ foreach\ c\ \{-8\ -7\ -6\ -5\ -4\ -3\ -2\ -1\ 0\ 1\ 2\ 3\ 4\ 5\ 6\ 7\}\ \{\n\ \ \ \ \ \ set\ col\ \$c\n\ \ \ \ \ \ foreach\ row\ \{0\ 1\ 2\ 3\ 4\ 5\ 6\ 7\}\ \{\n\ \ \ \ \ \ \ \ \$canvas\ addtag\ d\[+\ \$c\ 7\]\ withtag\ r\$row&&c\$col\n\ \ \ \ \ \ \ \ incr\ col\n\ \ \ \ \ \ \}\n\ \ \ \ \}\n\ \ foreach\ c\ \{0\ 1\ 2\ 3\ 4\ 5\ 6\ 7\ 8\ 9\ 10\ 11\ 12\ 13\ 14\ 15\}\ \{\n\ \ \ \ \ \ set\ col\ \$c\n\ \ \ \ \ \ foreach\ row\ \{0\ 1\ 2\ 3\ 4\ 5\ 6\ 7\}\ \{\n\ \ \ \ \ \ \ \ \$canvas\ addtag\ e\$c\ withtag\ r\$row&&c\$col\n\ \ \ \ \ \ \ \ incr\ col\ -1\n\ \ \ \ \ \ \}\n\ \ \ \ \}\n\ \ \$canvas\ itemconfigure\ odd\\\n\ \ \ \ -fill\ grey\\\n\ \ \ \ -outline\ \"\"\n\ \ \$canvas\ itemconfigure\ even\\\n\ \ \ \ -fill\ #ffffcc\\\n\ \ \ \ -outline\ \"\"\n\ \ \$canvas\ itemconfigure\ q\\\n\ \ \ \ -fill\ navy\\\n\ \ \ \ -font\ \{Times\ 20\ bold\ italic\}\n\ \ bind\ \$canvas\ <ButtonRelease>\\\n\ \ \ \ \"\$canvas\ itemconfigure\ q\ -fill\ navy\"\n\}\ ::tcl::mathop\}\ .c\n\nproc\ check\ \{row\ col\}\ \{\n\ \ set\ txt\ \[.c\ itemcget\ q&&r\$row&&c\$col\ -text\]\n\ \ if\ \{\$txt\ ne\ \"\"\}\ then\ \{\n\ \ \ \ .c\ itemconfigure\ q&&r\$row&&c\$col\ -text\ \"\"\n\ \ \}\ else\ \{\n\ \ \ \ setQueen\ \$row\ \$col\n\ \ \}\n\}\n\nproc\ setQueen\ \{row\ col\}\ \{\n\ \ foreach\ tag\ \[.c\ gettags\ q&&r\$row&&c\$col\]\ \{\n\ \ \ \ regexp\ d(.+)\ \$tag\ -\ d\n\ \ \ \ regexp\ e(.+)\ \$tag\ -\ e\n\ \ \}\n\ \ set\ pat\ q&&(r\$row||c\$col||d\$d||e\$e)\n\ \ set\ success\ true\n\ \ set\ els\ \[.c\ find\ withtag\ \$pat\]\n\ \ foreach\ el\ \$els\ \{\n\ \ \ \ if\ \{\[.c\ itemcget\ \$el\ -text\]\ ne\ \"\"\}\ then\ \{\n\ \ \ \ \ \ set\ success\ false\n\ \ \ \ \}\n\ \ \}\n\ \ if\ \{\$success\}\ then\ \{\n\ \ \ \ .c\ itemconfigure\ q&&r\$row&&c\$col\ -text\ Q\n\ \ \}\ else\ \{\n\ \ \ \ .c\ itemconfigure\ \$pat\ -fill\ white\n\ \ \}\n\}\n===\n\n----\nSee\ also:\ \[Eight\ Queens\ Problem\]\n\n<<categories>>Category\ Toys regexp2} CALL {my render {Eight Queens, minimalistic} \[WDB\]:\n\n======\npackage\ require\ Tcl\ 8.5\npackage\ require\ Tk\n\nbind\ Tk\ <Destroy>\ exit\nwm\ resizable\ .\ no\ no\n\napply\ \{canvas\ \{\n\ \ destroy\ \$canvas\n\ \ pack\ \[canvas\ \$canvas\ -width\ 320\ -height\ 320\]\n\ \ foreach\ i\ \{0\ 1\ 2\ 3\ 4\ 5\ 6\ 7\}\ \{\n\ \ \ \ \ \ foreach\ j\ \{0\ 1\ 2\ 3\ 4\ 5\ 6\ 7\}\ \{\n\ \ \ \ \ \ \ \ set\ o\ \[expr\ \{(\$i+\$j)%2\ ?\ \"odd\"\ :\ \"even\"\}\]\n\ \ \ \ \ \ \ \ set\ coords\ \[list\ \[*\ \$i\ 40\]\ \[*\ \$j\ 40\]\\\n\ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \[*\ \[+\ \$i\ 1\]\ 40\]\ \[*\ \[+\ \$j\ 1\]\ 40\]\]\n\ \ \ \ \ \ \ \ \$canvas\ create\ rectangle\ \$coords\\\n\ \ \ \ \ \ \ \ \ \ -tags\ \[list\ f\ \$o\ r\$j\ c\$i\]\n\ \ \ \ \ \ \ \ \$canvas\ create\ text\\\n\ \ \ \ \ \ \ \ \ \ \[+\ \[*\ \$i\ 40\]\ 20\]\ \[+\ \[*\ \$j\ 40\]\ 20\]\\\n\ \ \ \ \ \ \ \ \ \ -tags\ \[list\ q\ r\$j\ c\$i\]\n\ \ \ \ \ \ \ \ \$canvas\ bind\ r\$j&&c\$i\ <1>\ \"check\ \$j\ \$i\"\n\ \ \ \ \ \ \}\n\ \ \ \ \}\n\ \ foreach\ c\ \{-8\ -7\ -6\ -5\ -4\ -3\ -2\ -1\ 0\ 1\ 2\ 3\ 4\ 5\ 6\ 7\}\ \{\n\ \ \ \ \ \ set\ col\ \$c\n\ \ \ \ \ \ foreach\ row\ \{0\ 1\ 2\ 3\ 4\ 5\ 6\ 7\}\ \{\n\ \ \ \ \ \ \ \ \$canvas\ addtag\ d\[+\ \$c\ 7\]\ withtag\ r\$row&&c\$col\n\ \ \ \ \ \ \ \ incr\ col\n\ \ \ \ \ \ \}\n\ \ \ \ \}\n\ \ foreach\ c\ \{0\ 1\ 2\ 3\ 4\ 5\ 6\ 7\ 8\ 9\ 10\ 11\ 12\ 13\ 14\ 15\}\ \{\n\ \ \ \ \ \ set\ col\ \$c\n\ \ \ \ \ \ foreach\ row\ \{0\ 1\ 2\ 3\ 4\ 5\ 6\ 7\}\ \{\n\ \ \ \ \ \ \ \ \$canvas\ addtag\ e\$c\ withtag\ r\$row&&c\$col\n\ \ \ \ \ \ \ \ incr\ col\ -1\n\ \ \ \ \ \ \}\n\ \ \ \ \}\n\ \ \$canvas\ itemconfigure\ odd\\\n\ \ \ \ -fill\ grey\\\n\ \ \ \ -outline\ \"\"\n\ \ \$canvas\ itemconfigure\ even\\\n\ \ \ \ -fill\ #ffffcc\\\n\ \ \ \ -outline\ \"\"\n\ \ \$canvas\ itemconfigure\ q\\\n\ \ \ \ -fill\ navy\\\n\ \ \ \ -font\ \{Times\ 20\ bold\ italic\}\n\ \ bind\ \$canvas\ <ButtonRelease>\\\n\ \ \ \ \"\$canvas\ itemconfigure\ q\ -fill\ navy\"\n\}\ ::tcl::mathop\}\ .c\n\nproc\ check\ \{row\ col\}\ \{\n\ \ set\ txt\ \[.c\ itemcget\ q&&r\$row&&c\$col\ -text\]\n\ \ if\ \{\$txt\ ne\ \"\"\}\ then\ \{\n\ \ \ \ .c\ itemconfigure\ q&&r\$row&&c\$col\ -text\ \"\"\n\ \ \}\ else\ \{\n\ \ \ \ setQueen\ \$row\ \$col\n\ \ \}\n\}\n\nproc\ setQueen\ \{row\ col\}\ \{\n\ \ foreach\ tag\ \[.c\ gettags\ q&&r\$row&&c\$col\]\ \{\n\ \ \ \ regexp\ d(.+)\ \$tag\ -\ d\n\ \ \ \ regexp\ e(.+)\ \$tag\ -\ e\n\ \ \}\n\ \ set\ pat\ q&&(r\$row||c\$col||d\$d||e\$e)\n\ \ set\ success\ true\n\ \ set\ els\ \[.c\ find\ withtag\ \$pat\]\n\ \ foreach\ el\ \$els\ \{\n\ \ \ \ if\ \{\[.c\ itemcget\ \$el\ -text\]\ ne\ \"\"\}\ then\ \{\n\ \ \ \ \ \ set\ success\ false\n\ \ \ \ \}\n\ \ \}\n\ \ if\ \{\$success\}\ then\ \{\n\ \ \ \ .c\ itemconfigure\ q&&r\$row&&c\$col\ -text\ Q\n\ \ \}\ else\ \{\n\ \ \ \ .c\ itemconfigure\ \$pat\ -fill\ white\n\ \ \}\n\}\n===\n\n----\nSee\ also:\ \[Eight\ Queens\ Problem\]\n\n<<categories>>Category\ Toys} CALL {my revision {Eight Queens, minimalistic}} CALL {::oo::Obj1060780 process revision/Eight+Queens%2C+minimalistic} CALL {::oo::Obj1060778 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