jac*_*own 1 scheme concatenation append racket
我在Scheme中连接和空格有问题.命令的结果:
(append '(%procedure:) (list '+) '(%))** //with spaces
Run Code Online (Sandbox Code Playgroud)
是:
%procedure: + % //without spaces
Run Code Online (Sandbox Code Playgroud)
如何在列表之间没有空格的情况下生成相同的结果,结果将是:
%procedure:+%
Run Code Online (Sandbox Code Playgroud)
您正在尝试使用符号,这与Scheme中的字符串不同.如果要控制打印输出,则应使用字符串,这些字符串是字符数组.
> (append '(hello) '(world))
(hello world)
> (string-append "hello " "world")
"hello world"
> (symbol->string 'hello)
"hello"
> (apply string-append (map symbol->string '(a b c d e f g)))
"abcdefg"
Run Code Online (Sandbox Code Playgroud)