19 lines
563 B
Common Lisp
19 lines
563 B
Common Lisp
(in-package :de.anvi.ncurses)
|
|
|
|
;;; delch
|
|
;;; delete character under the cursor in a curses window
|
|
;;; http://invisible-island.net/ncurses/man/curs_delch.3x.html
|
|
|
|
;;; C prototypes
|
|
|
|
;; int delch(void);
|
|
;; int wdelch(WINDOW *win);
|
|
;; int mvdelch(int y, int x);
|
|
;; int mvwdelch(WINDOW *win, int y, int x);
|
|
|
|
;;; Low-level CFFI wrappers
|
|
|
|
(defcfun ("delch" %delch) :int)
|
|
(defcfun ("wdelch" %wdelch) :int (win window))
|
|
(defcfun ("mvdelch" %mvdelch) :int (y :int) (x :int))
|
|
(defcfun ("mvwdelch" %mvwdelch) :int (win window) (y :int) (x :int))
|