Kouhei Sutou
kou****@cozmi*****
2004年 3月 30日 (火) 01:46:13 JST
須藤です. In <20040****@cozmi*****> "[Gauche-devel-jp] WiLiKi can't handle ul and dl" on Sun, 28 Mar 2004 23:44:41 +0900 (JST), Kouhei Sutou <kou****@cozmi*****> wrote: > WiLiKiに > > - a > :b: > - c > > というようなテキストをフォーマットさせると無限ループになるよ > うです. いいのかどうかはわかりませんが,こんなので直るようです(make checkも通ります). Index: src/wiliki/format.scm =================================================================== RCS file: /cvsroot/wiliki/WiLiKi/src/wiliki/format.scm,v retrieving revision 1.32 diff -u -p -r1.32 format.scm --- src/wiliki/format.scm 19 Mar 2004 23:41:21 -0000 1.32 +++ src/wiliki/format.scm 29 Mar 2004 16:29:42 -0000 @@ -543,8 +543,8 @@ (table tok ctx (lambda (tok ctx elt) (loop tok '() (cons elt (fold-p)))))) ((ul ol) - (if (>= (h-level (token-value tok)) - (l-level ctx)) + (if (> (h-level (token-value tok)) + (l-level ctx)) (list-item tok ctx (lambda (tok ctx elt) (loop tok '() (cons elt (fold-p))))) (values tok (finish))))