Function: srecode-insert-variable-secondname-handler
srecode-insert-variable-secondname-handler is a byte-compiled function
without a source file.
Signature
(srecode-insert-variable-secondname-handler ARG &rest ARGS)
Implementations
(srecode-insert-variable-secondname-handler (STI srecode-template-inserter-width) DICTIONARY VALUE WIDTH) in `srecode/insert.el'.
For VALUE handle WIDTH behaviors for this variable inserter. Return the result as a string. By default, treat as a function name.
(srecode-insert-variable-secondname-handler (STI srecode-template-inserter-variable) DICTIONARY VALUE SECONDNAME) in `srecode/insert.el'.
For VALUE handle SECONDNAME behaviors for this variable inserter. Return the result as a string. By default, treat as a function name. If SECONDNAME is nil, return VALUE.
;; 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-width t t t) nil nil #[1028 "\211\204 �\300\301\"\210\302\303\"\304@!A@\211\203 �\211\305\230\203\"�\306\2022�\211\307\230\203,�\310\2022�\300\311#GY\203>�\312O\207\313GZ\314\"\310=\203Q�\211P\207P\207" [srecode-insert-report-error "Width not specified for variable/width inserter" split-string ":" string-to-number "right" right "left" left "Unknown pad type %s" 0 make-string 32] 11 ("/nix/store/3pgbnkfjhy1s648d8ssbcblxm5x9kacn-emacs-30-2/share/emacs/30.2/lisp/cedet/srecode/insert.elc" . 24405)]) #s(cl--generic-method (srecode-template-inserter-variable t t t) nil nil #[1028 "\211\203 �\301!\302!\203�\211!)\207\303\304\305!$\207\207" [srecode-inserter-variable-current-dictionary read fboundp srecode-insert-report-error "Variable inserter %s: second argument `%s' is not a function" cl-prin1-to-string] 10 ("/nix/store/3pgbnkfjhy1s648d8ssbcblxm5x9kacn-emacs-30-2/share/emacs/30.2/lisp/cedet/srecode/insert.elc" . 16240)])) nil #s(cl--generic srecode-insert-variable-secondname-handler ((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-width t t t) nil nil #[1028 "\211\204 �\300\301\"\210\302\303\"\304@!A@\211\203 �\211\305\230\203\"�\306\2022�\211\307\230\203,�\310\2022�\300\311#GY\203>�\312O\207\313GZ\314\"\310=\203Q�\211P\207P\207" [srecode-insert-report-error "Width not specified for variable/width inserter" split-string ":" string-to-number "right" right "left" left "Unknown pad type %s" 0 make-string 32] 11 ("/nix/store/3pgbnkfjhy1s648d8ssbcblxm5x9kacn-emacs-30-2/share/emacs/30.2/lisp/cedet/srecode/insert.elc" . 24405)]) #s(cl--generic-method (srecode-template-inserter-variable t t t) nil nil #[1028 "\211\203 �\301!\302!\203�\211!)\207\303\304\305!$\207\207" [srecode-inserter-variable-current-dictionary read fboundp srecode-insert-report-error "Variable inserter %s: second argument `%s' is not a function" cl-prin1-to-string] 10 ("/nix/store/3pgbnkfjhy1s648d8ssbcblxm5x9kacn-emacs-30-2/share/emacs/30.2/lisp/cedet/srecode/insert.elc" . 16240)])) 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)"]