X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=embed.fnc;h=ba2616a83746c4d9bf96918646194e7873560a52;hb=7253302f2d3ad6cffc89ef8a0aa41e45bb4dc935;hp=7e2cc354d8786957a382684d67b7413ae51c0dfe;hpb=fc97af9c8f85fe5d98c1be12130f8f74fe27a7bf;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/embed.fnc b/embed.fnc
index 7e2cc35..ba2616a 100644
--- a/embed.fnc
+++ b/embed.fnc
@@ -1195,7 +1195,11 @@ pR	|OP*	|ck_trunc	|NN OP *o
 pR	|OP*	|ck_unpack	|NN OP *o
 sRn	|bool	|is_handle_constructor|NN const OP *o|I32 numargs
 sR	|I32	|is_list_assignment|NULLOK const OP *o
-s	|void	|forget_pmop	|NN PMOP *const o|U32 flags
+#  ifdef USE_ITHREADS
+so	|void	|forget_pmop	|NN PMOP *const o|U32 flags
+#  else
+so	|void	|forget_pmop	|NN PMOP *const o
+#  endif
 s	|void	|find_and_forget_pmops	|NN OP *o
 s	|void	|cop_free	|NN COP *cop
 s	|OP*	|modkids	|NULLOK OP *o|I32 type