Skip to content

Commit 7030c45

Browse files
committed
kernel: add two missing CHANGED_BAG calls
1 parent cc97204 commit 7030c45

File tree

1 file changed

+2
-2
lines changed

1 file changed

+2
-2
lines changed

src/objcftl.c

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -194,15 +194,15 @@ Obj CollectPolycyc (
194194

195195
if( LtInt( INTOBJ_INT(0), e ) ) {
196196
C_DIFF_FIA( ee, e, INTOBJ_INT(1) ); e = ee;
197-
SET_ELM_PLIST( est, st, e );
197+
SET_ELM_PLIST( est, st, e ); CHANGED_BAG( est );
198198
conj = ADDR_OBJ(pcp)[PC_CONJUGATES];
199199
iconj = ADDR_OBJ(pcp)[PC_INVERSECONJUGATES];
200200

201201
C_SUM_FIA( ge, ELM_PLIST( list, g ), INTOBJ_INT(1) );
202202
}
203203
else {
204204
C_SUM_FIA( ee, e, INTOBJ_INT(1) ); e = ee;
205-
SET_ELM_PLIST( est, st, e );
205+
SET_ELM_PLIST( est, st, e ); CHANGED_BAG( est );
206206
conj = ADDR_OBJ(pcp)[PC_CONJUGATESINVERSE];
207207
iconj = ADDR_OBJ(pcp)[PC_INVERSECONJUGATESINVERSE];
208208

0 commit comments

Comments
 (0)