MINERVA superseeded IF/Prolog.
Please see
http://www.ifcomputer.co.jp/MINERVA
for details.
We discontinued to sell IF/Prolog Dec 31. 2003.
For current customers, we continue to provide
professional support for IF/Prolog until Dec 31, 2008.
# xtClass(?WidgetName, ?ClassName)
intrinsicsのXtClass()と同様の働きをします。
この述語は、widgetのクラスを計算します。
WidgetNameが変数の場合には、Prologに登録されているすべてのwidgetのクラスが計算され、ClassNameに単一化されます。従って、バックトラッキングによってすべてのwidget-クラスの組み合わせを得ることができます。
?- xtClass(Widget, Class).
Widget = applicationShell_1
Class = applicationShell ;
Widget = applicationShell_1
Class = SpplicationhellWidgetClass;
Widget = xmPushButton_1
Class = xmPushButton ;
Widget = xmPushButton_1
Class = xmPushButtonWidgetClass;
...
illegal_widget_class 与えられている場合には、ClassNameはクラス名でなければならない
Prologにwidgetのクラスが登録されていない
widget_expected 与えられている場合には、WidgetNameはwidgetでなければならない
| 
