File: List.hs

package info (click to toggle)
haskell-unixutils 1.22-3
  • links: PTS, VCS
  • area: main
  • in suites: squeeze
  • size: 132 kB
  • sloc: haskell: 973; makefile: 2
file content (15 lines) | stat: -rw-r--r-- 284 bytes parent folder | download 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
-- | A function taken From missingh, which will not build under
-- sid at the moment.

module System.Unix.List
    (join,
     consperse)
    where

import Data.List

join :: [a] -> [[a]] -> [a]
join x l = concat . intersperse x $ l

consperse :: [a] -> [[a]] -> [a]
consperse = join