Function: srecode-inserter-extract

srecode-inserter-extract is a byte-compiled function without a source file.

Signature

(srecode-inserter-extract ARG &rest ARGS)

Implementations

(srecode-inserter-extract (INS srecode-template-inserter-include) START END DICT STATE) in `srecode/extract.el'.

Extract text from START/END and store in DICT. Return the starting location of the first plain-text match. Return nil if nothing was extracted.

(srecode-inserter-extract (INS srecode-template-inserter-section-start) START END INDICT STATE) in `srecode/extract.el'.

Extract text from START/END and store in INDICT. Return the starting location of the first plain-text match. Return nil if nothing was extracted.

(srecode-inserter-extract (INS srecode-template-inserter-variable) START END VDICT STATE) in `srecode/extract.el'.

Extract text from START/END and store in VDICT. Return t if something was extracted. Return nil if this inserter doesn't need to extract anything.

(srecode-inserter-extract (INS srecode-template-inserter) START END DICT STATE) in `srecode/extract.el'.

Extract text from START/END and store in DICT. Return nil as this inserter will extract 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-template-inserter-include t t t t) nil nil #[1285 "b\210\300\"\210\301\302\"\303\230\2049�\304\301\302\"\"\305\306!\210\30710�\310\301\311\"#\210\3120\2022�\313\207\2058�\202�\207\310\301\311\"#\207" [srecode-insert-include-lookup eieio-oref object-name "" srecode-dictionary-add-section-dictionary error "Need to implement include with name extractor" (error) srecode-extract-method includedtemplate t nil] 11 ("/nix/store/3pgbnkfjhy1s648d8ssbcblxm5x9kacn-emacs-30-2/share/emacs/30.2/lisp/cedet/srecode/extract.elc" . 4624)]) #s(cl--generic-method (srecode-template-inserter-section-start t t t t) nil nil #[1285 "\300\301\"\302!\303\3041�\305\300 \306\"#\210\3070\202 �\210\2020�\2030�B\262\302!\262\202�\310\237#\303\207" [eieio-oref object-name srecode-create-dictionary nil (error) srecode-extract-method template t srecode-dictionary-set-value] 13 ("/nix/store/3pgbnkfjhy1s648d8ssbcblxm5x9kacn-emacs-30-2/share/emacs/30.2/lisp/cedet/srecode/extract.elc" . 4439)]) #s(cl--generic-method (srecode-template-inserter-variable t t t t) nil nil #[1285 "\300\301\302\"\303\"#\304\207" [srecode-dictionary-set-value eieio-oref object-name buffer-substring-no-properties t] 12 ("/nix/store/3pgbnkfjhy1s648d8ssbcblxm5x9kacn-emacs-30-2/share/emacs/30.2/lisp/cedet/srecode/extract.elc" . 4254)]) #s(cl--generic-method (srecode-template-inserter t t t t) nil nil #[1285 "\300\207" [nil] 6 ("/nix/store/3pgbnkfjhy1s648d8ssbcblxm5x9kacn-emacs-30-2/share/emacs/30.2/lisp/cedet/srecode/extract.elc" . 4120)])) nil #s(cl--generic srecode-inserter-extract ((4 #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)])) (3 #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)])) (2 #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)])) (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-template-inserter-include t t t t) nil nil #[1285 "b\210\300\"\210\301\302\"\303\230\2049�\304\301\302\"\"\305\306!\210\30710�\310\301\311\"#\210\3120\2022�\313\207\2058�\202�\207\310\301\311\"#\207" [srecode-insert-include-lookup eieio-oref object-name "" srecode-dictionary-add-section-dictionary error "Need to implement include with name extractor" (error) srecode-extract-method includedtemplate t nil] 11 ("/nix/store/3pgbnkfjhy1s648d8ssbcblxm5x9kacn-emacs-30-2/share/emacs/30.2/lisp/cedet/srecode/extract.elc" . 4624)]) #s(cl--generic-method (srecode-template-inserter-section-start t t t t) nil nil #[1285 "\300\301\"\302!\303\3041�\305\300 \306\"#\210\3070\202 �\210\2020�\2030�B\262\302!\262\202�\310\237#\303\207" [eieio-oref object-name srecode-create-dictionary nil (error) srecode-extract-method template t srecode-dictionary-set-value] 13 ("/nix/store/3pgbnkfjhy1s648d8ssbcblxm5x9kacn-emacs-30-2/share/emacs/30.2/lisp/cedet/srecode/extract.elc" . 4439)]) #s(cl--generic-method (srecode-template-inserter-variable t t t t) nil nil #[1285 "\300\301\302\"\303\"#\304\207" [srecode-dictionary-set-value eieio-oref object-name buffer-substring-no-properties t] 12 ("/nix/store/3pgbnkfjhy1s648d8ssbcblxm5x9kacn-emacs-30-2/share/emacs/30.2/lisp/cedet/srecode/extract.elc" . 4254)]) #s(cl--generic-method (srecode-template-inserter t t t t) nil nil #[1285 "\300\207" [nil] 6 ("/nix/store/3pgbnkfjhy1s648d8ssbcblxm5x9kacn-emacs-30-2/share/emacs/30.2/lisp/cedet/srecode/extract.elc" . 4120)])) 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)"]