find-cut ( string quot -- before after delimiter )


Vocabulary
farkup

Inputs and outputs
stringan object
quotan object
beforean object
afteran object
delimiteran object


Definition


: find-cut ( string quot -- before after delimiter )
dupd find [ [ cut-half-slice ] [ f ] if* ] dip ; inline