summaryrefslogtreecommitdiff
path: root/testsuite/tests/ghc-regress/numeric/should_run/expfloat.hs
blob: fffa83d8f17b70bb672cf79179cc50b6dec4c7f1 (plain)
1
2
3
4
5
6
7
{-# LANGUAGE MagicHash #-}
-- tests that expFloat# works (had linking problems on Windows)

import GHC.Exts

main = do
  print (F# (expFloat# 3.45#))