Changeset 87406 in vbox for trunk/tools/envSub.vbs

Timestamp:

Jan 24, 2021 4:52:50 PM (4 years ago)

Author:

vboxsync

Message:

tools/envSub.vbs: Fixed code looking for windbg.exe.

File:

• trunk/tools/envSub.vbs (modified) (2 diffs)

trunk/tools/envSub.vbs

@@ -42 +42 @@
 
 
-'' Proforma. Does nothing here.
 sub LogPrint(str)
    if g_cntVerbose > 1 then
+      WScript.StdErr.WriteLine "debug: " & str
+   end if
+end sub
+
+sub DbgPrint(str)
+   if g_cntVerbose > 2 then
       WScript.StdErr.WriteLine "debug: " & str
    end if
@@ -255 +260 @@
       bldExitLoop = false
       for each str1 in arrArchitectures
-         for each strDir in GetSubdirsStartingWithRVerSorted(strPathDevTools & "\win." & str1 & "\sdk", "v")
-            if FileExists(strWinDbgDir & "\Debuggers\" & XlateArchitectureToWin(strHostArch) & "\windbg.exe") then
-               EnvPrependPathItem "Path", DosSlashes(strWinDbgDir & "\Debuggers\" & XlateArchitectureToWin(strHostArch)), ";"
+         strDir = strPathDevTools & "\win." & str1 & "\sdk"
+         for each strSubDir in GetSubdirsStartingWithRVerSorted(strDir, "v")
+            if FileExists(strDir & "\" & strSubDir & "\Debuggers\" & XlateArchitectureToWin(strHostArch) & "\windbg.exe") then
+               EnvPrependPathItem "Path", DosSlashes(strDir & "\" & strSubDir & "\Debuggers\" & XlateArchitectureToWin(strHostArch)), ";"
                bldExitLoop = true
                exit for