Adds support for handling function_clause EXITs in R15

(R15 adds location information)
afiniate · Feb 29, 2012 · f419c61 · f419c61
1 parent 33dfa50
commit f419c61
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/src/seresye_agenda.erl b/src/seresye_agenda.erl
@@ -300,6 +300,7 @@ exec(EngineState0, R) ->
     EngineState2 =
         case catch execute_rule(EngineState0, R) of
             {'EXIT', {function_clause, [{Mod, Fun, _} | _]}} -> EngineState0;
+            {'EXIT', {function_clause, [{Mod, Fun, _, _Location} | _]}} -> EngineState0;
             {'EXIT', Reason} ->
                 erlang:throw({seresye, {rule_execution,
                                        [R, Reason]}});