Merge pull request #481 from rabbitmq/rabbitmq-server-479

Fall back to code:is_module_native/1 on older OTP releases

1 files changed, 10 insertions, 1 deletions

diff --git a/src/rabbit.erl b/src/rabbit.erl
index 2b9237a15b..8d5dbb0260 100644
--- a/src/rabbit.erl
+++ b/src/rabbit.erl
@@ -285,12 +285,21 @@ hipe_compile() ->
                    %% happens when RabbitMQ is stopped (just the
                    %% application, not the entire node) and started
                    %% again.
-                   HM:module_info(native) =:= false],
+                   already_hipe_compiled(HM)],
     case HipeModules of
         [] -> {ok, already_compiled};
         _  -> do_hipe_compile(HipeModules)
     end.
 
+already_hipe_compiled(Mod) ->
+    try
+    %% OTP 18.x or later
+	Mod:module_info(native) =:= false
+    %% OTP prior to 18.x
+    catch error:badarg ->
+	code:is_module_native(Mod) =:= false
+    end.
+
 do_hipe_compile(HipeModules) ->
     Count = length(HipeModules),
     io:format("~nHiPE compiling:  |~s|~n                 |",