1 #if defined(EMACSFN_DEFNS) 2 __RCSID("$MirOS: src/bin/mksh/emacsfn.h,v 1.5 2010/07/17 22:09:33 tg Exp $"); 3 #define FN(cname,sname,flags) static int x_##cname(int); 4 #elif defined(EMACSFN_ENUMS) 5 #define FN(cname,sname,flags) XFUNC_##cname, 6 #define F0(cname,sname,flags) XFUNC_##cname = 0, 7 #elif defined(EMACSFN_ITEMS) 8 #define FN(cname,sname,flags) { x_##cname, sname, flags }, 9 #endif 10 11 #ifndef F0 12 #define F0 FN 13 #endif 14 15 F0(abort, "abort", 0) 16 FN(beg_hist, "beginning-of-history", 0) 17 FN(cls, "clear-screen", 0) 18 FN(comment, "comment", 0) 19 FN(comp_comm, "complete-command", 0) 20 FN(comp_file, "complete-file", 0) 21 FN(comp_list, "complete-list", 0) 22 FN(complete, "complete", 0) 23 FN(del_back, "delete-char-backward", XF_ARG) 24 FN(del_bword, "delete-word-backward", XF_ARG) 25 FN(del_char, "delete-char-forward", XF_ARG) 26 FN(del_fword, "delete-word-forward", XF_ARG) 27 FN(del_line, "kill-line", 0) 28 FN(draw_line, "redraw", 0) 29 #ifndef MKSH_SMALL 30 FN(edit_line, "edit-line", XF_ARG) 31 #endif 32 FN(end_hist, "end-of-history", 0) 33 FN(end_of_text, "eot", 0) 34 FN(enumerate, "list", 0) 35 FN(eot_del, "eot-or-delete", XF_ARG) 36 FN(error, "error", 0) 37 FN(expand, "expand-file", 0) 38 #ifndef MKSH_SMALL 39 FN(fold_capitalise, "capitalize-word", XF_ARG) 40 FN(fold_lower, "downcase-word", XF_ARG) 41 FN(fold_upper, "upcase-word", XF_ARG) 42 #endif 43 FN(goto_hist, "goto-history", XF_ARG) 44 #ifndef MKSH_SMALL 45 FN(ins_string, "macro-string", XF_NOBIND) 46 #endif 47 FN(insert, "auto-insert", XF_ARG) 48 FN(kill, "kill-to-eol", XF_ARG) 49 FN(kill_region, "kill-region", 0) 50 FN(list_comm, "list-command", 0) 51 FN(list_file, "list-file", 0) 52 FN(literal, "quote", 0) 53 FN(meta1, "prefix-1", XF_PREFIX) 54 FN(meta2, "prefix-2", XF_PREFIX) 55 FN(meta_yank, "yank-pop", 0) 56 FN(mv_back, "backward-char", XF_ARG) 57 FN(mv_begin, "beginning-of-line", 0) 58 FN(mv_bword, "backward-word", XF_ARG) 59 FN(mv_end, "end-of-line", 0) 60 FN(mv_forw, "forward-char", XF_ARG) 61 FN(mv_fword, "forward-word", XF_ARG) 62 FN(newline, "newline", 0) 63 FN(next_com, "down-history", XF_ARG) 64 FN(nl_next_com, "newline-and-next", 0) 65 FN(noop, "no-op", 0) 66 FN(prev_com, "up-history", XF_ARG) 67 FN(prev_histword, "prev-hist-word", XF_ARG) 68 FN(search_char_back, "search-character-backward", XF_ARG) 69 FN(search_char_forw, "search-character-forward", XF_ARG) 70 FN(search_hist, "search-history", 0) 71 #ifndef MKSH_SMALL 72 FN(search_hist_dn, "search-history-down", 0) 73 FN(search_hist_up, "search-history-up", 0) 74 #endif 75 FN(set_arg, "set-arg", XF_NOBIND) 76 FN(set_mark, "set-mark-command", 0) 77 FN(transpose, "transpose-chars", 0) 78 FN(version, "version", 0) 79 #ifndef MKSH_SMALL 80 FN(vt_hack, "vt100-hack", XF_ARG) 81 #endif 82 FN(xchg_point_mark, "exchange-point-and-mark", 0) 83 FN(yank, "yank", 0) 84 85 #undef FN 86 #undef F0 87 #undef EMACSFN_DEFNS 88 #undef EMACSFN_ENUMS 89 #undef EMACSFN_ITEMS 90