Question

我提前为这个可能很愚蠢的问题道歉：）

假设我有一个像

这样的字符串列表

(define func-names '("add" "sub" "mul"))

还有像这样定义的函数

(define (add x y)
  (+ x y))

(define (sub x y)
  (- x y))

(define (mul x y)
  (* x y))

如您所见，列表中字符串的值对应于函数的名称。我需要一种方法来遍历列表并调用与字符串值对应的函数。像

这样的东西

(define (all-ops x y)                                        
  (map (lambda (name) (string->proc name x y)) func-names))

其中string->proc是我正在寻找的。像Ruby的send/public_send方法，如果你熟悉Ruby。

我最感兴趣的是适用于Racket的答案。

谢谢。

EDIT; 而且我忘了提到可能有一百万个函数名称，因此cond，match在这里使用会很繁琐。

Answer 1

考虑制作一个将字符串映射到函数值的哈希表。

那就是说，你可以这样做：

#lang racket
(define (add x y)
  (+ x y))

(define ns (variable-reference->namespace (#%variable-reference)))

(define (string->procedure s)
  (define sym (string->symbol s))
  (eval sym ns))

(string->procedure "add")

((string->procedure "add") 1 2)

另见http://blog.racket-lang.org/2011/10/on-eval-in-dynamic-languages-generally.html

Racket中的动态函数调用;或从字符串中获取过程

1 个答案: