on d452c09 help sign in
40 lines 819 B history raw
1### `++rust`
3Parse tape or null
5Parse a `++tape` with a given `++rule` and produce null if the `++tape` isn't
6entirely parsed.
8Accepts
9-------
11`los` is a `++tape`.
13`sab` is a `++rule`.
15Produces
16--------
18A `(unit ,@t)`
20Source
21------
23 ++ rust |* {los/tape sab/rule}
24 =+ vex=((full sab) [[1 1] los])
25 ?~(q.vex ~ [~ u=p.u.q.vex])
28Examples
29--------
31 ~zod/try=> (rust "I was the world in which I walked, and what I saw" (star (shim 0 200)))
32 [~ "I was the world in which I walked, and what I saw"]
33 ~zod/try=> (rust "Or heard or felt came not but from myself;" (star (shim 0 200)))
34 [~ "Or heard or felt came not but from myself;"]
35 ~zod/try=> (rust "And there I found myself more truly and more strange." (jest 'And there I'))
36 ~
40***