This comment is reply for 585 es: shiroさんの"なんでも再帰"(htt...(/*コメント*/を取り除く). Go to thread root.
es #609(2007/07/12 05:17 GMT) [ Scheme ] Rating1/1=1.00
1 2 3 4 5 6 7 8
(define (remove-comment str) (receive (ss cs) (string-scan str "/*" 'both) (if ss (string-append ss (receive (se ce) (string-scan cs "*/" 'both) (if se (remove-comment ce) ""))) str)))
Rating1/1=1.00-0+
[ reply ]
es
#609()
[
Scheme
]
Rating1/1=1.00
Rating1/1=1.00-0+