diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

check for NULL cps when adjusting.

Browse Source
This commit is contained in:
Vitor Santos Costa 2011-09-04 13:05:09 +02:00
parent 3f9e1c2836
commit c3ea833845
1 changed files with 6 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
C/grow.c
View File

@ -1216,12 +1216,15 @@ fix_tabling_info( USES_REGS1 )
while (df) { while (df) {
if (DepFr_backchain_cp(df)) if (DepFr_backchain_cp(df))
DepFr_backchain_cp(df) = ChoicePtrAdjust(DepFr_backchain_cp(df)); DepFr_backchain_cp(df) = ChoicePtrAdjust(DepFr_backchain_cp(df));
if (DepFr_leader_cp(df))
DepFr_leader_cp(df) = ChoicePtrAdjust(DepFr_leader_cp(df)); DepFr_leader_cp(df) = ChoicePtrAdjust(DepFr_leader_cp(df));
if (DepFr_cons_cp(df))
DepFr_cons_cp(df) = ConsumerChoicePtrAdjust(DepFr_cons_cp(df)); DepFr_cons_cp(df) = ConsumerChoicePtrAdjust(DepFr_cons_cp(df));
df = DepFr_next(df); df = DepFr_next(df);
} }
sg = LOCAL_top_sg_fr; sg = LOCAL_top_sg_fr;
while (sg) { while (sg) {
if (SgFr_gen_cp(sg))
SgFr_gen_cp(sg) = GeneratorChoicePtrAdjust(SgFr_gen_cp(sg)); SgFr_gen_cp(sg) = GeneratorChoicePtrAdjust(SgFr_gen_cp(sg));
sg = SgFr_next(sg); sg = SgFr_next(sg);
} }