Update Trac ticket URLs to point to GitLab
[ghc.git] / testsuite / tests / parser / should_fail / NoNumericUnderscores0.hs
1 {-# LANGUAGE NoNumericUnderscores #-}
2
3 -- Test for NumericUnderscores extension.
4 -- See #14473
5 -- This is a testcase for integer literal
6 -- in NO NumericUnderscores extension.
7
8 module NoNumericUnderscores0 where
9
10 f :: Int -> ()
11 f 1_000 = ()
12 f _ = ()