|
|
@ -13,7 +13,7 @@ |
|
|
|
|
|
|
|
-define(MakeOpts, [noexec, load, netload, noload]). |
|
|
|
-define(EMakefile, "./Emakefile"). |
|
|
|
-define(OnceCnt, 1). |
|
|
|
-define(OnceCnt, 16). |
|
|
|
|
|
|
|
main(Args) -> |
|
|
|
MapArgs = parseArgs(Args), |
|
|
@ -47,12 +47,17 @@ parseArgs([], Ret) -> Ret; |
|
|
|
parseArgs([Flag | Rest], Ret) -> |
|
|
|
case Flag of |
|
|
|
[$-, $n | Left] -> |
|
|
|
[Value | LRest] = Rest, |
|
|
|
case Value of |
|
|
|
[$- | _] -> |
|
|
|
case Rest of |
|
|
|
[] -> |
|
|
|
parseArgs(Rest, Ret#{Left => true}); |
|
|
|
_ -> |
|
|
|
parseArgs(LRest, Ret#{LRest => Value}) |
|
|
|
[Value | LRest] = Rest, |
|
|
|
case Value of |
|
|
|
[$- | _] -> |
|
|
|
parseArgs(Rest, Ret#{Left => true}); |
|
|
|
_ -> |
|
|
|
parseArgs(LRest, Ret#{LRest => Value}) |
|
|
|
end |
|
|
|
end; |
|
|
|
[$-, $s | Left] -> |
|
|
|
[Value | LRest] = Rest, |
|
|
@ -70,7 +75,7 @@ parseArgs([Flag | Rest], Ret) -> |
|
|
|
[Value | LRest] = Rest, |
|
|
|
parseArgs(LRest, Ret#{Left => list_to_binary(Value)}); |
|
|
|
_ -> |
|
|
|
parseArgs(Rest, Ret) |
|
|
|
parseArgs(Rest, Ret#{Flag => true}) |
|
|
|
end. |
|
|
|
|
|
|
|
eMakeFile() -> |
|
|
|