~/jendhub

def place.val.ok

emerging-ezjson@1.3.0.0 · src/pull.bend:199

import emerging-ezjson@1.3.0.0/src/pull.bend as Pull
import Base

199# a value has landed in a slot that can take it
200def place.val.ok(ev: Ev, rest: String, goal: Goal, stack: List<&2, Frame>, root: Bool) -> St:
201  match goal:
202    case GNext{}:
203      S{MDone{SEv{ev}, rest}, stack, GNext{}, root, False{}}
204    case GSkip{0n}:
205      S{MDone{SSkip{}, rest}, stack, GSkip{0n}, root, False{}}
206    case GSkip{1n+left}:
207      S{MIdle{}, stack, GSkip{1n+left}, False{}, False{}}

Uses (10)

Used by (1)