       """
       expect(lines).toEqual  [
           [
-            { value : '1', scopes : [ 'source.haskell', 'constant.numeric.haskell' ] }
+            { value : '1', scopes : [ 'source.haskell', 'constant.numeric.decimal.haskell' ] }
           ],
           [
             { value : '/', scopes : [ 'source.haskell', 'keyword.operator.haskell' ] }
             { value : ' ', scopes : [ 'source.haskell' ] }
-            { value : '2', scopes : [ 'source.haskell', 'constant.numeric.haskell' ] }
+            { value : '2', scopes : [ 'source.haskell', 'constant.numeric.decimal.haskell' ] }
           ]
         ]
 

      data = 'main = putStrLn "Hello World" :: IO ()'
      {tokens} = grammar.tokenizeLine(data)
      expect(tokens).toEqual [
        { value : 'main', scopes : [ 'source.haskell' ] }
        { value : ' ', scopes : [ 'source.haskell' ] }
        { value : '=', scopes : [ 'source.haskell', 'keyword.operator.haskell' ] }
        { value : ' ', scopes : [ 'source.haskell' ] }

      data = 'main = (putStrLn :: String -> IO ()) ("Hello World" :: String)'
      {tokens} = grammar.tokenizeLine(data)
      expect(tokens).toEqual [
        { value : 'main', scopes : [ 'source.haskell', 'identifier.haskell' ] }
        { value : ' ', scopes : [ 'source.haskell' ] }
        { value : '=', scopes : [ 'source.haskell', 'keyword.operator.haskell' ] }
        { value : ' ', scopes : [ 'source.haskell' ] }
