summaryrefslogtreecommitdiff
path: root/ghc/lib/prelude/TyRatio.hs
diff options
context:
space:
mode:
Diffstat (limited to 'ghc/lib/prelude/TyRatio.hs')
-rw-r--r--ghc/lib/prelude/TyRatio.hs10
1 files changed, 10 insertions, 0 deletions
diff --git a/ghc/lib/prelude/TyRatio.hs b/ghc/lib/prelude/TyRatio.hs
new file mode 100644
index 0000000000..bb551aada4
--- /dev/null
+++ b/ghc/lib/prelude/TyRatio.hs
@@ -0,0 +1,10 @@
+module PreludeRatio where
+
+-- *** context missing ***
+-- (NB: compiler's builtin idea of "data Ratio ..." must also
+-- omit the context!)
+data Ratio a = a :% a
+ deriving () -- NB ***
+
+-- ToDo: Ratio Int# ???
+-- {-# SPECIALIZE data a{Int#} :: Ratio a #-}