steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

c.preprocessor: Use ML-style comments.

db4
Doug Coleman 2013-04-13 17:30:30 -07:00
parent 2f158d1691
commit febc689322
1 changed files with 6 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
extra/c/preprocessor/preprocessor-tests.factor
View File

@ -1,6 +1,7 @@
! Copyright (C) 2009 Doug Coleman. ! Copyright (C) 2009 Doug Coleman.
! See http://factorcode.org/license.txt for BSD license. ! See http://factorcode.org/license.txt for BSD license.
USING: tools.test c.preprocessor kernel accessors multiline ; USING: tools.test c.preprocessor kernel accessors multiline
nested-comments ;
IN: c.preprocessor.tests IN: c.preprocessor.tests
[ "vocab:c/tests/test1/test1.c" start-preprocess-file ] [ "vocab:c/tests/test1/test1.c" start-preprocess-file ]
@ -9,18 +10,18 @@ IN: c.preprocessor.tests
[ "yo\n\n\n\nyo4\n" ] [ "yo\n\n\n\nyo4\n" ]
[ "vocab:c/tests/test2/test2.c" start-preprocess-file nip ] unit-test [ "vocab:c/tests/test2/test2.c" start-preprocess-file nip ] unit-test
/* (*
[ "vocab:c/tests/test3/test3.c" start-preprocess-file ] [ "vocab:c/tests/test3/test3.c" start-preprocess-file ]
[ "\"BOO\"" = ] must-fail-with [ "\"BOO\"" = ] must-fail-with
*/ *)
[ V{ "\"omg\"" "\"lol\"" } ] [ V{ "\"omg\"" "\"lol\"" } ]
[ "vocab:c/tests/test4/test4.c" start-preprocess-file drop warnings>> ] unit-test [ "vocab:c/tests/test4/test4.c" start-preprocess-file drop warnings>> ] unit-test
/* (*
f(2 * (y+1)) + f(2 * (f(2 * (z[0])))) % f(2 * (0)) + t(1); f(2 * (y+1)) + f(2 * (f(2 * (z[0])))) % f(2 * (0)) + t(1);
f(2 * (2+(3,4)-0,1)) | f(2 * (~ 5)) & f(2 * (0,1))^m(0,1); f(2 * (2+(3,4)-0,1)) | f(2 * (~ 5)) & f(2 * (0,1))^m(0,1);
int i[] = { 1, 23, 4, 5, }; int i[] = { 1, 23, 4, 5, };
char c[2][6] = { "hello", "" }; char c[2][6] = { "hello", "" };
*/ *)