 --
 -- > tokenGetAntlrString token
 --
--- | For identifier tokens, the token string is interesting.  For
--- | other tokens such as operator tokens, the token string is
--- | uninteresting, and may not be present, the token identifier enum 
--- | should be used instead.
+--   For identifier tokens, the token string is interesting.  For
+--   other tokens such as operator tokens, the token string is
+--   uninteresting, and may not be present, the token identifier enum 
+--   should be used instead.
 {#fun tokenGetAntlrString
  { toCommonToken `Ptr (CommonToken)' } -> `Ptr (AntlrString)' fromAntlrString#}
 

tokenGetType token = {#get ANTLR3_COMMON_TOKEN->type#} token >>= return . cToEnum

-- | Obtain the character position in the source code line of where the token
-- | was read, for non-imaginary tokens.
--
-- > foreign export ccall saTrue :: Ptr CommonToken -> IO (StablePtr TermInfo)
-- > saTrue token =

#endc

-- | Lookahead in the input stream at the token at the specified
--   positive offset, where:
--
-- > LT input 1 
--
--   is the current token.  Or a negative offset may be specified, where: 
--
-- > LT input (-1) 
--
--   is the previous token.
--
-- > foreign export ccall isUnsignedInt :: Ptr InputStream -> IO Bool
-- > isUnsignedInt input =
