Method: Nendo::Evaluator#_symbol_MIMARKinclude_QUMARK

Defined in:
lib/nendo/ruby/evaluator.rb

#_symbol_MIMARKinclude_QUMARK(sexp, sym) ⇒ Object



1498
1499
1500
1501
1502
1503
1504
1505
1506
1507
1508
1509
1510
1511
1512
1513
# File 'lib/nendo/ruby/evaluator.rb', line 1498

def _symbol_MIMARKinclude_QUMARK( sexp, sym )
  case sexp
  when Cell
    if _null_QUMARK( sexp )
      false
    else
      _symbol_MIMARKinclude_QUMARK( sexp.car, sym ) or _symbol_MIMARKinclude_QUMARK( sexp.cdr, sym )
    end
  else
    if _symbol_QUMARK( sexp )
      sym.intern == sexp.intern
    else
      false
    end
  end
end