Add a testing suite for CMD based on CMD scripts.

[reactos.git] / rostests / win32 / cmd / script_testsuite / tests / at.cmd

diff --git a/rostests/win32/cmd/script_testsuite/tests/at.cmd b/rostests/win32/cmd/script_testsuite/tests/at.cmd
new file mode 100644 (file)
index 0000000..cf32abd
--- /dev/null
+++ b/rostests/win32/cmd/script_testsuite/tests/at.cmd
@@ -0,0 +1,20 @@
+::
+:: PROJECT:     ReactOS CMD Testing Suite
+:: LICENSE:     GPL v2 or any later version
+:: FILE:        tests/at.cmd
+:: PURPOSE:     Tests for the correct parsing of the "@" character
+:: COPYRIGHT:   Copyright 2008 Colin Finck <mail@colinfinck.de>
+::
+
+:: Calling a command should work with any number of "@" characters prepended
+call :_test "@echo Test >nul"
+call :_test "@@echo Test >nul"
+
+:: Files with an "@" sign at the beginning should work as well
+echo @^@echo Test > "temp\@file.cmd"
+call :_test "call temp\@file.cmd >nul"
+
+echo ^@echo Test > "temp\@file.cmd"
+call :_test "call temp\@file.cmd >nul"
+
+goto :EOF