widgetクラスによって提供される外部関数は、IF/Prologから呼び出しが行えるようにすべきです。これらの関数を呼び出す述語をIF/Prologに追加するには、標準のCインタフェ−スを使います。
XとIF/Prologの間の"Arg"名の衝突を避けるためには、ファイルcpred.hの代わりにファイルxcpred.hをインクル−ドし、C述語に対するパラメ−タを取得するために、Arg()の代わりにIFArg()を使って下さい。
新しい述語は、Cboot()と同様の手続き、たとえばCbootNewExternals()中でPrologに登録しなければなりません。この手続きは、主手続きCbootXif()から呼び出されなければなりません。$PROROOT/motif中のcbootxif.cを編集し、この呼び出しを追加して下さい。
例題：述語xmListDeselectPos/2を使用したXmListDeselectPos()の実現
static int IFXmListDeselectPos()
Widget list; unsigned int position;
if ( !XChk(IsWidget(IFArg(1),&list), IF_EXC_widget_exp) !XChk(IsUInt(IFArg(2), &position), IF_EXC_pos_int_exp)) return 0;
if (! XChk(XtIsSubclass(list), xmListWidgetClass), IF_EXC_list_exp)) return 0;
XmListDeselectPos(list, (int) position);
return 1;
. . . int CbootListExternals()
. . . CPRIM("xmListDeselectPos",2,IFXmListDeselectPos);
外部関数の実現については、例題のあるソ−ス $PROROOT/motif11/mtextext.cも参照して下さい。