我正在尝试创建一个函数，它应该给我一个城市列表：
((London United-Kingdom)
(Paris France)
(New-York USA)
(Sydney Australia))
我的代码不起作用，出了点问题，但我不知道为什么。这是我的代码：
(defun make-city (name country)
(list name country))
(defun cities
(list (make-city 'London 'United-Kingdom)
(make-city 'Paris 'France)
(make-city 'New-York 'USA)
(make-city 'Sydney 'Australia)))
有谁知道问题出在哪里？它必须在（defun cities ....），但在哪里？