Intravision/reactos
1
0
Fork 0
mirror of https://github.com/reactos/reactos.git synced 2024-12-28 01:55:19 +00:00
Code Issues Projects Releases Packages Wiki Activity

regression test for set /a - fails at the moment because 'if' is bork3d

Browse source 
svn path=/trunk/; revision=17921
This commit is contained in:
Royce Mitchell III 2005-09-18 18:59:59 +00:00
parent 0f792e01d4
commit 4837e8bf71
1 changed files with 67 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

67
reactos/subsys/system/cmd/seta_test.cmd Normal file
View file

@ -0,0 +1,67 @@
@echo off
if ("1"=="2") goto failure
if !("1"=="1") goto failure
set /a a=1
if !("%a%"=="1") goto failure
set /a b=a
if !("%b%"=="1") goto failure
set /a a=!5
if !("%a%"=="0") goto failure
set /a a=~5
if !("%a%"=="-6") goto failure
set /a a=5,a=-a
if !("%a%"=="-5") goto failure
set /a a=5*7
if !("%a%"=="35") goto failure
set /a a=2000/10
if !("%a%"=="200") goto failure
set /a a=42%9
if !("%a%"=="6") goto failure
set /a a=7+9
if !("%a%"=="16") goto failure
set /a a=9-7
if !("%a%"=="2") goto failure
set /a a=9^<^<2
if !("%a%"=="36") goto failure
set /a a=36^>^>2
if !("%a%"=="9") goto failure
set /a a=42^&9
if !("%a%"=="8") goto failure
set /a a=32^^9
if !("%a%"=="41") goto failure
set /a a=10^|22
if !("%a%"=="30") goto failure
set /a a=2,a*=3
if !("%a%"=="6") goto failure
set /a a=11,a/=2
if !("%a%"=="5") goto failure
set /a a=42,a%=9
if !("%a%"=="6") goto failure
set /a a=7,a+=9
if !("%a%"=="16") goto failure
set /a a=9,a-=7
if !("%a%"=="2") goto failure
set /a a=42,a^&=9
if !("%a%"=="8") goto failure
set /a a=32,a^^=9
if !("%a%"=="41") goto failure
set /a a=10,a^|=22
if !("%a%"=="30") goto failure
set /a a=9,a^<^<=2
if !("%a%"=="36") goto failure
set /a a=36,a^>^>=2
if !("%a%"=="9") goto failure
set /a a=(1,2)
if !("%a%"=="2") goto failure
set /a a=(a=1,a+2)
if ("%a%"=="3") goto success
goto failure
:success
echo SUCCESS!
goto done
:failure
echo FAILURE! (remove the echo off and see the last formula that executed before this line)
:done