Function: srecode-extract-state-extract
srecode-extract-state-extract is a byte-compiled function without a
source file.
Signature
(srecode-extract-state-extract ARG &rest ARGS)
Implementations
(srecode-extract-state-extract (ST srecode-extract-state) ENDPOINT) in `srecode/extract.el'.
Perform an extraction on the extract state ST with ENDPOINT. If there was no waiting inserter, do nothing.
;; Could not find source code, showing raw function object. #[385 "\304\305!\306\300\"\206\"�\307\303\310\302\301\311\312\305 !!\313\314!\"%\315\300#\210\262#\207" [#s(hash-table) (#s(cl--generic-method (srecode-extract-state t) nil nil #[514 "\300\301\"\205(�\302 \303\304\"\216\305\300\301\"\300\306\"\300\307\"%)\266\310\311\211#\207" [eieio-oref lastinserter match-data make-closure #[0 "\301\300\302\"\207" [V0 set-match-data t] 3] srecode-inserter-extract anchor lastdict srecode-extract-state-set nil] 10 ("/nix/store/3pgbnkfjhy1s648d8ssbcblxm5x9kacn-emacs-30-2/share/emacs/30.2/lisp/cedet/srecode/extract.elc" . 1674)])) nil #s(cl--generic srecode-extract-state-extract ((1 #s(cl--generic-generalizer cl--generic-t-generalizer 0 #[385 "\300\207" [nil] 3 ("emacs-lisp/cl-generic.elc" . 6935)] #[385 "\300\207" [(t)] 3 ("emacs-lisp/cl-generic.elc" . 6960)])) (0 #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 ("/nix/store/3pgbnkfjhy1s648d8ssbcblxm5x9kacn-emacs-30-2/share/emacs/30.2/lisp/emacs-lisp/eieio-core.elc" . 38229)]) #s(cl--generic-generalizer cl--generic-t-generalizer 0 #[385 "\300\207" [nil] 3 ("emacs-lisp/cl-generic.elc" . 6935)] #[385 "\300\207" [(t)] 3 ("emacs-lisp/cl-generic.elc" . 6960)]))) (#s(cl--generic-method (srecode-extract-state t) nil nil #[514 "\300\301\"\205(�\302 \303\304\"\216\305\300\301\"\300\306\"\300\307\"%)\266\310\311\211#\207" [eieio-oref lastinserter match-data make-closure #[0 "\301\300\302\"\207" [V0 set-match-data t] 3] srecode-inserter-extract anchor lastdict srecode-extract-state-set nil] 10 ("/nix/store/3pgbnkfjhy1s648d8ssbcblxm5x9kacn-emacs-30-2/share/emacs/30.2/lisp/cedet/srecode/extract.elc" . 1674)])) nil) apply cl-type-of gethash cl--generic-cache-miss 0 append #[385 "\301N\302!>\205�\303!\207" [cl-struct-eieio--class-tags cl--class type-of cl--class-allparents] 5 ("/nix/store/3pgbnkfjhy1s648d8ssbcblxm5x9kacn-emacs-30-2/share/emacs/30.2/lisp/emacs-lisp/eieio-core.elc" . 38229)] #[385 "\300\207" [(t)] 3 ("emacs-lisp/cl-generic.elc" . 6960)] nil puthash] 13 "\n\n(fn ARG &rest ARGS)"]