intProperty :: String -> GenParser Char st PropertyToken
intProperty name = do
    assignment
    val <- integerConstant
    lineEnd
    return $ IntProperty name val
intProperty :: String -> GenParser Char st PropertyToken
intProperty name = do
    assignment
    val <- integerConstant
    lineEnd
    return $ IntProperty name val
intProperty name = do
    assignment
    val <- integerConstant
    lineEnd
    return $ IntProperty name val