@@ -926,7 +926,7 @@ pConstant = do reserved "Integer";return BIType
926926 <|> do reserved "String"; return StrType
927927 <|> do reserved "Ptr"; return PtrType
928928 <|> try (do f <- float; return $ Fl f)
929− <|> try (do i <- natural; lchar 'L'; return $ BI i)
929+-- <|> try (do i <- natural; lchar 'L'; return $ BI i)
930930 <|> try (do i <- natural; return $ I (fromInteger i))
931931 <|> try (do s <- strlit; return $ Str s)
932932 <|> try (do c <- chlit; return $ Ch c)