为什么不评估？

Question

我有以下代码段：

*Main Lib> let myList = [1, 2, id 1] :: [Integer]
*Main Lib> let myList' = myList ++ undefined
*Main Lib> :sprint myList'
myList' = _

为什么myList没有得到评估？

这也是：

*Main Lib> x = 45
*Main Lib> :sprint x
x = _