最奇怪的语言特征

在你看来，你遇到过的最令人惊讶、最怪异、最奇怪或最“WTF”的语言特性是什么?

请每个回答只回答一个特征。

当前回答

在Java中(这是一个导致赋值的if语句)

result = (Boolean condition) ? (if Boolean is true) : (if Boolean is false);

data Nat = Z|S Nat deriving Show
nattoInt Z = 0
nattoInt (S a) = 1 + nattoInt a

buildNat 0 = Z
buildNat a  =  S (buildNat (a - 1))

在Haskell…我仍然不太明白这是如何定义自然数的(我完全理解理论:-p)

其他回答

腮腺炎。WTF有很多特性，我选了一个if语句。(请注意，我在下面使用了一种相当冗长的编码风格，以适应那些不懂这门语言的人;真正的腮腺炎代码通常对外行来说更难以理解。)

if x>10 do myTag(x)    ; in MUMPS "tag" means procedure/function
else  do otherTag(x)

这类似于Java中的说法:

if (x > 10) {
  myMethod(x);
} else {
  otherMethod(x);
}

除了在MUMPS中，else语句在语法上不是if块的一部分，它是一个单独的语句，通过检查内置变量$TEST来工作。每次执行if语句时，它都会将$TEST设置为if语句的结果。else语句实际上意味着“如果$TEST为假，则执行该行剩余部分，否则跳转到下一行”。

这意味着如果x大于10，因此第一行叫做myTag，并且myTag包含if语句，那么else的行为不取决于它上面一行的if，而是取决于myTag内部的最后一个if !由于这个“特征”，MUMPS编码员通常被教导像这样编写以上代码以确保安全:

if x>10 do myTag(x) if 1
else  do otherTag(x)

第一行末尾的if 1确保在控制进行到下一行之前正确地设置了$TEST。(顺便说一下，这里的间距必须是这样的，在else后面有两个空格，在所有其他地方都有一个空格。间距是奇怪的，但至少一旦你理解了模式，它是非常正交的。)

Tcl中的连接是将两个字符串添加为一个字符串:

set s1 "prime"
set s2 "number"
set s3 $s1$s2
puts s3

输出为

primenumber

C的多个名称空间:

typedef int i;

void foo()
{
    struct i {i i;} i;
    i: i.i = 3;
    printf( "%i\n", i.i);
}

或与字符:

typedef char c;

void foo()
{
    struct c {c c;} c;
    c: c.c = 'c';
    printf( "%c\n", c.c);
}

Java的访问修饰符对我来说是最近的一个WTF(因为我必须学习一点)。

显然，包比类层次结构更亲密。我不能定义对子类可见但对包中的其他类不可见的方法和属性。为什么我要将一个类的内部共享给其他类呢?

但是我可以定义对包内的每个类可见的属性和方法，但对包外的子类不可见。

不管我怎么想，我还是看不出其中的逻辑。切换访问修饰符，使受保护的行为就像它在c++中工作一样，并保持包的私有修饰符，这是有意义的。但现在不是了。

下面这个我觉得很奇怪:

在C/ c++中，你可以有尽可能多的分号，至少在MS c++中:

int main(void)
{
 cout<<"Hello World";;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;;;;;
 return 0;;;;;;;;;;;;;;;;;;;;;;;
}

推荐文章