File: V.hs

package info (click to toggle)
haskell-linear 1.22-2
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 384 kB
  • sloc: haskell: 5,225; makefile: 4
file content (13 lines) | stat: -rw-r--r-- 289 bytes parent folder | download 
1
2
3
4
5
6
7
8
9
10
11
12
13
 
{-# LANGUAGE DataKinds #-}
module V (tests) where

import Control.DeepSeq (rnf)
import qualified Data.Vector.Unboxed as U (fromList)
import Linear.V (V)
import Test.HUnit

v10 :: V 10 Int
v10 = return 5

tests :: Test
tests = test [ "GH124" ~: rnf (U.fromList [v10]) ~?= () ]