function

MudOS 有一種稱為 function　 (函式指標) 的變數型態. 這種型態的變數可以用來指向各種不同的函式. 您也許早已熟悉把一個函式當作某些外部函式 (efuns)　 參數. 舉例來說, 像是過濾陣列的外部函式. 它讀入一個陣列, 並經由一個函式過濾陣列中的元素. 讓此函式傳回非零值 (non-zero) 的元素就保留下來, 結果傳回一個新的陣列. 傳統上, 這樣做要傳入一個物件和函式的名稱. 現在, 可以用函式指標這種變數型態做到. 函數指標只含有一個函式的資訊, 可以在稍後執行其函式.

函式指標可以創造並指定為變數:

function f = (: local_func :);

foo(f);　 map_array( ({ 1, 2 }), f);

x = evaluate(f, "hi");

x = local_func("hi");

注意 evaluate() 的參數如果不是函式, 就只會傳回參數值. 所以您可以做以下的
事:

void set_short(mixed x) { short = x; }
mixed query_short() { return evaluate(short); }

最簡單的函式指標如上面所述. 只是簡單地指向同一個物件中的一個區域函式 (local function), 即 (: function_name :). 函式指標的值可以包括函式的參數, 例如:

string foo( string a, string b ) {
return "(" + a "," + b + ")";
}

void create() {
function f = (: foo, "left" :);
printf( "%s %s\n", evaluate(f), evaluate(f, "right") );
}

第二種的函式指標是外部函式指標, 就是 (: efun_name :). 這樣與區域函式指標很類似. 譬如說, objects() 外部函式要傳入函式, 並傳回任何使函式為真值的物件. 所以:

objects( (: clonep :) )

void create() {
int i;
function f = (: write, "Hello, world!\n" :);

for (i=0; i<3; i++) { evaluate(f); }

}

Hello, world!
Hello, world!
Hello, world!

注意, 對函式指標來說, simul_efuns　 (模擬外部函式) 與外部函式是相同的.

第三種形式是 call_other 函式指標, 與以前 MudOS　 所使用的函式指標型態類似. 其形式為 (: object, function :).　 要使用參數的話, 應將函式名稱與參數的陣列併用. 以下是範例:
　

void create()
{
string *ret;
function f = (: this_player(), "query" :);

ret = map( ({ "name", "short", "long" }), f );
write(implode(ret, "\n"));

}

要使一個函式指標直接呼叫 query("short") :

f = (: this_player(), ({ "query", "short" }) :)

f = (: call_other, this_player(), "query", "short" :)　　　　　　　 /* 一個外部函式指標, 使用 call_other */
f = (: this_player()->query("short") :)　　　　　　　 // 有效的運算式; 請見下文.

第四種形式是運算式 (expression) 函式指標. 就是 (: 運算式 :).　 在一個運算式函式指標中, 參數可以用 $1, $2, $3 ... 代表, 舉例如下:

evaluate( (: $1 + $2 :), 3, 4)　　　　　　　 // 傳回 7.

top_ten = sort_array( player_list,

(: $2->query_level() - $1->query_level :) )[0..9];

void create() {
function f = function(int x) {
int y;

switch(x) {

case 1: y = 3;
case 2: y = 5;
}
return y - 2;
　　　 };

printf("%i %i %i\n", (*f)(1), (*f)(2), (*f)(3));

}

注意, (*f)(...) 等於 evaluate(f, ...) , 保留這種語法是為了與舊版相容. 任何普通函式合法 (legal)　 的寫法, 都可以用於不知名函式.

創造帶有參數的外部函式、區域函式、模擬外部函式指標時, 會執行函式. 而運算式和功能性 (functional) 函式指標, 只有在使用函式指標時執行函式:

(: destruct, this_player() :)　　　　　　　 /* 創造這個函式指標時, 就會摧毀 this_player(). 函式於創造時執行. */
(: destruct(this_player()) :)　　　　　　　 /* 在稍後使用此函式指標時, 才會摧毀 this_player()" */

(: destruct( $(this_player) ) :)　　　　　　　 // 與上面第一個範例相同.

map_array(listeners,
(: tell_object($1, $(this_player()->query_name()) + " bows.\n") :) );

map_array(listeners,
(: tell_object($1, $(this_player()->query_name() + " bows.\n")) :) );

map_array(listeners,
(: tell_object, this_player()->query_name() + " bows.\n" :) );