diff options
Diffstat (limited to 'include')
| -rw-r--r-- | include/edit.hrl | 48 |
1 files changed, 48 insertions, 0 deletions
diff --git a/include/edit.hrl b/include/edit.hrl new file mode 100644 index 0000000..2d7bcd5 --- /dev/null +++ b/include/edit.hrl @@ -0,0 +1,48 @@ +%% -*- comment-column: 33 -*- + +-ifndef(_EDIT_HRL). +-define(_EDIT_HRL, true). + +-define(debug(F, A), + io:format("[~s:~p] " ++ F, [?MODULE, ?LINE | A]) + ). + +%% To use the GTK terminal, use the following definition. +%% Requires that you have erlgtk and gterm in your path. +%%-define(EDIT_TERMINAL, edit_terminal_gterm). +-define(EDIT_TERMINAL, edit_terminal). + +-record(state, + {curwin, % current window + windows=[], % other windows + buffers=[], % list of buffers, most recently used at head + lastcmd, % {M, F, A} of the last command executed + %% for edit_extended + pending_cmd, + pending_win + }). + +%% Window: an area of the display used for viewing a particular +%% buffer, just like an emacs window. +-record(window, + {buffer, % buffer being viewed + y, % screen row that this window starts at + width, % width in characters + height, % height in characters + start_mark, % mark on start of display (unique to window) + goal_column=0, + active=true, + id, % ref() - unique id + minibuffer=false, + %% fields just for the minibuffer + status_text, + prefix="" + }). + +-record(mode, {name, % string + id, % atom + keymaps}). + +-define(EOL_CHAR, $$). % Character to indicate the line is chopped + +-endif. |