Как использовать конкатенацию в схеме без пробелов

Question

У меня проблема с конкатенацией и пробелами в Схеме. Результат команды:

(append '(%procedure:) (list '+) '(%))**  //with spaces 

является:

%procedure: + %  //without spaces 

Как я могу сделать тот же результат без пробелов между списками, так что результат будет:

%procedure:+% 

Answer 1

append возвращает список, а оценщик печатает результат подобно (abc), где вставляются пробелы, чтобы сделать представление понятным. Если вам нужно %procedure:+%, вы можете создать новый символ или использовать строки вместо символов.

Answer 2

Вы пытаетесь использовать символы, которые не являются строками в Схеме. Если вы хотите контролировать свой печатный результат, вы должны использовать строки, которые являются массивами символов.

> (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"