fun 328 src/bytecode.c Lisp_Object fun = CALLN (Fmake_byte_code, Qnil, bytestr, vector, maxdepth); fun 329 src/bytecode.c return exec_byte_code (fun, 0, 0, NULL); fun 384 src/bytecode.c Lisp_Object fun; /* current function object */ fun 416 src/bytecode.c mark_object (fp->fun); fun 469 src/bytecode.c exec_byte_code (Lisp_Object fun, ptrdiff_t args_template, fun 482 src/bytecode.c Lisp_Object bytestr = AREF (fun, COMPILED_BYTECODE); fun 492 src/bytecode.c Lisp_Object vector = AREF (fun, COMPILED_CONSTANTS); fun 493 src/bytecode.c Lisp_Object maxdepth = AREF (fun, COMPILED_STACK_DEPTH); fun 507 src/bytecode.c fp->fun = fun; fun 799 src/bytecode.c fun = call_fun; fun 896 src/bytecode.c Lisp_Object fun = fp->fun; fun 897 src/bytecode.c Lisp_Object bytestr = AREF (fun, COMPILED_BYTECODE); fun 898 src/bytecode.c Lisp_Object vector = AREF (fun, COMPILED_CONSTANTS); fun 973 src/bytecode.c Lisp_Object fun = fp->fun; fun 974 src/bytecode.c Lisp_Object bytestr = AREF (fun, COMPILED_BYTECODE); fun 975 src/bytecode.c Lisp_Object vector = AREF (fun, COMPILED_CONSTANTS); fun 506 src/comp.c #define CALL0I(fun) \ fun 507 src/comp.c CALLN (Ffuncall, intern_c_string (STR (fun))) fun 510 src/comp.c #define CALL1I(fun, arg) \ fun 511 src/comp.c CALLN (Ffuncall, intern_c_string (STR (fun)), arg) fun 514 src/comp.c #define CALL2I(fun, arg1, arg2) \ fun 515 src/comp.c CALLN (Ffuncall, intern_c_string (STR (fun)), arg1, arg2) fun 518 src/comp.c #define CALL4I(fun, arg1, arg2, arg3, arg4) \ fun 519 src/comp.c CALLN (Ffuncall, intern_c_string (STR (fun)), arg1, arg2, arg3, arg4) fun 1084 src/data.c Lisp_Object fun = indirect_function (cmd); /* Check cycles. */ fun 1087 src/data.c if (NILP (fun)) fun 1092 src/data.c fun = cmd; fun 1093 src/data.c while (SYMBOLP (fun)) fun 1095 src/data.c Lisp_Object tmp = Fget (fun, Qinteractive_form); fun 1099 src/data.c fun = Fsymbol_function (fun); fun 1102 src/data.c if (SUBRP (fun)) fun 1104 src/data.c if (SUBR_NATIVE_COMPILEDP (fun) && !NILP (XSUBR (fun)->intspec.native)) fun 1105 src/data.c return XSUBR (fun)->intspec.native; fun 1107 src/data.c const char *spec = XSUBR (fun)->intspec.string; fun 1113 src/data.c else if (COMPILEDP (fun)) fun 1115 src/data.c if (PVSIZE (fun) > COMPILED_INTERACTIVE) fun 1117 src/data.c Lisp_Object form = AREF (fun, COMPILED_INTERACTIVE); fun 1123 src/data.c else if (PVSIZE (fun) > COMPILED_DOC_STRING) fun 1125 src/data.c Lisp_Object doc = AREF (fun, COMPILED_DOC_STRING); fun 1131 src/data.c else if (MODULE_FUNCTIONP (fun)) fun 1134 src/data.c = module_function_interactive_form (XMODULE_FUNCTION (fun)); fun 1139 src/data.c else if (AUTOLOADP (fun)) fun 1140 src/data.c return Finteractive_form (Fautoload_do_load (fun, cmd, Qnil)); fun 1141 src/data.c else if (CONSP (fun)) fun 1143 src/data.c Lisp_Object funcar = XCAR (fun); fun 1147 src/data.c Lisp_Object form = Fcdr (XCDR (fun)); fun 1163 src/data.c return call1 (Qoclosure_interactive_form, fun); fun 1174 src/data.c Lisp_Object fun = indirect_function (command); /* Check cycles. */ fun 1176 src/data.c if (NILP (fun)) fun 1181 src/data.c fun = command; fun 1182 src/data.c while (SYMBOLP (fun)) fun 1184 src/data.c Lisp_Object modes = Fget (fun, Qcommand_modes); fun 1188 src/data.c fun = Fsymbol_function (fun); fun 1191 src/data.c if (SUBRP (fun)) fun 1193 src/data.c return XSUBR (fun)->command_modes; fun 1195 src/data.c else if (COMPILEDP (fun)) fun 1197 src/data.c if (PVSIZE (fun) <= COMPILED_INTERACTIVE) fun 1199 src/data.c Lisp_Object form = AREF (fun, COMPILED_INTERACTIVE); fun 1208 src/data.c else if (MODULE_FUNCTIONP (fun)) fun 1211 src/data.c = module_function_command_modes (XMODULE_FUNCTION (fun)); fun 1216 src/data.c else if (AUTOLOADP (fun)) fun 1218 src/data.c Lisp_Object modes = Fnth (make_int (3), fun); fun 1224 src/data.c else if (CONSP (fun)) fun 1226 src/data.c Lisp_Object funcar = XCAR (fun); fun 1230 src/data.c Lisp_Object form = Fcdr (XCDR (fun)); fun 328 src/doc.c Lisp_Object fun = Findirect_function (function, Qnil); fun 329 src/doc.c if (NILP (fun)) fun 331 src/doc.c if (CONSP (fun) && EQ (XCAR (fun), Qmacro)) fun 332 src/doc.c fun = XCDR (fun); fun 334 src/doc.c if (!NILP (Fsubr_native_elisp_p (fun))) fun 335 src/doc.c doc = native_function_doc (fun); fun 338 src/doc.c if (SUBRP (fun)) fun 339 src/doc.c doc = make_fixnum (XSUBR (fun)->doc); fun 341 src/doc.c else if (MODULE_FUNCTIONP (fun)) fun 342 src/doc.c doc = module_function_documentation (XMODULE_FUNCTION (fun)); fun 345 src/doc.c doc = call1 (Qfunction_documentation, fun); fun 438 src/doc.c Lisp_Object fun = SYMBOLP (obj) ? XSYMBOL (obj)->u.s.function : obj; fun 443 src/doc.c if (CONSP (fun) && EQ (XCAR (fun), Qmacro)) fun 444 src/doc.c fun = XCDR (fun); fun 445 src/doc.c if (CONSP (fun)) fun 447 src/doc.c Lisp_Object tem = XCAR (fun); fun 449 src/doc.c || (EQ (tem, Qclosure) && (fun = XCDR (fun), 1))) fun 451 src/doc.c tem = Fcdr (Fcdr (fun)); fun 459 src/doc.c else if (SUBRP (fun) && !SUBR_NATIVE_COMPILEDP (fun)) fun 461 src/doc.c XSUBR (fun)->doc = offset; fun 465 src/doc.c else if (COMPILEDP (fun)) fun 469 src/doc.c if (PVSIZE (fun) > COMPILED_DOC_STRING fun 472 src/doc.c && VALID_DOCSTRING_P (AREF (fun, COMPILED_DOC_STRING))) fun 473 src/doc.c ASET (fun, COMPILED_DOC_STRING, make_fixnum (offset)); fun 477 src/doc.c (PVSIZE (fun) > COMPILED_DOC_STRING fun 643 src/emacs-module.c module_function_interactive_form (const struct Lisp_Module_Function *fun) fun 645 src/emacs-module.c return fun->interactive_form; fun 649 src/emacs-module.c module_function_command_modes (const struct Lisp_Module_Function *fun) fun 651 src/emacs-module.c return fun->command_modes; fun 2114 src/eval.c register Lisp_Object fun; fun 2117 src/eval.c fun = function; fun 2119 src/eval.c fun = indirect_function (fun); /* Check cycles. */ fun 2120 src/eval.c if (NILP (fun)) fun 2125 src/eval.c if (SUBRP (fun)) fun 2127 src/eval.c if (XSUBR (fun)->intspec.string) fun 2133 src/eval.c else if (COMPILEDP (fun)) fun 2135 src/eval.c if (PVSIZE (fun) > COMPILED_INTERACTIVE) fun 2137 src/eval.c else if (PVSIZE (fun) > COMPILED_DOC_STRING) fun 2139 src/eval.c Lisp_Object doc = AREF (fun, COMPILED_DOC_STRING); fun 2148 src/eval.c else if (MODULE_FUNCTIONP (fun)) fun 2150 src/eval.c if (!NILP (module_function_interactive_form (XMODULE_FUNCTION (fun)))) fun 2156 src/eval.c else if (STRINGP (fun) || VECTORP (fun)) fun 2160 src/eval.c else if (!CONSP (fun)) fun 2164 src/eval.c Lisp_Object funcar = XCAR (fun); fun 2167 src/eval.c if (!NILP (Fcar (Fcdr (Fcdr (XCDR (fun)))))) fun 2172 src/eval.c Lisp_Object body = CDR_SAFE (XCDR (fun)); fun 2189 src/eval.c fun = function; fun 2190 src/eval.c while (SYMBOLP (fun)) fun 2192 src/eval.c Lisp_Object tmp = Fget (fun, Qinteractive_form); fun 2195 src/eval.c fun = Fsymbol_function (fun); fun 2203 src/eval.c Lisp_Object iform = call1 (Qinteractive_form, fun); fun 2339 src/eval.c Lisp_Object fun = Findirect_function (funname, Qnil); fun 2341 src/eval.c if (!NILP (Fequal (fun, fundef))) fun 2346 src/eval.c return fun; fun 2423 src/eval.c Lisp_Object fun, val, funcar; fun 2431 src/eval.c fun = original_fun; fun 2432 src/eval.c if (!SYMBOLP (fun)) fun 2433 src/eval.c fun = Ffunction (list1 (fun)); fun 2434 src/eval.c else if (!NILP (fun) && (fun = XSYMBOL (fun)->u.s.function, SYMBOLP (fun))) fun 2435 src/eval.c fun = indirect_function (fun); fun 2437 src/eval.c if (SUBRP (fun) && !SUBR_NATIVE_COMPILED_DYNP (fun)) fun 2442 src/eval.c if (numargs < XSUBR (fun)->min_args fun 2443 src/eval.c || (XSUBR (fun)->max_args >= 0 fun 2444 src/eval.c && XSUBR (fun)->max_args < numargs)) fun 2448 src/eval.c else if (XSUBR (fun)->max_args == UNEVALLED) fun 2449 src/eval.c val = (XSUBR (fun)->function.aUNEVALLED) (args_left); fun 2450 src/eval.c else if (XSUBR (fun)->max_args == MANY fun 2451 src/eval.c || XSUBR (fun)->max_args > 8) fun 2470 src/eval.c val = XSUBR (fun)->function.aMANY (argnum, vals); fun 2482 src/eval.c int i, maxargs = XSUBR (fun)->max_args; fun 2495 src/eval.c val = (XSUBR (fun)->function.a0 ()); fun 2498 src/eval.c val = (XSUBR (fun)->function.a1 (argvals[0])); fun 2501 src/eval.c val = (XSUBR (fun)->function.a2 (argvals[0], argvals[1])); fun 2504 src/eval.c val = (XSUBR (fun)->function.a3 fun 2508 src/eval.c val = (XSUBR (fun)->function.a4 fun 2512 src/eval.c val = (XSUBR (fun)->function.a5 fun 2517 src/eval.c val = (XSUBR (fun)->function.a6 fun 2522 src/eval.c val = (XSUBR (fun)->function.a7 fun 2528 src/eval.c val = (XSUBR (fun)->function.a8 fun 2542 src/eval.c else if (COMPILEDP (fun) fun 2543 src/eval.c || SUBR_NATIVE_COMPILED_DYNP (fun) fun 2544 src/eval.c || MODULE_FUNCTIONP (fun)) fun 2545 src/eval.c return apply_lambda (fun, original_args, count); fun 2548 src/eval.c if (NILP (fun)) fun 2550 src/eval.c if (!CONSP (fun)) fun 2552 src/eval.c funcar = XCAR (fun); fun 2557 src/eval.c Fautoload_do_load (fun, original_fun, Qnil); fun 2582 src/eval.c exp = apply1 (Fcdr (fun), original_args); fun 2588 src/eval.c return apply_lambda (fun, original_args, count); fun 2613 src/eval.c Lisp_Object fun = args[0]; fun 2629 src/eval.c if (SYMBOLP (fun) && !NILP (fun) fun 2630 src/eval.c && (fun = XSYMBOL (fun)->u.s.function, SYMBOLP (fun))) fun 2632 src/eval.c fun = indirect_function (fun); fun 2633 src/eval.c if (NILP (fun)) fun 2635 src/eval.c fun = args[0]; fun 2638 src/eval.c if (SUBRP (fun) && XSUBR (fun)->max_args > numargs fun 2640 src/eval.c && numargs >= XSUBR (fun)->min_args) fun 2644 src/eval.c SAFE_ALLOCA_LISP (funcall_args, 1 + XSUBR (fun)->max_args); fun 2646 src/eval.c (XSUBR (fun)->max_args - numargs) * word_size); fun 2647 src/eval.c funcall_nargs = 1 + XSUBR (fun)->max_args; fun 2932 src/eval.c funcall_general (Lisp_Object fun, ptrdiff_t numargs, Lisp_Object *args) fun 2934 src/eval.c Lisp_Object original_fun = fun; fun 2936 src/eval.c if (SYMBOLP (fun) && !NILP (fun) fun 2937 src/eval.c && (fun = XSYMBOL (fun)->u.s.function, SYMBOLP (fun))) fun 2938 src/eval.c fun = indirect_function (fun); fun 2940 src/eval.c if (SUBRP (fun) && !SUBR_NATIVE_COMPILED_DYNP (fun)) fun 2941 src/eval.c return funcall_subr (XSUBR (fun), numargs, args); fun 2942 src/eval.c else if (COMPILEDP (fun) fun 2943 src/eval.c || SUBR_NATIVE_COMPILED_DYNP (fun) fun 2944 src/eval.c || MODULE_FUNCTIONP (fun)) fun 2945 src/eval.c return funcall_lambda (fun, numargs, args); fun 2948 src/eval.c if (NILP (fun)) fun 2950 src/eval.c if (!CONSP (fun)) fun 2952 src/eval.c Lisp_Object funcar = XCAR (fun); fun 2957 src/eval.c return funcall_lambda (fun, numargs, args); fun 2960 src/eval.c Fautoload_do_load (fun, original_fun, Qnil); fun 2961 src/eval.c fun = original_fun; fun 3063 src/eval.c Lisp_Object fun; fun 3064 src/eval.c XSETSUBR (fun, subr); fun 3066 src/eval.c xsignal1 (Qinvalid_function, fun); fun 3068 src/eval.c xsignal2 (Qwrong_number_of_arguments, fun, make_fixnum (numargs)); fun 3075 src/eval.c fetch_and_exec_byte_code (Lisp_Object fun, ptrdiff_t args_template, fun 3078 src/eval.c if (CONSP (AREF (fun, COMPILED_BYTECODE))) fun 3079 src/eval.c Ffetch_bytecode (fun); fun 3081 src/eval.c return exec_byte_code (fun, args_template, nargs, args); fun 3085 src/eval.c apply_lambda (Lisp_Object fun, Lisp_Object args, specpdl_ref count) fun 3103 src/eval.c tem = funcall_lambda (fun, numargs, arg_vector); fun 3120 src/eval.c funcall_lambda (Lisp_Object fun, ptrdiff_t nargs, fun 3128 src/eval.c if (CONSP (fun)) fun 3130 src/eval.c if (EQ (XCAR (fun), Qclosure)) fun 3132 src/eval.c Lisp_Object cdr = XCDR (fun); /* Drop `closure'. */ fun 3134 src/eval.c xsignal1 (Qinvalid_function, fun); fun 3135 src/eval.c fun = cdr; fun 3136 src/eval.c lexenv = XCAR (fun); fun 3140 src/eval.c syms_left = XCDR (fun); fun 3144 src/eval.c xsignal1 (Qinvalid_function, fun); fun 3146 src/eval.c else if (COMPILEDP (fun)) fun 3148 src/eval.c syms_left = AREF (fun, COMPILED_ARGLIST); fun 3153 src/eval.c return fetch_and_exec_byte_code (fun, XFIXNUM (syms_left), fun 3161 src/eval.c else if (MODULE_FUNCTIONP (fun)) fun 3162 src/eval.c return funcall_module (fun, nargs, arg_vector); fun 3165 src/eval.c else if (SUBR_NATIVE_COMPILED_DYNP (fun)) fun 3167 src/eval.c syms_left = XSUBR (fun)->lambda_list; fun 3182 src/eval.c xsignal1 (Qinvalid_function, fun); fun 3187 src/eval.c xsignal1 (Qinvalid_function, fun); fun 3194 src/eval.c xsignal1 (Qinvalid_function, fun); fun 3208 src/eval.c xsignal2 (Qwrong_number_of_arguments, fun, make_fixnum (nargs)); fun 3224 src/eval.c xsignal1 (Qinvalid_function, fun); fun 3226 src/eval.c xsignal2 (Qwrong_number_of_arguments, fun, make_fixnum (nargs)); fun 3232 src/eval.c if (CONSP (fun)) fun 3233 src/eval.c val = Fprogn (XCDR (XCDR (fun))); fun 3234 src/eval.c else if (SUBR_NATIVE_COMPILEDP (fun)) fun 3236 src/eval.c eassert (SUBR_NATIVE_COMPILED_DYNP (fun)); fun 3239 src/eval.c val = XSUBR (fun)->function.a0 (); fun 3242 src/eval.c val = fetch_and_exec_byte_code (fun, 0, 0, NULL); fun 3308 src/eval.c lambda_arity (Lisp_Object fun) fun 3312 src/eval.c if (CONSP (fun)) fun 3314 src/eval.c if (EQ (XCAR (fun), Qclosure)) fun 3316 src/eval.c fun = XCDR (fun); /* Drop `closure'. */ fun 3317 src/eval.c CHECK_CONS (fun); fun 3319 src/eval.c syms_left = XCDR (fun); fun 3323 src/eval.c xsignal1 (Qinvalid_function, fun); fun 3325 src/eval.c else if (COMPILEDP (fun)) fun 3327 src/eval.c syms_left = AREF (fun, COMPILED_ARGLIST); fun 3340 src/eval.c xsignal1 (Qinvalid_function, fun); fun 3355 src/eval.c xsignal1 (Qinvalid_function, fun); fun 1847 src/keyboard.c Lisp_Object fun = args[1]; fun 1848 src/keyboard.c CALLN (Fmessage, format, hook, fun, error); fun 1856 src/keyboard.c if (EQ (fun, XCAR (val))) fun 1867 src/keyboard.c if (EQ (fun, XCAR (val))) fun 1883 src/keyboard.c Lisp_Object fun = args[0], hook = args[1]; fun 1891 src/keyboard.c newargs[0] = hook, newargs[1] = fun; fun 504 src/keymap.c map_keymap_item (map_keymap_function_t fun, Lisp_Object args, Lisp_Object key, Lisp_Object val, void *data) fun 508 src/keymap.c (*fun) (key, val, args, data); fun 515 src/keymap.c map_keymap_function_t fun; fun 533 src/keymap.c map_keymap_item (md->s.fun, md->s.args, key, val, md->s.data); fun 541 src/keymap.c map_keymap_function_t fun, fun 555 src/keymap.c map_keymap_item (fun, args, XCAR (binding), XCDR (binding), data); fun 565 src/keymap.c map_keymap_item (fun, args, character, AREF (binding, c), data); fun 570 src/keymap.c union map_keymap mapdata = {{fun, args, data}}; fun 580 src/keymap.c map_keymap_call (Lisp_Object key, Lisp_Object val, Lisp_Object fun, void *dummy) fun 582 src/keymap.c call2 (fun, key, val); fun 588 src/keymap.c map_keymap (Lisp_Object map, map_keymap_function_t fun, Lisp_Object args, fun 596 src/keymap.c map_keymap (XCAR (map), fun, args, data, autoload); fun 600 src/keymap.c map = map_keymap_internal (map, fun, args, data); fun 609 src/keymap.c map_keymap_canonical (Lisp_Object map, map_keymap_function_t fun, Lisp_Object args, void *data) fun 615 src/keymap.c map_keymap_internal (map, fun, args, data); fun 3035 src/keymap.c describe_vector_princ (Lisp_Object elt, Lisp_Object fun) fun 3038 src/keymap.c call1 (fun, elt); fun 3043 src/keymap.c describe_vector_basic (Lisp_Object elt, Lisp_Object fun) fun 3045 src/keymap.c call1 (fun, elt); fun 48 src/keymap.h map_keymap_function_t fun, fun 4622 src/lisp.h Lisp_Object funcall_general (Lisp_Object fun, fun 43 src/nsxwidget.h Lisp_Object fun); fun 305 src/print.c printchar (unsigned int ch, Lisp_Object fun) fun 307 src/print.c if (!NILP (fun) && !EQ (fun, Qt)) fun 308 src/print.c call1 (fun, make_fixnum (ch)); fun 316 src/print.c if (NILP (fun)) fun 921 src/sort.c Lisp_Object fun = XSYMBOL (predicate)->u.s.function; fun 922 src/sort.c if (SYMBOLP (fun)) fun 924 src/sort.c fun = indirect_function (fun); fun 926 src/sort.c if (!NILP (fun) && !(CONSP (fun) && EQ (XCAR (fun), Qautoload))) fun 927 src/sort.c predicate = fun; fun 3176 src/xwidget.c save_script_callback (struct xwidget *xw, Lisp_Object script, Lisp_Object fun) fun 3191 src/xwidget.c ASET (cbs, idx, Fcons (make_mint_ptr (xlispstrdup (script)), fun)); fun 3202 src/xwidget.c (Lisp_Object xwidget, Lisp_Object script, Lisp_Object fun) fun 3206 src/xwidget.c if (!NILP (fun) && !FUNCTIONP (fun)) fun 3207 src/xwidget.c wrong_type_argument (Qinvalid_function, fun); fun 3213 src/xwidget.c intptr_t idx = save_script_callback (xw, script, fun); fun 3226 src/xwidget.c nsxwidget_webkit_execute_script (xw, SSDATA (script), fun); fun 1846 test/manual/etags/c-src/emacs/src/keyboard.c Lisp_Object fun = args[1]; fun 1847 test/manual/etags/c-src/emacs/src/keyboard.c CALLN (Fmessage, format, hook, fun, error); fun 1855 test/manual/etags/c-src/emacs/src/keyboard.c if (EQ (fun, XCAR (val))) fun 1867 test/manual/etags/c-src/emacs/src/keyboard.c if (EQ (fun, XCAR (val))) fun 612 test/src/emacs-module-resources/mod-test.c emacs_value fun fun 614 test/src/emacs-module-resources/mod-test.c env->set_function_finalizer (env, fun, finalizer); fun 615 test/src/emacs-module-resources/mod-test.c if (env->get_function_finalizer (env, fun) != finalizer) fun 617 test/src/emacs-module-resources/mod-test.c return fun;