src/emacsfn.h

   1 /*-
   2  * Copyright (c) 2009, 2010, 2015, 2016
   3  *      mirabilos <m@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.10 2016/09/01 12:59:09 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 #ifndef MKSH_SMALL
  58 FN(eval_region, "evaluate-region", 0)
  59 #endif
  60 FN(expand, "expand-file", 0)
  61 #ifndef MKSH_SMALL
  62 FN(fold_capitalise, "capitalize-word", XF_ARG)
  63 FN(fold_lower, "downcase-word", XF_ARG)
  64 FN(fold_upper, "upcase-word", XF_ARG)
  65 #endif
  66 FN(goto_hist, "goto-history", XF_ARG)
  67 #ifndef MKSH_SMALL
  68 FN(ins_string, "macro-string", XF_NOBIND)
  69 #endif
  70 FN(insert, "auto-insert", XF_ARG)
  71 FN(kill, "kill-to-eol", XF_ARG)
  72 FN(kill_region, "kill-region", 0)
  73 FN(list_comm, "list-command", 0)
  74 FN(list_file, "list-file", 0)
  75 FN(literal, "quote", 0)
  76 FN(meta1, "prefix-1", XF_PREFIX)
  77 FN(meta2, "prefix-2", XF_PREFIX)
  78 FN(meta3, "prefix-3", XF_PREFIX)
  79 FN(meta_yank, "yank-pop", 0)
  80 FN(mv_back, "backward-char", XF_ARG)
  81 FN(mv_beg, "beginning-of-line", 0)
  82 FN(mv_bword, "backward-word", XF_ARG)
  83 FN(mv_end, "end-of-line", 0)
  84 FN(mv_forw, "forward-char", XF_ARG)
  85 FN(mv_fword, "forward-word", XF_ARG)
  86 FN(newline, "newline", 0)
  87 FN(next_com, "down-history", XF_ARG)
  88 FN(nl_next_com, "newline-and-next", 0)
  89 FN(noop, "no-op", 0)
  90 FN(prev_com, "up-history", XF_ARG)
  91 FN(prev_histword, "prev-hist-word", XF_ARG)
  92 FN(search_char_back, "search-character-backward", XF_ARG)
  93 FN(search_char_forw, "search-character-forward", XF_ARG)
  94 FN(search_hist, "search-history", 0)
  95 #ifndef MKSH_SMALL
  96 FN(search_hist_dn, "search-history-down", 0)
  97 FN(search_hist_up, "search-history-up", 0)
  98 #endif
  99 FN(set_arg, "set-arg", XF_NOBIND)
 100 FN(set_mark, "set-mark-command", 0)
 101 FN(transpose, "transpose-chars", 0)
 102 FN(version, "version", 0)
 103 #ifndef MKSH_SMALL
 104 FN(vt_hack, "vt100-hack", XF_ARG)
 105 #endif
 106 FN(xchg_point_mark, "exchange-point-and-mark", 0)
 107 FN(yank, "yank", 0)
 108
 109 #undef FN
 110 #undef F0
 111 #undef EMACSFN_DEFNS
 112 #undef EMACSFN_ENUMS
 113 #undef EMACSFN_ITEMS