Применение символа в качестве процедуры

Question

Предположим, у меня есть простой символ:

> '+ 
+ 

Есть ли способ, я могу применить этот символ в качестве процедуры:

> ((do-something-with '+) 1 2) 
3 

Так что '+ оценивается в процедура +?

Answer 1

Я не уверен на 100%, но будет:

((eval '+) 1 2) 

работа? Я не уверен, нужно ли указывать среду, или даже если это работает - я схема noob. :)

Answer 2

Новичок тоже так надеюсь, я понял ваш вопрос правильно ...

Функция объекты первого класса в схеме, так что вам не нужно Eval:

1 ]=> (define plus +) 

;Value: plus 

1 ]=> (plus 2 3) 

;Value: 5 

HTH

Обновление: проигнорировать это и увидеть комментарии!

Answer 3

Ответы Лукаса велики. Для ненадежного ввода вы можете сделать белый список разрешенных символов/операторов.

(define do-something (lambda (op) 
         (cond 
         ((equal? op `+) +) 
         ((equal? op `-) -) 
         ((equal? op `*) *) 
         ((equal? op `/) /) 
         ((equal? op `^) ^)))) 

((do-something `+) 1 2)