, GHC , toList Nil .
*List> :i toList
toList :: List a -> [a] -- Defined at List.hs:7:0-5
, a, , a - , " a". - , toList:
fromEmptyList = TestCase $ assertEqual "" [] (toList (Nil) :: [Int])
List_Test ( main , main), :
$ runghc List_Test.hs
Cases: 1 Tried: 1 Errors: 0 Failures: 0