@@ -611,6 +611,13 @@ static void serialize_stable(PARROT_INTERP, SerializationWriter *writer, PMC *st
611
611
/* Mode flags. */
612
612
write_int_func (interp , writer , st -> mode_flags );
613
613
614
+ /* Boolification spec. */
615
+ write_int_func (interp , writer , st -> boolification_spec != NULL );
616
+ if (st -> boolification_spec ) {
617
+ write_int_func (interp , writer , st -> boolification_spec -> mode );
618
+ write_ref_func (interp , writer , st -> boolification_spec -> method );
619
+ }
620
+
614
621
/* XXX More to do here. */
615
622
printf ("WARNING: STable serialization not yet fully implemented\n" );
616
623
@@ -1320,6 +1327,13 @@ static void deserialize_stable(PARROT_INTERP, SerializationReader *reader, INTVA
1320
1327
1321
1328
/* Mode flags. */
1322
1329
st -> mode_flags = read_int_func (interp , reader );
1330
+
1331
+ /* Boolification spec. */
1332
+ if (read_int_func (interp , reader )) {
1333
+ st -> boolification_spec = mem_sys_allocate (sizeof (BoolificationSpec ));
1334
+ st -> boolification_spec -> mode = read_int_func (interp , reader );
1335
+ st -> boolification_spec -> method = read_ref_func (interp , reader );
1336
+ }
1323
1337
1324
1338
/* XXX More to do here. */
1325
1339
printf ("WARNING: STable deserialization not yet fully implemented\n" );
0 commit comments