在球拍中创建一个简单的变量

Question

如何使用我声明的列表重新创建下面的代码 作为变量？

> (map (lambda (i) (string-append i "!"))
       (list "peanuts" "popcorn" "crackerjack"))

'("peanuts!" "popcorn!" "crackerjack!")

由于

Answer 1

你的意思是这样吗？

(define (add-! l)
  (map (lambda (i)
       (string-append i "!")) l))

(define my-list (list "peanuts" "popcorn" "crackerjack"))

(check-expect (add-! my-list)
              '("peanuts!" "popcorn!" "crackerjack!"))

只是将代码包装在函数中并在变量上调用它？