ввод с клавиатуры freeGLUT

Я использую ИЗБЫТОК (freeglut3) (через привязку ИЗБЫТКА Haskell).

import Graphics.UI.GLUT

handleKBMouse :: KeyboardMouseCallback
handleKBMouse key keyState mods mousePos = do
    print (key, keyState, mods, mousePos)

main :: IO ()
main = do
    getArgsAndInitialize
    createWindow "testTitle"
    keyboardMouseCallback $= Just handleKBMouse
    mainLoop

Кажется что различные важные ключи (например: Shift+Tab), не называют мой обратный вызов. Кроме того, "модификации" не описывает ключевое для победы, только Ctrl, Сдвиг и Высокий звук.

Наличие такого ограниченного доступа к вводу с клавиатуры является серьезным препятствием для реальной разработки приложений. Я делаю что-то не так здесь или просто freeglut просто нанесен вред? ИЗБЫТКУ наносят вред в целом?