Commit 195ee2f3 authored by Frédéric Delanoy's avatar Frédéric Delanoy Committed by Alexandre Julliard

cmd/tests: Add tests for combined CALLs/GOTOs.

parent a33bad1e
...@@ -1353,6 +1353,53 @@ if d==d goto dest4 ...@@ -1353,6 +1353,53 @@ if d==d goto dest4
:dest4@space@ :dest4@space@
echo goto with a following space worked echo goto with a following space worked
echo ---------- Testing combined CALLs/GOTOs -----------
echo @echo off>foo.cmd
echo goto :eof>>foot.cmd
echo :eof>>foot.cmd
echo echo world>>foo.cmd
echo @echo off>foot.cmd
echo echo cheball>>foot.cmd
echo.>>foot.cmd
echo call :bar>>foot.cmd
echo if "%%1"=="deleteMe" (del foot.cmd)>>foot.cmd
echo goto :eof>>foot.cmd
echo.>>foot.cmd
echo :bar>>foot.cmd
echo echo barbare>>foot.cmd
echo goto :eof>>foot.cmd
call foo.cmd
call foot
call :bar
del foo.cmd
rem Script execution stops after the following line
foot deleteMe
call :foo
call :foot
goto :endFuns
:foot
echo foot
:foo
echo foo
goto :eof
:endFuns
:bar
echo bar
call :foo
:baz
echo baz
goto :eof
echo Final message is not output since earlier 'foot' processing stops script execution
echo Do NOT add any tests below this line
echo -----------Done, jumping to EOF----------- echo -----------Done, jumping to EOF-----------
goto :eof goto :eof
rem Subroutine to set errorlevel and return rem Subroutine to set errorlevel and return
......
...@@ -757,4 +757,12 @@ goto with no leading space worked ...@@ -757,4 +757,12 @@ goto with no leading space worked
goto with a leading space worked goto with a leading space worked
goto with a leading tab worked goto with a leading tab worked
goto with a following space worked goto with a following space worked
-----------Done, jumping to EOF----------- ---------- Testing combined CALLs/GOTOs -----------
world
cheball
barbare
bar
foo
baz
cheball
barbare
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment