整數 functionp( 混合 arg );

　 f = (: obj, func :);

　 function pointer type　 value
　 ---------------------------------------------
　 call_other　　 FP_CALL_OTHER
　 lfun　　　 FP_LOCAL
　 efun　　　　　FP_EFUN
　 simul_efun　　 FP_SIMUL
　 functional　　 FP_FUNCTIONAL

　 另外在某些情形下, 會加上以下的值:

　 (有參數)　　 FP_HAS_ARGUMENTS
　 (創造函式的物件被摧毀)　 FP_OWNER_DESTED
　 (函式無法連結)　　 FP_NOT_BINDABLE

　 最後三個值為位元值 (bit value), 可以用位元測試.
　 FP_MASK 可以忽略這些位元值, 測試基本的函式指標型態
　

　 if ((functionp(f) & FP_MASK) == FP_EFUN) ...

　 if (functionp(f) & FP_HAS_ARGUMENTS) ...