X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FSub-Op.git;a=blobdiff_plain;f=sub_op.h;h=34d557192aaf899e532c34b1b5ef721a9725f3d8;hp=c594f036e681fb4ad21a9c09d52fed32cf21ef04;hb=159088ccddecdea45fdae8093319b41c097adc86;hpb=c987524f0641ca6a25d5e3072c9d1a2ecef2f57c diff --git a/sub_op.h b/sub_op.h index c594f03..34d5571 100644 --- a/sub_op.h +++ b/sub_op.h @@ -14,8 +14,10 @@ typedef struct { void *ud; } sub_op_config_t; +#define SUB_OP_REGISTER_STEAL 1 + void sub_op_init (sub_op_config_t *c); -void sub_op_register(pTHX_ const sub_op_config_t *c); +void sub_op_register(pTHX_ const sub_op_config_t *c, U32 flags); sub_op_config_t *sub_op_dup (pTHX_ const sub_op_config_t *c); void sub_op_free (pTHX_ sub_op_config_t *c);