| [9] | 1 | ;;;
|
|---|
| 2 | ;;; ELLE Master Function Definition file - "deffun.e"
|
|---|
| 3 | ;;;
|
|---|
| 4 | ;;; This file serves as input to the ellec program. It defines
|
|---|
| 5 | ;;; all ELLE functions which may serve as keyboard-bound user commands.
|
|---|
| 6 | ;;;
|
|---|
| 7 | ;;; Format: (efun <Index> <Name> <Routine> <Module>)
|
|---|
| 8 | ;;; Index - an unique index # (used only within ELLE)
|
|---|
| 9 | ;;; Name - an unique string identifying this function to the user.
|
|---|
| 10 | ;;; Routine - the C routine implementing the function within ELLE.
|
|---|
| 11 | ;;; Module - the name of the C source file that the routine is in.
|
|---|
| 12 | ;;;
|
|---|
| 13 | ;;; The following definitions are roughly organized by object.
|
|---|
| 14 | ;;; All functions that emulate EMACS functions are given names identical
|
|---|
| 15 | ;;; to the EMACS function names. For historical reasons these names
|
|---|
| 16 | ;;; are not as consistent as they could be (sigh).
|
|---|
| 17 | ;;; Those which have no exact counterpart in EMACS are identified by comments.
|
|---|
| 18 |
|
|---|
| 19 | (undefall) ; Ensure all predefined stuff is cleared out.
|
|---|
| 20 |
|
|---|
| 21 | ; Simple Insertion
|
|---|
| 22 | (efun 1 "Insert Self" f_insself eef1)
|
|---|
| 23 | (efun 2 "Quoted Insert" f_quotins eef1)
|
|---|
| 24 | (efun 3 "CRLF" f_crlf eef1)
|
|---|
| 25 |
|
|---|
| 26 | ; Characters
|
|---|
| 27 | (efun 4 "Forward Character" f_fchar eef1)
|
|---|
| 28 | (efun 5 "Backward Character" f_bchar eef1)
|
|---|
| 29 | (efun 6 "Delete Character" f_dchar eef1)
|
|---|
| 30 | (efun 7 "Backward Delete Character" f_bdchar eef1)
|
|---|
| 31 | (efun 8 "Delete Horizontal Space" f_delspc eef1)
|
|---|
| 32 | (efun 9 "Transpose Characters" f_tchars eef1)
|
|---|
| 33 |
|
|---|
| 34 | ; Words
|
|---|
| 35 | (efun 10 "Forward Word" f_fword eef1)
|
|---|
| 36 | (efun 11 "Backward Word" f_bword eef1)
|
|---|
| 37 | (efun 12 "Kill Word" f_kword eef1)
|
|---|
| 38 | (efun 13 "Backward Kill Word" f_bkword eef1)
|
|---|
| 39 | (efun 14 "Transpose Words" f_twords eef1)
|
|---|
| 40 | (efun 15 "Uppercase Word" f_ucword eef1)
|
|---|
| 41 | (efun 16 "Lowercase Word" f_lcword eef1)
|
|---|
| 42 | (efun 17 "Uppercase Initial" f_uciword eef1)
|
|---|
| 43 | ; 18-19 reserved
|
|---|
| 44 |
|
|---|
| 45 | ; Lines
|
|---|
| 46 | (efun 20 "Beginning of Line" f_begline eef2)
|
|---|
| 47 | (efun 21 "End of Line" f_endline eef2)
|
|---|
| 48 | (efun 22 "Next Line" f_nxtline eef2)
|
|---|
| 49 | (efun 23 "Previous Line" f_prvline eef2)
|
|---|
| 50 | (efun 24 "Down Real Line" f_dnrline eef2)
|
|---|
| 51 | (efun 25 "Up Real Line" f_uprline eef2)
|
|---|
| 52 | (efun 26 "Open Line" f_oline eef2)
|
|---|
| 53 | (efun 27 "Delete Blank Lines" f_delblines eef2)
|
|---|
| 54 | (efun 28 "Kill Line" f_kline eef2)
|
|---|
| 55 | (efun 29 "Backward Kill Line" f_bkline eef2) ; not EMACS
|
|---|
| 56 | (efun 30 "Goto Line" f_goline eef2) ; not EMACS
|
|---|
| 57 | ; 31-34 reserved
|
|---|
| 58 |
|
|---|
| 59 | ; Regions
|
|---|
| 60 | (efun 35 "Set/Pop Mark" f_setmark eef2)
|
|---|
| 61 | (efun 36 "Exchange Point and Mark" f_exchmark eef2)
|
|---|
| 62 | (efun 37 "Kill Region" f_kregion eef2)
|
|---|
| 63 | (efun 38 "Copy Region" f_copreg eef2)
|
|---|
| 64 | (efun 39 "Uppercase Region" f_ucreg eef2)
|
|---|
| 65 | (efun 40 "Lowercase Region" f_lcreg eef2)
|
|---|
| 66 | (efun 41 "Fill Region" f_fillreg eef2)
|
|---|
| 67 | ; 42-44 reserved
|
|---|
| 68 |
|
|---|
| 69 | ; Paragraphs
|
|---|
| 70 | (efun 45 "Forward Paragraph" f_fpara eef2)
|
|---|
| 71 | (efun 46 "Backward Paragraph" f_bpara eef2)
|
|---|
| 72 | (efun 47 "Mark Paragraph" f_mrkpara eef2)
|
|---|
| 73 | (efun 48 "Fill Paragraph" f_fillpara eef2)
|
|---|
| 74 | ; 49 reserved
|
|---|
| 75 |
|
|---|
| 76 | ; Buffers
|
|---|
| 77 | (efun 50 "Select Buffer" f_selbuffer eebuff)
|
|---|
| 78 | (efun 51 "Select Existing Buffer" f_selxbuffer eebuff) ; not EMACS
|
|---|
| 79 | (efun 52 "Kill Buffer" f_kbuffer eebuff)
|
|---|
| 80 | (efun 53 "List Buffers" f_listbufs eebuff)
|
|---|
| 81 | (efun 54 "Buffer Not Modified" f_bufnotmod eebuff)
|
|---|
| 82 | (efun 55 "EOL CRLF Mode" f_eolmode eebuff) ; ELLE
|
|---|
| 83 | (efun 56 "Goto Beginning" f_gobeg eebuff)
|
|---|
| 84 | (efun 57 "Goto End" f_goend eebuff)
|
|---|
| 85 | (efun 58 "What Page" f_whatpage eebuff)
|
|---|
| 86 | ; 59 reserved
|
|---|
| 87 |
|
|---|
| 88 | ; Files
|
|---|
| 89 | (efun 60 "Find File" f_ffile eefile)
|
|---|
| 90 | (efun 61 "Read File" f_rfile eefile)
|
|---|
| 91 | (efun 62 "Visit File" f_vfile eefile)
|
|---|
| 92 | (efun 63 "Insert File" f_ifile eefile)
|
|---|
| 93 | (efun 64 "Save File" f_sfile eefile)
|
|---|
| 94 | (efun 65 "Save All Files" f_savefiles eebuff)
|
|---|
| 95 | (efun 66 "Write File" f_wfile eefile)
|
|---|
| 96 | (efun 67 "Write Region" f_wreg eefile)
|
|---|
| 97 | (efun 68 "Write Last Kill" f_wlastkill eefile) ; not EMACS
|
|---|
| 98 | ; 69 reserved
|
|---|
| 99 |
|
|---|
| 100 | ; Windows
|
|---|
| 101 | (efun 70 "Two Windows" f_2winds eebuff)
|
|---|
| 102 | (efun 71 "One Window" f_1wind eebuff)
|
|---|
| 103 | (efun 72 "Other Window" f_othwind eebuff)
|
|---|
| 104 | (efun 73 "Grow Window" f_growind eebuff)
|
|---|
| 105 | (efun 74 "Shrink Window" f_shrinkwind eebuff) ; not EMACS
|
|---|
| 106 | (efun 75 "Delete Window" f_delwind eebuff) ; not EMACS
|
|---|
| 107 | (efun 76 "Standout Window" f_sowind eebuff) ; ELLE
|
|---|
| 108 | (efun 77 "Two Mode Windows" f_2modewinds eebuff) ; ELLE
|
|---|
| 109 |
|
|---|
| 110 | ; Window Positioning
|
|---|
| 111 | (efun 78 "New Window" f_newwin eefd)
|
|---|
| 112 | (efun 79 "Next Screen" f_nscreen eefd)
|
|---|
| 113 | (efun 80 "Previous Screen" f_pscreen eefd)
|
|---|
| 114 | (efun 81 "Other New Screen" f_othnscreen eefd) ; not EMACS
|
|---|
| 115 | (efun 82 "Line to Window Border" f_lwindbord eefd) ; not EMACS
|
|---|
| 116 | (efun 83 "Scroll Window Up" f_scupwind eefd) ; not EMACS
|
|---|
| 117 | (efun 84 "Scroll Window Down" f_scdnwind eefd) ; not EMACS
|
|---|
| 118 | (efun 85 "Move to Window Top" f_mvwtop eefd) ; not EMACS
|
|---|
| 119 | (efun 86 "Move to Window Bottom" f_mvwbot eefd) ; not EMACS
|
|---|
| 120 | ; 87-89 reserved
|
|---|
| 121 |
|
|---|
| 122 | ; Command Input
|
|---|
| 123 | (efun 90 "Set Profile" f_setprof eecmds) ; ELLE
|
|---|
| 124 | (efun 91 "Prefix Meta" f_pfxmeta eecmds)
|
|---|
| 125 | (efun 92 "Prefix Extend" f_pfxext eecmds)
|
|---|
| 126 | (efun 93 "Universal Arg" f_uarg eecmds)
|
|---|
| 127 | (efun 94 "Negative Argument" f_negarg eecmds)
|
|---|
| 128 | (efun 95 "Argument Digit" f_argdig eecmds)
|
|---|
| 129 | (efun 96 "VT100 Button Hack" f_vtbuttons eecmds) ; not EMACS
|
|---|
| 130 |
|
|---|
| 131 | ; Help
|
|---|
| 132 | (efun 97 "Describe" f_describe eehelp)
|
|---|
| 133 | ; 98-99 reserved
|
|---|
| 134 |
|
|---|
| 135 | ; Keyboard Macros
|
|---|
| 136 | (efun 100 "Start Kbd Macro" f_skmac eekmac)
|
|---|
| 137 | (efun 101 "End Kbd Macro" f_ekmac eekmac)
|
|---|
| 138 | (efun 102 "Execute Kbd Macro" f_xkmac eekmac)
|
|---|
| 139 | (efun 103 "View Kbd Macro" f_vkmac eekmac)
|
|---|
| 140 | ; 104 reserved
|
|---|
| 141 |
|
|---|
| 142 | ; Killing
|
|---|
| 143 | (efun 105 "Un-kill" f_unkill eef3)
|
|---|
| 144 | (efun 106 "Un-kill Pop" f_unkpop eef3)
|
|---|
| 145 | (efun 107 "Append Next Kill" f_appnkill eef3)
|
|---|
| 146 | ; 108-109 reserved
|
|---|
| 147 |
|
|---|
| 148 | ; Searching
|
|---|
| 149 | (efun 110 "String Search" f_srch eesrch)
|
|---|
| 150 | (efun 111 "Reverse String Search" f_rsrch eesrch)
|
|---|
| 151 | (efun 112 "Incremental Search" f_isrch eesrch)
|
|---|
| 152 | (efun 113 "Reverse Search" f_risrch eesrch)
|
|---|
| 153 |
|
|---|
| 154 | ; Query Replace & friends
|
|---|
| 155 | (efun 114 "Replace String" f_repstr eequer)
|
|---|
| 156 | (efun 115 "Query Replace" f_querep eequer)
|
|---|
| 157 | (efun 116 "Replace in Line" f_repline eequer) ; not EMACS
|
|---|
| 158 |
|
|---|
| 159 | ; Fill Mode
|
|---|
| 160 | (efun 117 "Set Fill Column" f_sfcol eefill)
|
|---|
| 161 | (efun 118 "Set Fill Prefix" f_sfpref eefill)
|
|---|
| 162 | (efun 119 "Auto Fill Mode" f_fillmode eefill)
|
|---|
| 163 | (efun 120 "Text Mode" f_textmode eefill) ; IMAGEN
|
|---|
| 164 |
|
|---|
| 165 | ; Indentation
|
|---|
| 166 | (efun 121 "Indent According to Mode" f_indatm eef3)
|
|---|
| 167 | (efun 122 "Indent New Line" f_indnl eef3)
|
|---|
| 168 | (efun 123 "Back to Indentation" f_backind eef3)
|
|---|
| 169 | (efun 124 "Indent for Comment" f_indcomm eef3)
|
|---|
| 170 | (efun 125 "Indent Relative" f_indrel eef3)
|
|---|
| 171 | ; 126-128 reserved
|
|---|
| 172 |
|
|---|
| 173 | ; Miscellaneous
|
|---|
| 174 | (efun 129 "Match Bracket" f_matchbrack eef3) ; not EMACS
|
|---|
| 175 |
|
|---|
| 176 | ; Process Control
|
|---|
| 177 | (efun 130 "Push to Inferior" f_pshinf eemain)
|
|---|
| 178 | (efun 131 "Return to Superior" f_retsup eemain)
|
|---|
| 179 | (efun 132 "Write File Exit" f_wfexit eemain) ; not EMACS
|
|---|
| 180 | ; 133-139 reserved
|
|---|
| 181 |
|
|---|
| 182 | ; ELLE Debugging
|
|---|
| 183 | (efun 140 "Hit Breakpoint" f_bkpt eeerr) ; ELLE
|
|---|
| 184 | (efun 141 "Debug Mode" f_debug eediag) ; ELLE
|
|---|
| 185 | ; 142-149 reserved
|
|---|
| 186 | ;---------------------------------------------------------------
|
|---|
| 187 |
|
|---|
| 188 | ; IMAGEN configuration only
|
|---|
| 189 | (efun 150 "Execute Unix Command" f_xucmd eemake) ; IMAGEN
|
|---|
| 190 | (efun 151 "Execute Make" f_make eemake) ; IMAGEN
|
|---|
| 191 | (efun 152 "Find Next Error" f_nxterr eemake) ; IMAGEN
|
|---|
| 192 |
|
|---|
| 193 | ; ICONOGRAPHICS-specific
|
|---|
| 194 | (efun 153 "ICO Extend Command" f_icoxcmd eefico) ; ICONOGRAPHICS
|
|---|
| 195 | (efun 154 "ICO Typeset Funs" f_icotypfns eefico) ; ICONOGRAPHICS
|
|---|
| 196 | (efun 155 "ICO Spec Input Funs" f_icospifns eefico) ; ICONOGRAPHICS
|
|---|
| 197 |
|
|---|
| 198 | ; SUN Mouse functions
|
|---|
| 199 | (efun 156 "Stuff Selection" f_stuffsel eesun) ; SUN
|
|---|
| 200 | (efun 157 "Select Region" f_selregion eesun) ; SUN
|
|---|
| 201 |
|
|---|
