[求助]一个删除重复块程序运行有问题,麻烦高手查看!
www.dimcax.com
这样好象不重叠的块也要删除了.
d
echo" 0)
( ( ss ( "x" '((0 . "insert"))))
(
( i 0 ess ())
( ( ss)
( s1 ( ss i)
ent ( s1)
j 0
ptlist '()
ss1 ( "x" ( '(0 . "insert") ( 2 ent))))
( ( ( ss1) 1)
( ( ss1)
( en ( ss1 j))
( pt ( ( 10 ( en))))
( ( pt ptlist) ( ess ( en ess)) ( ptlist ( pt ptlist)))
( j ( j))
)
)
( i ( i))
)
( ".erase" ess "")
))
( "cmdecho" 1)
()
)
d
zzxx