cvsuser 02/11/22 14:05:58
Modified: classes managedstruct.pmc
Log:
perl6 operator confusion;-)
Revision Changes Path
1.2 +2 -2 parrot/classes/managedstruct.pmc
Index: managedstruct.pmc
===================================================================
RCS file: /cvs/public/parrot/classes/managedstruct.pmc,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -w -r1.1 -r1.2
--- managedstruct.pmc 22 Nov 2002 18:02:34 -0000 1.1
+++ managedstruct.pmc 22 Nov 2002 22:05:58 -0000 1.2
@@ -1,7 +1,7 @@
/* NCI.pmc
* Copyright: 2002 Yet Another Society
* CVS Info
- * $Id: managedstruct.pmc,v 1.1 2002/11/22 18:02:34 dan Exp $
+ * $Id: managedstruct.pmc,v 1.2 2002/11/22 22:05:58 leo Exp $
* Overview:
* PMC class to hold structs that parrot's responsible for disposing of
* Data Structure and Algorithms:
@@ -17,7 +17,7 @@
pmclass ManagedStruct {
void init () {
- SELF->flags &= PMC_active_destroy_FLAG;
+ SELF->flags |= PMC_active_destroy_FLAG;
}
void destroy () {
