regcomp.c: Chg invlist_union() to accept NULL first param

[perl5.git] / embed.fnc

diff --git a/embed.fnc b/embed.fnc
index c83c0a3..68e5ecd 100644 (file)
--- a/embed.fnc
+++ b/embed.fnc
@@ -1377,7 +1377,7 @@ EsMR      |IV     |invlist_search |NN SV* const invlist|const UV cp
 #endif
 #if defined(PERL_IN_REGCOMP_C) || defined(PERL_IN_UTF8_C)
 EXpM   |void   |_invlist_intersection  |NN SV* const a|NN SV* const b|NN SV** i
-EXpM   |void   |_invlist_union |NN SV* const a|NN SV* const b|NN SV** output
+EXpM   |void   |_invlist_union |NULLOK SV* const a|NN SV* const b|NN SV** output
 EXpM   |void   |_invlist_subtract|NN SV* const a|NN SV* const b|NN SV** result
 EXpM   |void   |_invlist_invert|NN SV* const invlist
 EXpM   |void   |_invlist_invert_prop|NN SV* const invlist