From 63a6a80d40a107f734b8a0c8617ba1302643cb7a Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Fr=C3=A9d=C3=A9ric=20Delanoy?= Date: Mon, 11 Jul 2011 23:34:05 +0200 Subject: [PATCH] cmd/tests: Add basic "for" tests. --- programs/cmd/tests/test_builtins.cmd | 23 +++++++++++++++++++++++ programs/cmd/tests/test_builtins.cmd.exp | 16 ++++++++++++++++ 2 files changed, 39 insertions(+) diff --git a/programs/cmd/tests/test_builtins.cmd b/programs/cmd/tests/test_builtins.cmd index 11f6f10ac52..3af488efd92 100644 --- a/programs/cmd/tests/test_builtins.cmd +++ b/programs/cmd/tests/test_builtins.cmd @@ -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 diff --git a/programs/cmd/tests/test_builtins.cmd.exp b/programs/cmd/tests/test_builtins.cmd.exp index efc17953153..2f3e2853ef2 100644 --- a/programs/cmd/tests/test_builtins.cmd.exp +++ b/programs/cmd/tests/test_builtins.cmd.exp @@ -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