Function: (setf apheleia-formatter--arg1)

(setf\ apheleia-formatter--arg1) is a byte-compiled function defined in apheleia-formatter-context.el.

Signature

(\(setf\ apheleia-formatter--arg1\) &rest ARGS)

Implementations

(\(setf\ apheleia-formatter--arg1\) VALUE (THIS apheleia-formatter--context)) in `apheleia-formatter-context.el'.

Undocumented

Source Code

;; Defined in /nix/store/lwcwryzabcmvjcwwzzs65jrwf7p7d7cs-emacs-packages-deps/share/emacs/site-lisp/elpa/apheleia-20260915.1628/apheleia-formatter-context.el
;; Could not find source code, showing raw function object.
#[128
  "\303\300\304\300!	>\204�\305\306\307\300D\"\210\300\310H\304\300!	>\204#�\305\306\307\300D\"\210\300\311H#\304\300!	>\2046�\305\306\307\300D\"\210\300\312H\313K!\211<\203H�\314\315#\210K\203U�\315\316\")\210\317\"\207"
  [#s(cl--generic \(setf\ apheleia-formatter--arg1\)
		  ((1
		    #s(cl--generic-generalizer
		       eieio--generic-generalizer 50
		       cl--generic-struct-tag
		       #[385 "\301N\302!>\205�\303!\207"
			     [cl-struct-eieio--class-tags cl--class
							  type-of
							  cl--class-allparents]
			     5 "\n\n(fn TAG &rest _)"])
		    #s(cl--generic-generalizer
		       cl--generic-t-generalizer 0
		       #[385 "\300\207" [nil] 3
			     "\n\n(fn NAME &rest _)"]
		       #[385 "\300\207" [(t)] 3 "\n\n(fn TAG &rest _)"]))
		   (0
		    #s(cl--generic-generalizer
		       cl--generic-t-generalizer 0
		       #[385 "\300\207" [nil] 3
			     "\n\n(fn NAME &rest _)"]
		       #[385 "\300\207" [(t)] 3 "\n\n(fn TAG &rest _)"])))
		  (#s(cl--generic-method
		      (t apheleia-formatter--context) nil nil
		      #[514 "\300\301#\207" [eieio-oset arg1] 6
			    "\n\n(fn VALUE THIS)"]))
		  nil #0)
     cl-struct-cl--generic-tags current-load-list
     cl--generic-make-next-function type-of signal wrong-type-argument
     cl--generic 2 3 1 get-advertised-calling-convention
     set-advertised-calling-convention nil defalias apply]
  8 "\n\n(fn &rest ARGS)"]