From: Rafael Garcia-Suarez <rgarciasuarez@gmail.com>
Date: Mon, 27 Jul 2009 14:50:38 +0000 (+0200)
Subject: Add support for new flag D in embed.fnc (deprecated)
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=a5c2649359e39faef8af6f801a2443a7a2d47008;p=p5sagit%2Fp5-mst-13.2.git

Add support for new flag D in embed.fnc (deprecated)
---

diff --git a/embed.fnc b/embed.fnc
index aed661b..f727f00 100644
--- a/embed.fnc
+++ b/embed.fnc
@@ -11,6 +11,7 @@
 :	m		Implemented as a macro - no export, no
 :			proto, no #define
 :	d		function has documentation with its source
+:	D		function is deprecated
 :	s		static function, should have an S_ prefix in
 :			source file; for macros (m), suffix the usage
 :			example with a semicolon
diff --git a/embed.pl b/embed.pl
index 50da232..9c55cb4 100755
--- a/embed.pl
+++ b/embed.pl
@@ -253,6 +253,9 @@ sub write_protos {
 	if ( $flags =~ /r/ ) {
 	    push @attrs, "__attribute__noreturn__";
 	}
+	if ( $flags =~ /D/ ) {
+	    push @attrs, "__attribute__deprecated__";
+	}
 	if ( $is_malloc ) {
 	    push @attrs, "__attribute__malloc__";
 	}