让我们为所有试图废除保留词的语言(如PL/I)投票。

还有什么地方可以合法地写出这样有趣的表达:

IF IF THEN THEN = ELSE ELSE ELSE = THEN

(IF, THEN, ELSE是变量名)

or

IF IF THEN THEN ELSE ELSE

(IF为变量，THEN和ELSE为子程序)

NSIS (Nullsoft Scriptable安装系统)有StrCmp指令:

StrCmp str1 str2 jump_if_equal [jump_if_not_equal] 比较str1和str2(不区分大小写)。如果str1和str2相等，则Gotos jump_if_equal，否则Gotos jump_if_not_equal。 StrCmp $0“一个字符串”0 +3 DetailPrint '$$0 == "a string"' 转到+ 2 DetailPrint '$$0 != "a string"'

锦上添花:jump_if_equal和jump_if_not_equal也可以是负数。但我猜你们已经从正数前面的+符号中算出来了。我不记得这是强制性的，还是只是一个可怕的惯例。

这基本上结合了最差的BASIC和最差的Assembler。

在Haskell:

let 2 + 2 = 5 in 2 + 2

收益率5。

从技术上讲，WTF不是一种语言，而是一种架构。

http://www.6502.org/tutorials/6502opcodes.html#JMP

6502总成，间接JMP:

注意，间接跳转没有进位，因此: 间接跳转绝对不能使用 从最后一个字节开始的向量 一页的 例如，如果地址$3000包含$40，$30FF包含$80，$3100包含$50,JMP ($30FF)的结果将是控制权转移到$4080，而不是你想要的$5080，即6502从$30FF获取地址的低字节，从$3000获取高字节。

因此，在代码中添加一个字节可能会使间接跳转偏离目标。

Perl

my %h1 = map { $_ => 1 } qw/foo bar baz/;    // construct an 'is_member' type lookup table
my %h2 = map { "$_" => 1 } qw/foo bar baz/;

第二行是一个语法错误，即使对一个有经验的perl程序员来说，它看起来是一样的。perl的缺点是总是试图做你想做的，而不是你说的。

Ruby

时间。Parse经常假装解析没有失败，而是返回现在

require 'time'

Time.parse '2000-01-01 12:00:00'
# -> 2000-01-01 12:00:00 +0100

Time.parse '2000-99-01 00:00:00'
# -> ArgumentError: argument out of range ...

Time.parse 'now'
# -> 2010-08-13 21:26:13 +0200

Time.parse 'yesterday'
# -> 2010-08-13 21:26:18 +0200

Time.parse 'billion years ago'
# -> 2010-08-13 21:26:37 +0200