develooper Front page | perl.cvs.parrot | Postings from December 2008

[svn:parrot] r34734 - trunk/tools/build

From:
petdance
Date:
December 31, 2008 20:52
Subject:
[svn:parrot] r34734 - trunk/tools/build
Message ID:
20090101045228.6CDFDCB9FA@x12.develooper.com
Author: petdance
Date: Wed Dec 31 20:52:27 2008
New Revision: 34734

Modified:
   trunk/tools/build/headerizer.pl

Log:
There is no _NOTNULL modifiers on ARGMOD or ARGOUT and my more

Modified: trunk/tools/build/headerizer.pl
==============================================================================
--- trunk/tools/build/headerizer.pl	(original)
+++ trunk/tools/build/headerizer.pl	Wed Dec 31 20:52:27 2008
@@ -271,7 +271,7 @@
     my $n = 0;
     for my $arg (@args) {
         ++$n;
-        if ( $arg =~ m{ARG(?:MOD|OUT)(?:_NOTNULL)?\((.+?)\)} ) {
+        if ( $arg =~ m{ARG(?:MOD|OUT)\((.+?)\)} ) {
             my $modified = $1;
             if ( $modified =~ s/.*\*/*/ ) {
                 # We're OK



nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About