Home | History | Annotate | Download | only in src
      1 /*-
      2  * Copyright (c) 2009, 2010, 2015
      3  *	mirabilos <m (at) mirbsd.org>
      4  *
      5  * Provided that these terms and disclaimer and all copyright notices
      6  * are retained or reproduced in an accompanying document, permission
      7  * is granted to deal in this work without restriction, including un-
      8  * limited rights to use, publicly perform, distribute, sell, modify,
      9  * merge, give away, or sublicence.
     10  *
     11  * This work is provided "AS IS" and WITHOUT WARRANTY of any kind, to
     12  * the utmost extent permitted by applicable law, neither express nor
     13  * implied; without malicious intent or gross negligence. In no event
     14  * may a licensor, author or contributor be held liable for indirect,
     15  * direct, other damage, loss, or other issues arising in any way out
     16  * of dealing in the work, even if advised of the possibility of such
     17  * damage or existence of a defect, except proven that it results out
     18  * of said person's immediate fault when using the work as intended.
     19  */
     20 
     21 #if defined(EMACSFN_DEFNS)
     22 __RCSID("$MirOS: src/bin/mksh/emacsfn.h,v 1.7 2015/12/12 21:08:44 tg Exp $");
     23 #define FN(cname,sname,flags)	static int x_##cname(int);
     24 #elif defined(EMACSFN_ENUMS)
     25 #define FN(cname,sname,flags)	XFUNC_##cname,
     26 #define F0(cname,sname,flags)	XFUNC_##cname = 0,
     27 #elif defined(EMACSFN_ITEMS)
     28 #define FN(cname,sname,flags)	{ x_##cname, sname, flags },
     29 #endif
     30 
     31 #ifndef F0
     32 #define F0 FN
     33 #endif
     34 
     35 F0(abort, "abort", 0)
     36 FN(beg_hist, "beginning-of-history", 0)
     37 FN(cls, "clear-screen", 0)
     38 FN(comment, "comment", 0)
     39 FN(comp_comm, "complete-command", 0)
     40 FN(comp_file, "complete-file", 0)
     41 FN(comp_list, "complete-list", 0)
     42 FN(complete, "complete", 0)
     43 FN(del_back, "delete-char-backward", XF_ARG)
     44 FN(del_bword, "delete-word-backward", XF_ARG)
     45 FN(del_char, "delete-char-forward", XF_ARG)
     46 FN(del_fword, "delete-word-forward", XF_ARG)
     47 FN(del_line, "kill-line", 0)
     48 FN(draw_line, "redraw", 0)
     49 #ifndef MKSH_SMALL
     50 FN(edit_line, "edit-line", XF_ARG)
     51 #endif
     52 FN(end_hist, "end-of-history", 0)
     53 FN(end_of_text, "eot", 0)
     54 FN(enumerate, "list", 0)
     55 FN(eot_del, "eot-or-delete", XF_ARG)
     56 FN(error, "error", 0)
     57 FN(expand, "expand-file", 0)
     58 #ifndef MKSH_SMALL
     59 FN(fold_capitalise, "capitalize-word", XF_ARG)
     60 FN(fold_lower, "downcase-word", XF_ARG)
     61 FN(fold_upper, "upcase-word", XF_ARG)
     62 #endif
     63 FN(goto_hist, "goto-history", XF_ARG)
     64 #ifndef MKSH_SMALL
     65 FN(ins_string, "macro-string", XF_NOBIND)
     66 #endif
     67 FN(insert, "auto-insert", XF_ARG)
     68 FN(kill, "kill-to-eol", XF_ARG)
     69 FN(kill_region, "kill-region", 0)
     70 FN(list_comm, "list-command", 0)
     71 FN(list_file, "list-file", 0)
     72 FN(literal, "quote", 0)
     73 FN(meta1, "prefix-1", XF_PREFIX)
     74 FN(meta2, "prefix-2", XF_PREFIX)
     75 FN(meta3, "prefix-3", XF_PREFIX)
     76 FN(meta_yank, "yank-pop", 0)
     77 FN(mv_back, "backward-char", XF_ARG)
     78 FN(mv_begin, "beginning-of-line", 0)
     79 FN(mv_bword, "backward-word", XF_ARG)
     80 FN(mv_end, "end-of-line", 0)
     81 FN(mv_forw, "forward-char", XF_ARG)
     82 FN(mv_fword, "forward-word", XF_ARG)
     83 FN(newline, "newline", 0)
     84 FN(next_com, "down-history", XF_ARG)
     85 FN(nl_next_com, "newline-and-next", 0)
     86 FN(noop, "no-op", 0)
     87 FN(prev_com, "up-history", XF_ARG)
     88 FN(prev_histword, "prev-hist-word", XF_ARG)
     89 FN(search_char_back, "search-character-backward", XF_ARG)
     90 FN(search_char_forw, "search-character-forward", XF_ARG)
     91 FN(search_hist, "search-history", 0)
     92 #ifndef MKSH_SMALL
     93 FN(search_hist_dn, "search-history-down", 0)
     94 FN(search_hist_up, "search-history-up", 0)
     95 #endif
     96 FN(set_arg, "set-arg", XF_NOBIND)
     97 FN(set_mark, "set-mark-command", 0)
     98 FN(transpose, "transpose-chars", 0)
     99 FN(version, "version", 0)
    100 #ifndef MKSH_SMALL
    101 FN(vt_hack, "vt100-hack", XF_ARG)
    102 #endif
    103 FN(xchg_point_mark, "exchange-point-and-mark", 0)
    104 FN(yank, "yank", 0)
    105 
    106 #undef FN
    107 #undef F0
    108 #undef EMACSFN_DEFNS
    109 #undef EMACSFN_ENUMS
    110 #undef EMACSFN_ITEMS
    111