Class: Mercury::Cps::Seq

Inherits:
Object
  • Object
show all
Defined in:
lib/mercury/cps/seq.rb

Instance Method Summary collapse

Instance Method Details

#chain(proc = nil, &block) ⇒ Object



16
17
18
# File 'lib/mercury/cps/seq.rb', line 16

def chain(proc=nil, &block)
  @m = m.and_then(&(proc || block))
end

#mObject



12
13
14
# File 'lib/mercury/cps/seq.rb', line 12

def m
  @m ||= Cps.identity # we need an initial Cps to chain onto
end