;ELC ;;; Compiled ;;; in Emacs version 26.3 ;;; with all optimizations. ;;; This file uses dynamic docstrings, first added in Emacs 19.29. ;;; This file does not contain utf-8 non-ASCII characters, ;;; and so can be loaded in Emacs versions earlier than 23. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (byte-code "\300\301!\210\300\302!\207" [require cl-lib posframe] 2) (defvar posframe-benchmark-alist (byte-code "\300\301!r\211q\210\302\303\304\305\306!\307\"\310$\216\311\312\313!!\210\314 *\262\315\316\317\320\321\322DC\323BBD\324BBBB\207" [generate-new-buffer " *temp*" make-byte-code 0 "\301\300!\205 \302\300!\207" vconcat vector [buffer-name kill-buffer] 2 insert-file-contents locate-library "posframe.el" buffer-string (font-at (font-at (point-min))) (redraw-display (redraw-display)) (redraw-frame (redraw-frame (window-frame))) remove-text-properties let string ((remove-text-properties 0 (length string) '(read-only t) string)) ((mouse-position (mouse-position)) (default-font-width (default-font-width)) (posframe--get-font-height (posframe--get-font-height (point-min))) (posframe--mouse-banish (posframe--mouse-banish (window-frame))) (frame-parameter (frame-parameter (window-frame) 'no-accept-focus)) (set-mouse-position (set-mouse-position (window-frame) 0 0)) (posn-at-point (posn-at-point)) (posn-x-y (posn-x-y (posn-at-point))) (posn-object-x-y (posn-object-x-y (posn-at-point))) (set-frame-parameter (set-frame-parameter (window-frame) 'test 1)) (raise-frame (raise-frame (window-frame))))] 8)) #@30 Benchmark tool for posframe. (defalias 'posframe-benchmark #[0 "\301\302\303!\210\211\203!\211@\302\304@#\210\305A@\"\210A\266\202\202\210\302\306!\207" [posframe-benchmark-alist 1000 message "\n* Posframe Benchmark" "\n** Benchmark `%S' %s times ..." benchmark "\n* Finished."] 7 (#$ . 1631) nil]) (provide 'posframe-benchmark)