Function sync

packages/effect/src/internal/stm/core.ts:770–774

(evaluate: () => A)

/** @internal */
export const sync = <A>(evaluate: () => A): STM.STM<A> => {
  const stm = new STMPrimitive(OpCodes.OP_SYNC)
  stm.effect_instruction_i1 = evaluate
  return stm as any
}

/** @internal */
export const zip = dual<