paren matching by I., S.

wd('?'=S)}S,:R{~-R i.S{~(i:1+{:)\+/\.(*-2*9=])9-R i.S=:stdin R=:'?(<[{}]>)'

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page