Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

add bat scripts for bootstrap and rebat (windows doesn't understand s…

…hebang), make bootstrap work on windows
  • Loading branch information...
commit 8a5eea5ef1d9d2cb8275044a1a3071bd80adef03 1 parent de716e1
@juranki juranki authored
Showing with 22 additions and 6 deletions.
  1. +18 −6 bootstrap
  2. +2 −0  bootstrap.bat
  3. +2 −0  rebar.bat
View
24 bootstrap
@@ -13,11 +13,9 @@ main(Args) ->
%% Check for force=1 flag to force a rebuild
case lists:member("force=1", Args) of
true ->
- [] = os:cmd("rm -rf ebin/*.beam"),
- ok;
+ rm("ebin/*.beam");
false ->
- os:cmd("rm -f ebin/rebar_core.beam"),
- ok
+ rm("ebin/rebar_core.beam")
end,
%% Compile all src/*.erl to ebin
@@ -69,13 +67,27 @@ main(Args) ->
end,
%% Finally, update executable perms for our script
- [] = os:cmd("chmod u+x rebar"),
-
+ case os:type() of
+ {unix,_} ->
+ [] = os:cmd("chmod u+x rebar"),
+ ok;
+ _ ->
+ ok
+ end,
+
%% Add a helpful message
io:format("Congratulations! You now have a self-contained script called \"rebar\" in\n"
"your current working directory. Place this script anywhere in your path\n"
"and you can use rebar to build OTP-compliant apps.\n").
+rm(Path) ->
+ NativePath = filename:nativename(Path),
+ Cmd = case os:type() of
+ {unix,_} -> "rm -f ";
+ {win32,_} -> "del /q "
+ end,
+ [] = os:cmd(Cmd ++ NativePath),
+ ok.
build_time() ->
{{Y, M, D}, {H, Min, S}} = calendar:now_to_universal_time(now()),
View
2  bootstrap.bat
@@ -0,0 +1,2 @@
+@echo off
+escript.exe bootstrap %*
View
2  rebar.bat
@@ -0,0 +1,2 @@
+@echo off
+escript.exe rebar %*
Please sign in to comment.
Something went wrong with that request. Please try again.