# xtParent(?WidgetName, ?ParentName)

intrinsicsのXtParent()と同様です。

この述語は、対応するwidgetの親widget、あるいは与えられたParentNameの子widgetを返します。

親widgetがまだPrologに登録されていない場合には、それに新しい一意名が与えられます。この名前は、通常通り以後の参照に使うことができます。

WidgetNameが変数の場合には、Prologに登録されているすべてのwidgetの親が計算され、ParentNameに単一化されます。従って、バックトラッキングによってすべての親-子の組み合わせを得ることができます。

トップレベル・シェル・widgetのようにwidgetが親をもたない場合には、none（アトム）が返されます。

?- xtParent(Widget, Parent).

Widget = applicationShell_1 Parent = none;

Widget = command_1 Parent = applicationShell_1;

no ?- _

widget_or_var_expected 与えられている場合には、WidgetNameとParentNameはwidgetでなければならない

冒頭へ