matching-delimiter ( ch -- ch' )


Vocabulary
modern.slices

Inputs
chan object


Outputs
ch'an object


Definition


: matching-delimiter ( ch -- ch' )
H{ { 40 41 } { 58 59 } { 91 93 } { 123 125 } { 60 62 } } ?at
drop ;