aboutsummaryrefslogtreecommitdiff
path: root/elisp.c
diff options
context:
space:
mode:
authorjixiuf <jixiuf@qq.com>2020-02-03 21:22:07 +0800
committerjixiuf <jixiuf@qq.com>2020-02-03 22:03:22 +0800
commit8fbc00a4ca193c66a8880198cd3872e9955ed697 (patch)
treec6d2414eadf0d2be2dd83871ecf5ef679560a07e /elisp.c
parentd80c3934ad946055a30905a5aaa4d4f6dbb452e3 (diff)
Revert "fix adjust_topline fix #222"
This reverts commit 855976e2283551db53617d4abb4c1399579a560d.
Diffstat (limited to 'elisp.c')
-rw-r--r--elisp.c9
1 files changed, 2 insertions, 7 deletions
diff --git a/elisp.c b/elisp.c
index 9541728..1a6021a 100644
--- a/elisp.c
+++ b/elisp.c
@@ -55,7 +55,8 @@ void insert(emacs_env *env, emacs_value string) {
env->funcall(env, Finsert, 1, (emacs_value[]){string});
}
-void goto_char(emacs_env *env, emacs_value point) {
+void goto_char(emacs_env *env, int pos) {
+ emacs_value point = env->make_integer(env, pos);
env->funcall(env, Fgoto_char, 1, (emacs_value[]){point});
}
@@ -85,12 +86,6 @@ 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});
}
-void set_window_start(emacs_env *env, emacs_value win, emacs_value point) {
- env->funcall(env, Fset_window_start, 2, (emacs_value[]){win, point});
-}
-emacs_value window_body_height(emacs_env *env, emacs_value win) {
- return env->funcall(env, Fwindow_body_height, 1, (emacs_value[]){win});
-}
bool eq(emacs_env *env, emacs_value e1, emacs_value e2) {
emacs_value Qeq = env->funcall(env, Feq, 2, (emacs_value[]){e1, e2});