Permalink
Browse files

consting and updated date

git-svn-id: https://svn.parrot.org/parrot/trunk@18695 d31e2699-5ff4-0310-a27c-f18f2fbe73fe
  • Loading branch information...
1 parent a35e0a3 commit ec3695b81a5fceb47f7f1fe80da1818953f997d0 @petdance petdance committed May 30, 2007
Showing with 2 additions and 2 deletions.
  1. +2 −2 src/pmc/nci.pmc
View
@@ -1,5 +1,5 @@
/*
-Copyright (C) 2001-2003, The Perl Foundation.
+Copyright (C) 2001-2007, The Perl Foundation.
$Id$
=head1 NAME
@@ -112,7 +112,7 @@ Creates and returns a clone of the NCI.
*/
PMC* clone() {
- PMC* ret = pmc_new_noinit(INTERP, SELF->vtable->base_type);
+ PMC* const ret = pmc_new_noinit(INTERP, SELF->vtable->base_type);
PMC_struct_val(ret) = PMC_struct_val(SELF);
PMC_pmc_val(ret) = NULL;
/* FIXME if data is malloced (JIT/i386!) then we need

0 comments on commit ec3695b

Please sign in to comment.