summaryrefslogtreecommitdiff
path: root/testsuite/tests/ghci/prog003/D.hs
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/tests/ghci/prog003/D.hs')
-rw-r--r--testsuite/tests/ghci/prog003/D.hs13
1 files changed, 13 insertions, 0 deletions
diff --git a/testsuite/tests/ghci/prog003/D.hs b/testsuite/tests/ghci/prog003/D.hs
new file mode 100644
index 0000000000..a53a8c3da6
--- /dev/null
+++ b/testsuite/tests/ghci/prog003/D.hs
@@ -0,0 +1,13 @@
+module D where
+
+-- data types and an instance
+data D a = A Int | B Float deriving Eq
+newtype N a = N Double
+type T a = (Int,Double)
+
+-- a class
+class C a where c :: a -> Int
+
+-- a function
+d :: Float -> Float
+d x = x / 3