Emacs使用objective-c块语法缩进

Question

我正在使用objc-mode，并且通常缩进效果很好，但我对以下代码有困难。

dispatch_async(dispatch_get_main_queue(), ^{
    [self someMethod];
});

Emacs试图像这样缩进：

dispatch_async(dispatch_get_main_queue(), ^{
        [self someMethod];
    });

基本上，只要函数/方法调用中存在块，它就会缩进太多。块的第1行的句法分析是（arglist-cont-nonempty，statement-block-intro）。 statement-block-intro设置为'+。 arglist-cont-nonempty设置为'(c-lineup-gcc-asm-reg c-lineup-arglist)。换句话说，只是默认值。

我应该怎样做才能让它缩进？