perl.cvs.parrot
[Top] [All Lists]

[svn:parrot] r23685 - trunk/src

Subject: [svn:parrot] r23685 - trunk/src
From:
Date: Sun, 9 Dec 2007 21:11:27 -0800 PST
Newsgroups: perl.cvs.parrot

Author: petdance
Date: Sun Dec  9 21:11:26 2007
New Revision: 23685

Modified:
   trunk/src/interpreter.c

Log:
consting a parm

Modified: trunk/src/interpreter.c
==============================================================================
--- trunk/src/interpreter.c     (original)
+++ trunk/src/interpreter.c     Sun Dec  9 21:11:26 2007
@@ -66,7 +66,7 @@
 static oplib_init_f get_op_lib_init(PARROT_INTERP,
     int core_op,
     int which,
-    NULLOK(PMC *lib))
+    NULLOK(const PMC *lib))
         __attribute__nonnull__(1);
 
 static void init_prederef(PARROT_INTERP, int which)
@@ -358,7 +358,7 @@
 PARROT_WARN_UNUSED_RESULT
 PARROT_CANNOT_RETURN_NULL
 static oplib_init_f
-get_op_lib_init(PARROT_INTERP, int core_op, int which, NULLOK(PMC *lib))
+get_op_lib_init(PARROT_INTERP, int core_op, int which, NULLOK(const PMC *lib))
 {
     if (core_op) {
         oplib_init_f init_func;

<Prev in Thread] Current Thread [Next in Thread>
  • [svn:parrot] r23685 - trunk/src, petdance <=