Modula-2没有elseif或elseif;它有elsif

这里有一大堆奇怪的C特性:http://www.steike.com/code/useless/evil-c/

大约20年前，当我最后一次涉足腮腺炎时，实现有一些奇怪的局限性。当主机MUMPS变得越来越流行时，MUMPS传统上是一种自托管语言:计算机语言、操作系统和数据库在一个包中。

腮腺炎主要是关于它的数据库。本质上，这是一个巨大的多维哈希表，由B*树支持，可以快速访问。语言和数据库之间也没有任何障碍:如果您想在那里存储一些东西，只需在变量前面加上一个符号，表明它将被持久化到备份存储中。

另一方面，文件系统几乎不存在，对它的支持就更少了。我们唯一能做的就是把一个程序从文件中加载到内存中，然后把内存中的内容发送回文件。最好在加载前清空缓冲区，否则它会和之前的东西混在一起。

因此，考虑到它的自托管性质和极其恶劣的文件系统，人们可能会想知道这些程序是如何编辑的。事实上，编辑器是用MUMPS本身编写的——那么，编辑器如何在不重写自己的情况下将程序存储在内存中呢?

好吧，诀窍在于能够以源代码的形式执行变量的内容。然后，编辑器将自己加载到变量中，在变量中执行自己，清除内存，然后在内存中加载、保存和编辑文件，一直从变量中执行。

除此之外，所有命令都可以被缩短为它们的第一个字母(除了Z命令，缩短为两个字母，主要处理文件系统)，还有一个奇怪的事实，比如IF (I)设置了一个变量，然后由ELSE (E)查询——当然，可以被任何介入的I或程序本身覆盖。转念一想，我觉得整个语言就是个垃圾。然而，它有一种奇怪的吸引力。

在类C语言(包括C本身)中，你可以使用“向下到”操作符:

for (x = 20; x --> 0;) {
    print x;
}

这将打印从19到0的数字。

Java;使所有对象实例都是互斥对象。

到目前为止，我遇到过的最奇怪的功能是BASIC方言中的“RETURN n”语句(不记得是哪一种了，这是大约28年前的事了)。“n”是可选的，默认为1。它可以是一个正数或负数，指示下一个执行的是与调用GOSUB相关的哪一行。

例如，下面将输出“30”:

10 GOSUB 200
20 PRINT "20"
30 PRINT "30"
100 END
200 RETURN +2

当我必须把一个用这种奇怪的BASIC语言编写的程序翻译成FORTRAN时，我遇到了这个问题。BASIC程序相当多地使用了这个特性，根据不同的条件返回不同的语句，我花了一段时间来理解逻辑流。一旦我理解了它，我就可以编写一个更简单的程序版本。不用说，更简单的FORTRAN版本比原来的BASIC程序bug更少。