summaryrefslogtreecommitdiff
path: root/tests/examples/pre-ghc86/T10134a.hs
blob: 0d84d56b5e9e9ec45226b81679e2cb550d35ac4c (plain)
1
2
3
4
5
6
7
8
9
10
11
{-# LANGUAGE KindSignatures #-}
{-# LANGUAGE GADTs #-}
{-# LANGUAGE DataKinds #-}
{-# LANGUAGE TypeOperators #-}
module T10134a where

import GHC.TypeLits

data Vec :: Nat -> * -> * where
  Nil  :: Vec 0 a
  (:>) :: a -> Vec n a -> Vec (n + 1) a