Lucifier129

type result('a, 'b) =
  | Ok('a)
  | Error('b)

let inject = value => input => (Ok(value), input)

let error = e => input => (Error(e), input)

let item = input => {
  let (index, source) = input