[svn:parrot] r45151 - trunk/compilers/pirc/src

petdance at svn.parrot.org petdance at svn.parrot.org
Wed Mar 24 15:40:16 UTC 2010


Author: petdance
Date: Wed Mar 24 15:40:15 2010
New Revision: 45151
URL: https://trac.parrot.org/parrot/changeset/45151

Log:
fix ARGMOD on a function

Modified:
   trunk/compilers/pirc/src/pirsymbol.c

Modified: trunk/compilers/pirc/src/pirsymbol.c
==============================================================================
--- trunk/compilers/pirc/src/pirsymbol.c	Wed Mar 24 15:35:17 2010	(r45150)
+++ trunk/compilers/pirc/src/pirsymbol.c	Wed Mar 24 15:40:15 2010	(r45151)
@@ -73,10 +73,11 @@
 PARROT_WARN_UNUSED_RESULT
 PARROT_CANNOT_RETURN_NULL
 static pir_reg * new_pir_reg(
-    ARGIN(lexer_state * const lexer),
+    ARGMOD(lexer_state *lexer),
     pir_type type,
     int regno)
-        __attribute__nonnull__(1);
+        __attribute__nonnull__(1)
+        FUNC_MODIFIES(*lexer);
 
 static int next_register(ARGIN(lexer_state * const lexer), pir_type type)
         __attribute__nonnull__(1);
@@ -439,8 +440,8 @@
 
 /*
 
-=item C<static pir_reg * new_pir_reg(lexer_state *lexer, pir_type type,
-int regno)>
+=item C<static pir_reg * new_pir_reg(lexer_state *lexer, pir_type type, int
+regno)>
 
 Create a new PIR register node representing PIR/symbolic register
 identified by C<regno> and of type C<type>.


More information about the parrot-commits mailing list