Hi Haskell-cafe

My problem:  I'm trying to obtain the current position of the lexer once it reaches the end of the file (line and row number).
I'm trying to do this in a function:

getEndPosition = do
  (a,b,c) <- alexGetInput
  return a


Unfortunately, the type of a is 'Alex AlexPosn' instead of just 'AlexPosn'
How do I strip the Alex so I'm left with just a AlexPosn object?

Thanks,

Amit Deshwar
University of Calgary