0
@@ -6,7 +6,7 @@
0
 %
0
 
0
 -module(reia_module).
0
--export([build/1]).
0
+-export([build/1, hipe_available/0]).
0
 
0
 build({module, _Line, Name, Functions}) ->
0
   {ok, Module} = lists:foldl(
0
@@ -16,4 +16,10 @@ build({module, _Line, Name, Functions}) ->
0
   ),
0
   smerl:compile(Module);
0
 build(_) ->
0
-  {error, "invalid module"}.
0
\ No newline at end of file
0
+  {error, "invalid module"}.
0
+  
0
+hipe_available() ->
0
+  case string:str(erlang:system_info(system_version), "[hipe]") of
0
+    0 -> false;
0
+    _ -> true
0
+  end.
0
\ No newline at end of file