申请 申请计划

发布于 2024-12-10 03:04:35 字数 434 浏览 0 评论 0原文

我在这里缺少什么?我在Scheme中玩apply,并写道:

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

据我理解,第一个apply应该做:

(apply + '(1 2 3))

第二个应该做:

(+ 1 2 3)

但是Ypsilon和Gauche都给出了相同的错误(这是Ypsilon的) ):

error: attempt call non-procedure: (+ 1 2 3)

backtrace:
  0  (apply apply '(+ (1 2 3)))
  ..."/dev/stdin" line 1

我有什么不明白的地方?

What am I missing here? I was playing with apply in Scheme, and wrote:

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

The way I understand it, the first apply should do:

(apply + '(1 2 3))

and the second should do:

(+ 1 2 3)

But both Ypsilon and Gauche give about the same error (this is Ypsilon's):

error: attempt call non-procedure: (+ 1 2 3)

backtrace:
  0  (apply apply '(+ (1 2 3)))
  ..."/dev/stdin" line 1

What have I failed to understand?

如果你对这篇内容有疑问,欢迎到本站社区发帖提问 参与讨论,获取更多帮助,或者扫码二维码加入 Web 技术交流群。

扫码二维码加入Web技术交流群

发布评论

需要 登录 才能够评论, 你可以免费 注册 一个本站的账号。

评论(1

铁憨憨 2024-12-17 03:04:35

'(+ (1 2 3)) 的问题在于 + 被引用,因此被解释为符号。

您必须使用 eval 来获取 + 符号的值。

换句话说,你试图做的事情是行不通的。

编辑:另一个选择是准引用。例如:

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

或者(不带准引号)

(apply apply (list + '(1 2 3))); => 6

The problem with '(+ (1 2 3)) is that the + is quoted and thus interpreted as a symbol.

You would have to use eval to get a value for the + symbol.

In other words, what you are trying to do, is not going to work.

Edit: Another option is quasiquote. Eg:

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

Or (without quasiquote)

(apply apply (list + '(1 2 3))); => 6
~没有更多了~
我们使用 Cookies 和其他技术来定制您的体验包括您的登录状态等。通过阅读我们的 隐私政策 了解更多相关信息。 单击 接受 或继续使用网站,即表示您同意使用 Cookies 和您的相关数据。
原文