X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=proto.h;h=f838f5cec5ae147e84920c289025375b51d6d64e;hb=5bca5c48fc14b9266d0bbef49a265ce0d735b118;hp=d106187ef27e8711d7505601f6cc5a866471403f;hpb=a49ba3fcbe357fbacf7b9898df08daa2cbdfc8c4;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/proto.h b/proto.h
index d106187..f838f5c 100644
--- a/proto.h
+++ b/proto.h
@@ -4616,6 +4616,12 @@ STATIC OP*	S_scalarboolean(pTHX_ OP *o)
 STATIC OP*	S_newDEFSVOP(pTHX)
 			__attribute__warn_unused_result__;
 
+STATIC OP*	S_search_const(pTHX_ OP *o)
+			__attribute__warn_unused_result__
+			__attribute__nonnull__(pTHX_1);
+#define PERL_ARGS_ASSERT_SEARCH_CONST	\
+	assert(o)
+
 STATIC OP*	S_new_logop(pTHX_ I32 type, I32 flags, OP **firstp, OP **otherp)
 			__attribute__warn_unused_result__
 			__attribute__nonnull__(pTHX_3)