;ELC���
;;; Compiled
;;; in Emacs version 28.0.50
;;; with all optimizations.



#@35 Plist of obarrays for each frame.
(defvar frame-local--obarrays nil (#$ . 87))
#@121 Cons of frame and obarray currently used.
This avoid to search the obarray in `frame-local--obarrays' on every request.
(defvar frame-local--cache nil (#$ . 173))
#@31 

(fn FRAME &optional CREATE)
(defalias 'frame-local--get-obarray-1 #[513 "\302\"\203\f�\303\"\207\211\205�\304\305\306\"\307	#	)\207" [frame-local--obarrays obarray plist-member plist-get make-vector 32 0 plist-put] 6 (#$ . 342)])
#@142 Return the obarray associated to FRAME.
If there is no obarray and CREATE is non-nil, a new obarray is created.

(fn FRAME &optional CREATE)
(defalias 'frame-local--get-obarray #[513 "\302!\262
@=\203�A\207\303\"\211\203�
	B	)\207" [frame-local--cache obarray window-normalize-frame frame-local--get-obarray-1] 6 (#$ . 590)])
#@149 Set the symbol NAME's value to VALUE in FRAME.
If FRAME is nil, set the symbol in the current frame.
Return VALUE.

(fn NAME VALUE &optional FRAME)
(defalias 'frame-local-set #[770 "\301
\302\"\303\304!\"\211L)\207" [obarray frame-local--get-obarray t intern symbol-name] 6 (#$ . 933)])
#@106 Return symbol NAME's value in FRAME.
Or in the current frame if FRAME is nil.

(fn NAME &optional FRAME)
(defalias 'frame-local-get #[513 "\301
!\211\205�\302\303!\"\211\205�\211J)\207" [obarray frame-local--get-obarray intern-soft symbol-name] 6 (#$ . 1231)])
#@150 Similar to `frame-local-set' but NAME must not be quoted.
See `frame-local-set' for the parameters VALUE and FRAME.

(fn NAME VALUE &optional FRAME)
(defalias 'frame-local-setq '(macro . #[770 "\300\301DF\207" [frame-local-set quote] 7 (#$ . 1504)]))
#@133 Similar to `frame-local-get' but NAME must not be quoted.
See `frame-local-get' for the parameter FRAME.

(fn NAME &optional FRAME)
(defalias 'frame-local-getq '(macro . #[513 "\300\301DE\207" [frame-local-get quote] 5 (#$ . 1765)]))
#@61 Delete the obarray associated to FRAME, if any.

(fn FRAME)
(defalias 'frame-local--on-delete #[257 "\302
!\205�\303\"\205�\304\"\305
\305	\"\"\211)\207" [frame-local--obarrays obarray framep plist-member plist-get delq] 6 (#$ . 2007)])
(byte-code "\300\301\302\303#\210\304\305!\207" [add-hook delete-frame-functions frame-local--on-delete t provide frame-local] 4)