使用 BibTeX 时，我的每篇文章类型引用都会导致“无法弹出空的文字堆栈”错误

Question

该.bst文件存在几个问题。

我认为我可以隔离导致您在问题中询问的特定错误的问题，但是我看到的代码并不能使我相信这是该.bst文件的唯一问题。

由于该.bst语言是基于堆栈的并且使用逆波兰表示法，因此事情可能会变得难以理解。

您已经确定了有问题的代码部分：函数format.journals和format.year.vol.num.pages。

format.journals定义为

FUNCTION {format.journals}
{ journal empty$
    { "" }
    { journal emphasize "," * "journal" output.check }
  if$
}

假设您journal的条目中有一个@article，这会使堆栈保持为空，因为output.check会写出堆栈上的第一个项目然后将其删除。

不幸的是，如果日志为空，函数会将一个空字符串推送到堆栈。因此，在这种情况下，行为会大不相同。

事实上，如果您从示例条目中删除journal，BibTeX 编译时不会出现错误消息，但输出完全是垃圾。

如果您查看 BibTeX 生成的输出（尽管存在错误），journal您会发现它包含两个逗号，其中一个是此函数添加的，因此我们可以在此处删除逗号。这使我们能够将函数简化为以下内容

FUNCTION {format.journals}
{ journal emphasize "journal" output.check }

顺便说一下，它确实apalike.bst做了这件事（只是没有为其定义函数）。

format.year.vol.num.pages定义为

FUNCTION {format.year.vol.num.pages}
{ 
  volume empty$
    { "empty volume in " cite$ * warning$ }
    { write$
      ", {\bf " volume * "}" * extra.label *
      mid.sentence 'output.state :=
    }
  if$
   number empty$
    'skip$
    { "(" number * ")" * *
      volume empty$
        { "there's a number but no volume in " cite$ * warning$ }
        'skip$
      if$
    }
  if$
  pages empty$
    'skip$
    { duplicate$ empty$
        { pop$ format.pages }
        { ", " * pages n.dashify * }
      if$
    }
  if$
  year empty$
    { "empty year in " cite$ * warning$ }
    { write$
      " (" year * ")" * extra.label *
      mid.sentence 'output.state :=
    }
  if$
}

再次，根据所采取的条件路径，函数可以使堆栈处于不同的状态。

如果没有volume，函数只会发出警告，否则保留堆栈不变。

如果有volume，函数首先从堆栈中弹出一个项目并将其写入，然后将更多内容添加到堆栈中。由于format.journals堆栈为空，这将导致错误。

也做了类似的事情year。

函数的设置方式意味着所有条件都应该将其内容推送到堆栈并将其连接起来，以便最后堆栈上有一个可以写出的长字符串。

此外，函数似乎extra.label在随机位置提及，并且output.state似乎毫无理由地设置。修复此问题和另一个逗号后，我们可以

FUNCTION {format.year.vol.num.pages}
{ 
  volume empty$
    { 
      "empty volume in " cite$ * warning$
      ""
    }
    { 
      "{\bf " volume * "}" *
    }
  if$
  number empty$
    'skip$
    { "(" number * ")" * *
      volume empty$
        { "there's a number but no volume in " cite$ * warning$ }
        'skip$
      if$
    }
  if$
  pages empty$
    'skip$
    { duplicate$ empty$
        { pop$ format.pages }
        { ", " * pages n.dashify * }
      if$
    }
  if$
  year empty$
    { "empty year in " cite$ * warning$ }
    { 
      " (" year * extra.label * ")" * *
    }
  if$
}

按照这里所示修复这两个函数可使示例再次顺利编译。但可能会有更多错误。

需要注意的是，该.bst文件很大程度上基于apalike.bst（所有提及的apalike都替换为gmjlike），这是一种作者-年份样式。当前形式的样式不提供作者-年份数据，因此只能用作数字样式。但数字样式应该计算最长的标签以在参考书目中正确缩进，而这apalike并非必须的。这意味着这种样式会产生未对齐的参考书目。

我强烈建议您停止使用这种风格，或者立即联系该风格的开发商或经销商，告知他们这些问题。

Answer 1