1 files changed, 6 insertions, 0 deletions
diff --git a/elisp.c b/elisp.c
index 30e8a52..5cb5bdf 100644
--- a/elisp.c
+++ b/elisp.c
@@ -77,6 +77,12 @@ void delete_lines(emacs_env *env, int linenum, int count, bool del_whole_line) {
 void recenter(emacs_env *env, emacs_value pos) {
   env->funcall(env, Frecenter, 1, (emacs_value[]){pos});
 }
+emacs_value point(emacs_env *env) { return env->funcall(env, Fpoint, 0, NULL); }
+
+void set_window_point(emacs_env *env, emacs_value win, emacs_value point) {
+  env->funcall(env, Fset_window_point, 2, (emacs_value[]){win, point});
+}
+
 bool eq(emacs_env *env, emacs_value e1, emacs_value e2) {
   emacs_value Qeq = env->funcall(env, Feq, 2, (emacs_value[]){e1, e2});
   return env->is_not_nil(env, Qeq);