Switch to a config-object based interface

[perl/modules/re-engine-Hooks.git] / re_engine_hooks.h

diff --git a/re_engine_hooks.h b/re_engine_hooks.h
index 190e98d37e5319b3b53c9eb546c28725037dac84..3613490d7e155f0c2a355a089d09d987698d701a 100644 (file)
--- a/re_engine_hooks.h
+++ b/re_engine_hooks.h
@@ -7,8 +7,13 @@
 typedef void (*reh_comp_hook)(pTHX_ regexp *, regnode *);
 typedef void (*reh_exec_hook)(pTHX_ regexp *, regnode *, regmatch_info *, regmatch_state *);
 
-void reh_register(pTHX_ const char *key, reh_comp_hook comp, reh_exec_hook exec);
-#define reh_register(K, C, E) reh_register(aTHX_ (K), (C), (E))
+typedef struct {
+ reh_comp_hook comp;
+ reh_exec_hook exec;
+} reh_config;
+
+void reh_register(pTHX_ const char *, reh_config *);
+#define reh_register(K, C) reh_register(aTHX_ (K), (C))
 
 #endif /* RE_ENGINE_HOOKS_H */