diff options
| -rw-r--r-- | libraries/base/Data/OldList.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libraries/base/Data/OldList.hs b/libraries/base/Data/OldList.hs index 8e610ebba0..211978dadd 100644 --- a/libraries/base/Data/OldList.hs +++ b/libraries/base/Data/OldList.hs @@ -1511,7 +1511,7 @@ sortOn :: Ord b => (a -> b) -> [a] -> [a] sortOn f = map snd . sortBy (comparing fst) . map (\x -> let y = f x in y `seq` (y, x)) --- | Produce singleton list. +-- | Construct a list from a single element. -- -- >>> singleton True -- [True] |