The R13B03 release.OTP_R13B03

1 files changed, 55 insertions, 0 deletions

diff --git a/erts/etc/win32/cygwin_tools/mingw/ar.sh b/erts/etc/win32/cygwin_tools/mingw/ar.sh
new file mode 100755
index 0000000000..5b8f58e5de
--- /dev/null
+++ b/erts/etc/win32/cygwin_tools/mingw/ar.sh
@@ -0,0 +1,55 @@
+#! /bin/sh
+# 
+# %CopyrightBegin%
+# 
+# Copyright Ericsson AB 2006-2009. All Rights Reserved.
+# 
+# The contents of this file are subject to the Erlang Public License,
+# Version 1.1, (the "License"); you may not use this file except in
+# compliance with the License. You should have received a copy of the
+# Erlang Public License along with this software. If not, it can be
+# retrieved online at http://www.erlang.org/.
+# 
+# Software distributed under the License is distributed on an "AS IS"
+# basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See
+# the License for the specific language governing rights and limitations
+# under the License.
+# 
+# %CopyrightEnd%
+# 
+CMD=""
+if [ -z "$MINGW_EXE_PATH" ]; then
+    echo "You have to set MINGW_EXE_PATH to run ar.sh" >&2
+    exit 1
+fi
+while test -n "$1" ; do
+    x="$1"
+    case "$x" in
+	-o|-out:)
+	    shift
+	    case "$1" in
+		/*)
+		    MPATH=`cygpath -m $1`;;
+		 *)
+		    MPATH=$1;;
+	    esac
+	    CMD="rcv \"$MPATH\" $CMD";; 
+	-out:*)
+	    y=`echo $x | sed 's,^-out:\(.*\),\1,g'`;
+	    MPATH=`cygpath -m $y`;
+	    CMD="rcv \"$MPATH\" $CMD";;
+	-o*)
+	    y=`echo $x | sed 's,^-o\(.*\),\1,g'`;
+	    MPATH=`cygpath -m $y`;
+	    CMD="rcv \"$MPATH\" $CMD";; 
+	/*)
+	    MPATH=`cygpath -m $x`;
+	    CMD="$CMD \"$MPATH\"";; 
+	*)
+	    y=`echo $x | sed 's,",\\\",g'`;
+	    CMD="$CMD \"$y\"";;
+    esac
+    shift
+done
+
+eval $MINGW_EXE_PATH/ar.exe $CMD