From 8ea241a5a377aeac3b49381b69566f19403c051e Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Fredrik=20H=C3=BCbinette=20=28Hubbe=29?= <hubbe@hubbe.net> Date: Fri, 16 Jan 1998 17:06:48 -0800 Subject: [PATCH] more tests for cpp() added Rev: src/testsuite.in:1.66 --- src/testsuite.in | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/src/testsuite.in b/src/testsuite.in index 3f5e3c781c..f7e4e3bc6b 100644 --- a/src/testsuite.in +++ b/src/testsuite.in @@ -1,4 +1,4 @@ -test_true([["$Id: testsuite.in,v 1.65 1998/01/16 21:40:17 hubbe Exp $"]]) +test_true([["$Id: testsuite.in,v 1.66 1998/01/17 01:06:48 hubbe Exp $"]]) test_eq(1e1,10.0) test_eq(1E1,10.0) test_eq(1e+1,10.0) @@ -6,8 +6,9 @@ test_eq(1.1e1,11.0) test_eq(1e-1,0.1) test_eq('\x20',32) test_eq("\x20","\040") -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 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_any([[object o=class foo{int c;class bar{void create(){c++;};}}(); o->bar(); return o->c;]],1) test_do([[add_constant("GURKA2",class foo { int c; class bar{void create() {c+=17;}}}()); ]]) -- GitLab