|
|
@ -71,7 +71,8 @@ is_arch(ArchRegex) -> |
|
|
|
get_arch() -> |
|
|
|
Words = wordsize(), |
|
|
|
erlang:system_info(otp_release) ++ "-" |
|
|
|
++ erlang:system_info(system_architecture) ++ "-" ++ Words. |
|
|
|
++ erlang:system_info(system_architecture) ++ "-" ++ Words |
|
|
|
++ "-" ++ os_family(). |
|
|
|
|
|
|
|
wordsize() -> |
|
|
|
try erlang:system_info({wordsize, external}) of |
|
|
@ -284,6 +285,10 @@ delayed_halt(Code) -> |
|
|
|
%% Internal functions |
|
|
|
%% ==================================================================== |
|
|
|
|
|
|
|
os_family() -> |
|
|
|
{OsFamily, _} = os:type(), |
|
|
|
atom_to_list(OsFamily). |
|
|
|
|
|
|
|
get_deprecated_3(Get, Config, OldOpt, NewOpt, Default, When) -> |
|
|
|
case Get(Config, NewOpt, Default) of |
|
|
|
Default -> |
|
|
|