fixed bug #2849872 - LogicLib Do..Loop warning

git-svn-id: https://svn.code.sf.net/p/nsis/code/NSIS/trunk@6005 212acab6-be3b-0410-9dea-997c60f758d6

Examples/LogicLib.nsi

@@ -440,6 +440,15 @@ Section /o "Run tests" TESTS
     DetailPrint "FAILED For[Each]..Next test"
   ${EndIf}
 
+  ; do..loop
+  StrCpy $R1 0
+  Call DoLoop
+  ${If} $R1 == 5
+    DetailPrint "PASSED Do..Loop test"
+  ${Else}
+    DetailPrint "FAILED Do..Loop test"
+  ${EndIf}
+
   ; do..exitdo..loop
   StrCpy $R1 0
   StrCpy $R2 ""
@@ -596,4 +605,15 @@ Function ComponentsLeave
   ${EndIf}
 FunctionEnd
 
+Function DoLoop
+
+  ${Do}
+    IntOp $R1 $R1 + 1
+    ${If} $R1 == 5
+      Return
+    ${EndIf}
+  ${Loop}
+
+FunctionEnd
+
 !verbose 3