reactos/wine
1
0
Fork 0
mirror of https://github.com/reactos/wine.git synced 2024-11-26 13:10:28 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

cmd/tests: Add basic "for" tests.

Browse Source
This commit is contained in:
Frédéric Delanoy 2011-07-11 23:34:05 +02:00 committed by Alexandre Julliard
parent cde4993d62
commit 63a6a80d40
2 changed files with 39 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

23
programs/cmd/tests/test_builtins.cmd
View File

@ -78,6 +78,29 @@ if /i not foo==FOO echo if /i seems to be broken
if /I foo==FOO echo if /I seems to work
if /I not foo==FOO echo if /I seems to be broken
echo -----------Testing for -----------
for %%i in (A B C) do echo %%i
for %%i in (A B C) do call :forTestFun1 %%i
goto :endForTestFun1
:forTestFun1
echo %1
goto :eof
:endForTestFun1
for %%i in (X) do (
for %%j in (Y) do (
echo %%i %%j ))
for %%i in (A B) do (
for %%j in (C D) do (
echo %%i %%j ))
for %%i in (A B) do (
for %%j in (C D) do (
call :forTestFun2 %%i %%j ))
goto :endForTestFun2
:forTestFun2
echo %1 %2
goto :eof
:endForTestFun2
echo -----------Testing del /a-----------
del /f/q *.test > nul
echo r > r.test

16
programs/cmd/tests/test_builtins.cmd.exp
View File

@ -78,6 +78,22 @@ Testing case sensitivity with and without /i option
if seems to default to case sensitivity
if /i seems to work
if /I seems to work
-----------Testing for -----------
A
B
C
A
B
C
@todo_wine@X Y
@todo_wine@A C
@todo_wine@A D
@todo_wine@B C
@todo_wine@B D
@todo_wine@A C
@todo_wine@A D
@todo_wine@B C
@todo_wine@B D
-----------Testing del /a-----------
not-r.test not found after delete, good
r.test found before delete, good