我如何做一个清单出来一个输入的读线的球拍

Question

想对被输入了标准输出的列表作为列表

(define USER_INPUT (list (read-line))) 

当我输入列表，我不断收到此错误，因为该列表，以输入它; S在地图

map: contract violation 
    expected: list? 
    given: "10 10 10 10 10 10 10 10 10" 

Answer 1

麻烦的过程中使用的是(read-line)产生一个字符串，所以你刚刚结束了一个字符串元素的列表。如果您特别想读取数字列表，请将字符串拆分为空格并将所有元素转换为数字。

(map string->number (string-split (read-line))) 

在另一方面，如果你真的想用球拍语法的全功率表来读取，你可以使用read。

> (read) 
(10 10 10) 
'(10 10 10) 

如果要指定列表内容但不希望包括括号，好了，你可以做到这一点。

(read (open-input-string (format "(~a)" (read-line))))