[svn:parrot] r37799 - trunk/t/codingstd

[coke at svn.parrot.org]

Author: coke
Date: Sat Mar 28 14:31:38 2009
New Revision: 37799
URL: https://trac.parrot.org/parrot/changeset/37799

Log:
[t] strip off more argument modifiers, make SHIM_INTERP look like other interps.

Modified:
   trunk/t/codingstd/c_function_docs.t

Modified: trunk/t/codingstd/c_function_docs.t
==============================================================================
--- trunk/t/codingstd/c_function_docs.t	Sat Mar 28 13:53:52 2009	(r37798)
+++ trunk/t/codingstd/c_function_docs.t	Sat Mar 28 14:31:38 2009	(r37799)
@@ -50,7 +50,13 @@
         $escaped_decl =~ s/^\s*PARROT_[A-Z_]*\b\s+//gm;
 
         # strip out any ARG* modifiers
-        $escaped_decl =~ s/ARG(?:IN|MOD)\((.*?)\)/$1/g;
+        $escaped_decl =~ s/ARG(?:IN|MOD)(?:_NULLOK)?\((.*?)\)/$1/g;
+
+        # strip out the SHIM modifier
+        $escaped_decl =~ s/SHIM\((.*?)\)/$1/g;
+
+        # SHIM_INTERP is still a PARROT_INTERP
+        $escaped_decl =~ s/SHIM_INTERP/PARROT_INTERP/g;
 
         # escape [, ], (, ), and *
         $escaped_decl =~ s/\[/\\[/g;