Update Trac ticket URLs to point to GitLab
[ghc.git] / testsuite / tests / parser / should_fail / NumericUnderscoresFail0.hs
1 {-# LANGUAGE NumericUnderscores #-}
2
3 -- Test for NumericUnderscores extension.
4 -- See #14473
5 -- This is a testcase for invalid case of NumericUnderscores.
6
7 main :: IO ()
8 main = do
9 print [
10 -- integer
11 1000000_,
12 _1000000
13 ]