hermit-0.6.0.0: examples/concatVanishes/Rev.hs

{-# LANGUAGE CPP #-}
module Main where

import HList

rev :: [a] -> [a]
rev []     = []
rev (y:ys) = rev ys ++ [y]

main :: IO ()
main = print $ rev [1..10]