pp25.c

来自「开放源码的编译器open watcom 1.6.0版的源代码」· C语言 代码 · 共 31 行

#include "fail.h"
#include <string.h>

#if __WATCOM_REVISION__ >= 7

char *p = __FUNCTION__;

struct S {
    char *foo() {
	return __FUNCTION__;
    }
};
char *foo() {
    return __FUNCTION__;
}

#define __FUNCTION__ "!"
char *q = __FUNCTION__;

int main() {
    S x;
    if( strstr( x.foo(), "S::foo" ) == NULL ) fail(__LINE__);
    if( strstr( foo(), "foo" ) == NULL ) fail(__LINE__);
    if( strcmp( p, "?" ) != 0 ) fail(__LINE__);
    if( strcmp( q, "!" ) != 0 ) fail(__LINE__);
    _PASS;
}
#else
ALWAYS_PASS
#endif