Class: Nydp::Builtin::Divide

Inherits:
Object
  • Object
show all
Defined in:
lib/nydp/builtin/divide.rb

Instance Method Summary collapse

Instance Method Details

#divide(args, accum) ⇒ Object 



6
7
8
9
10
11
12
 
# File 'lib/nydp/builtin/divide.rb', line 6

def divide args, accum
  if Nydp.NIL.is? args
    accum
  else
    divide(args.cdr, (accum / args.car))
  end
end

#invoke(vm, args) ⇒ Object 



2
3
4
 
# File 'lib/nydp/builtin/divide.rb', line 2

def invoke vm, args
  vm.push_arg divide(args.cdr, args.car)
end