;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (require 'm-buffer-macro) #@72 Return the location of point in BUFFER. See also `point'. (fn BUFFER) (defalias 'm-buffer-at-point #[257 "r\211q\210`)\207" [] 2 (#$ . 113)]) #@85 Return t if LOCATION is at the end of a line. See also `eolp'. (fn &rest LOCATION) (defalias 'm-buffer-at-eolp #[128 "\211\211G\300U\203r\301@!q\210\212\211@b\210l*\207\211G\302U\203,r\211@q\210\212\211A@b\210l*\207\303\304!\207" [1 marker-buffer 2 error "m-buffer-with-current-location requires a list of one or two elements"] 4 (#$ . 262)]) #@89 Return t if LOCATION is at the begining of a line. See also `bolp' (fn &rest LOCATION) (defalias 'm-buffer-at-bolp #[128 "\211\211G\300U\203r\301@!q\210\212\211@b\210n*\207\211G\302U\203,r\211@q\210\212\211A@b\210n*\207\303\304!\207" [1 marker-buffer 2 error "m-buffer-with-current-location requires a list of one or two elements"] 4 (#$ . 616)]) #@64 Return the start of the line of LOCATION. (fn &rest LOCATION) (defalias 'm-buffer-at-line-beginning-position #[128 "\211\211G\300U\203r\301@!q\210\212\211@b\210\302 *\207\211G\303U\203.r\211@q\210\212\211A@b\210\302 *\207\304\305!\207" [1 marker-buffer line-beginning-position 2 error "m-buffer-with-current-location requires a list of one or two elements"] 4 (#$ . 974)]) #@62 Return the end of the line of LOCATION. (fn &rest LOCATION) (defalias 'm-buffer-at-line-end-position #[128 "\211\211G\300U\203r\301@!q\210\212\211@b\210\302 *\207\211G\303U\203.r\211@q\210\212\211A@b\210\302 *\207\304\305!\207" [1 marker-buffer line-end-position 2 error "m-buffer-with-current-location requires a list of one or two elements"] 4 (#$ . 1358)]) #@15 (fn BUFFER) (defalias 'm-buffer-at-narrowed-p #[257 "r\211q\210deZ\300 U)?\207" [buffer-size] 3 (#$ . 1729)]) #@15 (fn BUFFER) (defalias 'm-buffer-at-string #[257 "r\211q\210\300 )\207" [buffer-string] 2 (#$ . 1847)]) (provide 'm-buffer-at)