Index: sdk/bin/dart2js.bat |
diff --git a/sdk/bin/dart2js.bat b/sdk/bin/dart2js.bat |
index 3992aa0f28353269a53fba2cc75560b7e599454a..035377d532dd2055cdc6bd414d25069c2af24539 100644 |
--- a/sdk/bin/dart2js.bat |
+++ b/sdk/bin/dart2js.bat |
@@ -3,13 +3,54 @@ REM Copyright (c) 2012, the Dart project authors. Please see the AUTHORS file |
REM for details. All rights reserved. Use of this source code is governed by a |
REM BSD-style license that can be found in the LICENSE file. |
-set SCRIPTPATH=%~dp0 |
+setlocal |
+setlocal enableextensions enabledelayedexpansion |
ahe
2013/01/04 09:35:17
I don't understand why you need "enabledelayedexpa
aam-me
2013/01/04 13:44:59
You are right! I don't need delayed expansion.
en
|
-REM Does the path have a trailing slash? If so, remove it. |
-if %SCRIPTPATH:~-1%== set SCRIPTPATH=%SCRIPTPATH:~0,-1% |
+rem Handle the case where dart-sdk/bin has been symlinked to. |
+set DIR_NAME_WITH_SLASH=%~dp0 |
+set DIR_NAME=%DIR_NAME_WITH_SLASH:~0,-1%% |
+call :follow_links "%DIR_NAME%", RETURNED_BIN_DIR |
-set arguments=%* |
-set SNAPSHOTNAME="%SCRIPTPATH%dart2js.snapshot" |
-if exist %SNAPSHOTNAME% set SNAPSHOT=--use_script_snapshot=%SNAPSHOTNAME% |
+rem Get rid of surrounding quotes. |
+for %%i in ("%RETURNED_BIN_DIR%") do set BIN_DIR=%%~fi |
-"%SCRIPTPATH%dart" --no_use_inlining --heap_growth_rate=512 %SNAPSHOT% "%SCRIPTPATH%..\lib\_internal\compiler\implementation\dart2js.dart" %arguments% |
+rem Get absolute full name for SDK_DIR. |
+for %%i in ("%BIN_DIR%\..\") do set SDK_DIR=%%~fi |
+ |
+set DART2JS=%SDK_DIR%lib\_internal\compiler\implementation\dart2js.dart |
+set DART=%BIN_DIR%\dart |
+set SNAPSHOT=%DART2JS%.snapshot |
+ |
+set EXTRA_OPTIONS= |
+ |
+rem Let dart2js_developer.bat specify this one '--checked' vm option. |
+if not _%EXTRA_VM_OPTIONS%_ == _--checked_ set EXTRA_VM_OPTIONS= |
+ |
+if exist "%SNAPSHOT%" ( |
+ echo Using snapshot "%SNAPSHOT%" >&2 |
+ set EXTRA_VM_OPTIONS=!EXTRA_VM_OPTIONS! --use_script_snapshot="%SNAPSHOT%" |
+) |
+ |
+rem See comments regarding options below in dart2js shell script. |
+set EXTRA_VM_OPTIONS=!EXTRA_VM_OPTIONS! --heap_growth_rate=512 |
+set EXTRA_VM_OPTIONS=!EXTRA_VM_OPTIONS! --no_use_inlining |
+ |
+"%DART%" %EXTRA_VM_OPTIONS% "%DART2JS%" %EXTRA_OPTIONS% %* |
+ |
+endlocal |
+ |
+goto end |
+ |
+:follow_links |
+setlocal |
+for %%i in (%1) do set result=%%~fi |
+set current= |
+for /f "tokens=2 delims=[]" %%i in ('dir /a:l ^"%~dp1^" 2^>nul ^ |
ahe
2013/01/04 09:35:17
I don't understand this command. What is the outpu
aam-me
2013/01/04 13:44:59
Yes, correct.
This is what dir /a:l output looks
|
+ ^| find "> %~n1 ["') do ( |
ahe
2013/01/04 09:35:17
In Unix this would be:
grep "> ${NAME_OF_PAR
aam-me
2013/01/04 13:44:59
Right!
|
+ set current=%%i |
+) |
+if not "%current%"=="" call :follow_links "%current%", result |
+endlocal & set %~2=%result% |
+goto :eof |
+ |
+:end |