如何在Scheme 中将符号应用为函数？

Question

有没有办法将 '+ 应用于 '( 1 2 3)？

编辑：我想说的是我得到的函数将是一个符号。 有没有办法应用它？

谢谢。

Answer 1

(apply (eval '+) '(1 2 3))

应该做。

Answer 2

在 R5RS 中，您需要

(apply (eval '+ (scheme-report-environment 5)) '(1 2 3))

Dr.Scheme 中的“相当大”语言允许：

(apply (eval '+) '(1 2 3))

Answer 3

“申请”怎么样？ 使用变量 + 而不是符号 + 。

(apply + '(1 2 3))

R5RS

Answer 4

;; This works the same as funcall in Common Lisp:
(define (funcall fun . args)
  (apply fun args))

(funcall + 1 2 3 4) => 10
(funcall (lambda (a b) (+ a b) 2 3) => 5
(funcall newline) => *prints newline*
(apply newline) => *ERROR*
(apply newline '()) => *prints newline*

顺便说一句，这个“语法突出显示”是怎么回事？

Answer 5

在 Racket 的方案中，它是

#lang scheme

(define ns (make-base-namespace))
(apply (eval '+ ns) '(1 2 3))

Answer 6

“申请”计划怎么样？

(apply + `(1 2 3)) => 6

我希望这就是您所问的:)