1
xmonad.hs:92:31: error: [GHC-18872]
2
    • Couldn't match type ‘XState’
3
                     with ‘W.StackSet i0 l0 a3 ScreenId sd0’
4
        arising from a functional dependency between:
5
          constraint ‘MonadState (W.StackSet i0 l0 a3 ScreenId sd0) X’
6
            arising from a use of ‘gets’
7
          instance ‘MonadState XState X’ at <no location info>
8
    • In the first argument of ‘(>>=)’, namely
9
        ‘gets (W.screen . W.current)’
10
      In the expression:
11
        gets (W.screen . W.current)
12
          >>=
13
            \ (S currentScreen)
14
              -> toggleWS'
15
                   [marshall s vw |
16
                      vw <- (map show [1 .. 9]),
17
                      s <- [x | x <- [0 .. nScreens], x /= currentScreen]]
18
      In the expression:
19
        ("M-<Tab>",
20
         gets (W.screen . W.current)
21
           >>=
22
             \ (S currentScreen)
23
               -> toggleWS'
24
                    [marshall s vw |
25
                       vw <- (map show [1 .. 9]),
26
                       s <- [x | x <- ..., x /= currentScreen]])
27
   |
28
92 |                             , gets (W.screen . W.current)
29
   |                               ^^^^
30
 
31
xmonad.hs:97:80: error: [GHC-83865]
32
    • Couldn't match expected type ‘ScreenId’ with actual type ‘Int’
33
    • In the second argument of ‘(/=)’, namely ‘currentScreen’
34
      In the expression: x /= currentScreen
35
      In a stmt of a list comprehension: x /= currentScreen
36
   |
37
97 |                                         , s <- [x | x <- [0 .. nScreens], x /= currentScreen]
38
   |