pike.git
/
src
/
testsuite.in
version
»
Context lines:
10
20
40
80
file
none
3
pike.git/src/testsuite.in:1:
-
test_true([["$Id: testsuite.in,v 1.
679
2003/09/23
16:
23:
37
mast Exp $"]]);
+
test_true([["$Id: testsuite.in,v 1.
680
2003/09/23 23:
06:25
mast Exp $"]]);
// This triggered a bug only if run sufficiently early. test_compile_any([[#pike 7.2]]) test_compile_any([[#pike 7.4]]) test_compile_any([[#pike 7.0]]) test_compile_any([[#pike 0.6]]) cond([[all_constants()->_verify_internals]], [[ test_do(_verify_internals())
pike.git/src/testsuite.in:7208:
// testing preprocessor test_eq([[cpp("#define FOO(X,Y) (X) (Y)\nFOO( (A),(B) )")]],"# 1 \"-\"\n\n( (A) ) ( (B) )") test_eq([[cpp("#define F 'F'\nF")]],"# 1 \"-\"\n\n'F'") test_eq([[cpp("#define MAX(X,Y) ((X)>(Y)?(X):(Y))\n#define MAX3(X,Y,Z) MAX(MAX(X,Y),Z)\nMAX3(1,2,3)")]],"# 1 \"-\"\n\n\n(( (( 1 )>( 2 )?( 1 ):( 2 )) )>( 3 )?( (( 1 )>( 2 )?( 1 ):( 2 )) ):( 3 ))") test_eq([[cpp("foo\xfeff""bar \xfeff gazonk")]],[[cpp("foobar gazonk")]]) test_eq([[cpp("#define A(X) #X\n#define B(Y) A(Y)\nB(foo)")]], "# 1 \"-\"\n\n\n \"foo\" ") test_eq([[cpp("#define FOO(X) X\nFOO(\"\\\n\")\n")]], "# 1 \"-\"\n\n \"\" \n"); test_eq([[cpp("#define FOO(X) X\r\nFOO(\"\\\r\n\")\r\n")]], "# 1 \"-\"\n\n \"\" \n");
-
test_
do
([[
-
#define FOO(X)
X
-
string
s
=
FOO
(
#
"
a
-
b
-
c
");
-
]]);
-
test_
any
([[
-
#define FOO(X)
X
-
FOO
(
"
\
-
\
-
");
-
return
__LINE__;
-
]],
6
);
+
test_
equal
([[
compile_string("
#define FOO(X)
X\nstring
s=FOO(
\
"
\\\n\\\n\
");
\nmixed f() {return ({__LINE__, backtrace()[-1
]
[1
]
}
);
}\n")()->f()]], ({5, 5}));
+
test_
equal
([[
compile_string("
#define FOO(X)
X\nstring s=
FOO(
#
\"
\n\n\"
);
\nmixed
f() {return ({
__LINE__
, backtrace()[-1][1]})
;
}\n")()->f()
]],
({5, 5}
)
)
;
test_eq([[compile_string(#" #define Y(y) #y #define X(x) x(z) string a() {return X(Y);} ")()->a()]], "z") test_eq([[compile_string(#" #define Y() \"z\" #define X(x) x() string a() {return X(Y);}