小编man*_*ark的帖子

为了保持线性历史记录,我使用以下方法合并更改,而不是依赖于github的合并功能:

git checkout -b feature_x user/feature_x
git rebase master                           
git checkout master
git merge --no-ff feature_x
git push origin master                       # On Github: PR gets merged and closed
git branch -D feature_x

以上工作完全正常,但在我必须手动解决冲突的情况下,PR不会自动显示为合并在Github上,我必须手动关闭PR.

是否有更好的方法来合并自动显示Github PRs合并和关闭的拉取请求？

我试图解析一个非常简单的语言,只包含十进制或二进制数字.例如,以下是一些有效的输入:

#b1
#d1
#b0101
#d1234

我使用Parsec的选择运算符时遇到问题:<|>.根据教程:在48小时内为自己写一个方案:

[选择运算符]尝试第一个解析器,如果失败,则尝试第二个.如果成功,则返回该解析器返回的值.

但根据我的经验,我发现解析器的顺序很重要.这是我的计划:

import System.Environment
import Text.ParserCombinators.Parsec

main :: IO ()
main = do
  (x:_) <- getArgs 
  putStrLn ( "Hello, " ++ readExp x)

bin :: Parser String
bin = do string "#b"
         x <- many( oneOf "01")
         return x

dec :: Parser String
dec = do string "#d"
         x <- many( oneOf "0123456789")
         return x

-- Why does order matter here?
parseExp = (bin <|> dec) 

readExp :: String -> …

我正在检查一个名为mysql-simple的mysql的haskell客户端库,由Bryan O'Sullivan提供.该库不允许用户使用连接字符串作为查询.

以下工作正常:

myQuery :: Query
myQuery = "SELECT id, name FROM users LIMIT 1"

但是,这失败了:

myQuery :: Query
myQuery = "SELECT id, name FROM users LIMIT 1" ++ ""

这是运行以下示例时出现的错误:

do
  rows <- (query_ connection myQuery) :: IO [( Int , String)]
...


• Couldn't match expected type ‘Query’ with actual type ‘[Char]’
• In the expression: "SELECT id, name FROM users LIMIT 1" ++ ""
  In an equation for ‘myQuery’:
      myQuery = "SELECT id, name FROM …