������:
- �� bind() - ���һ������ָ�� (function pointer)�� ��ָ��ĺ���.
- �� function bind( function f, object ob )
�� ����ָ�� bind( ���� f, ��� ob )
- �� ����һ��ָ�� f �ĺ���ָ��, ����ָ��������� ob , �����Ǵ��� f �����.
��� f �Ĵ����߱��ݻ١�f ��һ���ⲿ���� (emulated function, �� efun) ��ָ�롢����ָ��ָ����ⲿ�������
this_object ��һЩ����ʱ, bind() �ͺ�����.
��
- �� void make_living(object ob) {
- ���� function f;
���� f = bind( (: enable_commands :), ob );
���� evaluate(f);
�� �������ӵ�����, �൱����� ob �Լ����� enable_commands() ���ⲿ����. ע�� !! ������ӻ�����һЩϵͳ��ȫ�ϵķ���, ��Ϊ bind() ��������ǿ�����������ִ��һ��Դ����. Ϊ��Ҫ��ֹ bind() ������, ��һ������������� (master apply) valid_bind() ������������ bind() ��ִ�����. ���� bind() ʱ, ��� valid_bind() ���� 1 ����ִ��, ���� 0 ����ִ��.
- �� Spock @ FF 96.Oct.16.�� (printed 3/16/95)