diff options
Diffstat (limited to 'erts/etc/win32/wsl_tools/erl')
| -rwxr-xr-x | erts/etc/win32/wsl_tools/erl | 45 |
1 files changed, 45 insertions, 0 deletions
diff --git a/erts/etc/win32/wsl_tools/erl b/erts/etc/win32/wsl_tools/erl new file mode 100755 index 0000000000..db24f6b4fe --- /dev/null +++ b/erts/etc/win32/wsl_tools/erl @@ -0,0 +1,45 @@ +#! /bin/sh +# +# %CopyrightBegin% +# +# Copyright Ericsson AB 2002-2016. All Rights Reserved. +# +# Licensed under the Apache License, Version 2.0 (the "License"); +# you may not use this file except in compliance with the License. +# You may obtain a copy of the License at +# +# http://www.apache.org/licenses/LICENSE-2.0 +# +# Unless required by applicable law or agreed to in writing, software +# distributed under the License is distributed on an "AS IS" BASIS, +# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. +# See the License for the specific language governing permissions and +# limitations under the License. +# +# %CopyrightEnd% +# +# Note! This shellscript expects to be run in a wsl environment, +# it converts erlc command lines to native windows erlc commands, which +# basically means running the command wslpath on whatever is a path... + +CMD="" +for x in "$@"; do + case "$x" in + -I/*|-o/*) + y=`echo $x | sed 's,^-[Io]\(/.*\),\1,g'`; + z=`echo $x | sed 's,^-\([Io]\)\(/.*\),\1,g'`; + MPATH=`wslpath -m $y`; + CMD="$CMD -$z\"$MPATH\"";; + /*) + MPATH=`wslpath -m $x`; + CMD="$CMD \"$MPATH\"";; + *) + y=`echo $x | sed 's,",\\\",g'`; + CMD="$CMD \"$y\"";; + esac +done +ERL_TOP=`wslpath -m $ERL_TOP` +WSLENV="ERL_TOP/w:$WSLENV" +export WSLENV +export ERL_TOP +eval erl.exe $CMD |