Kernel/src/bip_control.c

512     event.val.all = v.all;
525 	event.val.all = vevent.all;
538     		event.val, event.tag);
600 	event.val.all = vevent.all;
612     if (varg.nint < 1 || varg.nint > DidArity(v.ptr[0].val.did))
642     stream_id out = get_stream_id(data[0].val, data[0].tag, SWRITE, &res);
646 	    out, data[1].val, data[1].tag, 1200, 1,
668     if (varg.nint < 1 || varg.nint > DidArity(v.ptr[0].val.did))
678     data[0].val.all = vstream.all;
680     data[1].val.all = vterm.all;
709     if (varg.nint < 1 || varg.nint > DidArity(vstruct.ptr[0].val.did))
714     if (!NewLocation(pstamp) && !NewValue(pstamp->val, pstamp->tag))
729     if (varg.nint < 1 || varg.nint > DidArity(vstruct.ptr[0].val.did))
736      * !NewValue(pstamp->val, pstamp->tag) is the same as OldStamp(pstamp)
738     if (!NewLocation(pstamp) && !NewValue(pstamp->val, pstamp->tag))
754     if (varg.nint < 1 || varg.nint > DidArity(vstruct.ptr[0].val.did))
771     if (varg1.nint < 1 || varg1.nint > DidArity(vstruct1.ptr[0].val.did)
772      || varg2.nint < 1 || varg2.nint > DidArity(vstruct2.ptr[0].val.did))
778     Succeed_If(vstruct1.ptr[varg1.nint].val.ptr < vstruct2.ptr[varg2.nint].val.ptr);
839     Return_Unify_Pw(v, t, TAGGED_TD.val, TAGGED_TD.tag);
1074     goal_did = IsStructure(tg) ? vg.ptr->val.did
1134 	pri *proc = vf.ptr[TF_PROC].val.priptr;
1140 	pri *proc = vf.ptr[TF_PROC].val.priptr;
1147 	pri *proc = vf.ptr[TF_PROC].val.priptr;
1194 	    pw[0].val.ptr = pld;
1202     Return_Unify_Pw(v, t, list.val, list.tag);
1217     psusp->val.ptr = susp;
1221     susp[SUSP_MODULE].val.did = ((pri*)proc)->module_ref;
1227     susp[SUSP_GOAL].val.all = goal.val.all;