Function: srecode-insert-include-lookup

srecode-insert-include-lookup is a byte-compiled function without a source file.

Signature

(srecode-insert-include-lookup &rest ARGS)

Implementations

(srecode-insert-include-lookup (STI srecode-template-inserter-include) DICTIONARY) in `srecode/insert.el'.

For the template inserter STI, lookup the template to include. Finds the template with this macro function part and stores it in this template instance.

;; 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\313
K!\211<\203H�\314\315#\210
K\203U�\315\316\")\210\317\"\207" [#s(cl--generic srecode-insert-include-lookup ((1 #s(cl--generic-generalizer cl--generic-t-generalizer 0 #[385 "\300\207" [nil] 3 ("emacs-lisp/cl-generic.elc" . 7946)] #[385 "\300\207" [(t)] 3 ("emacs-lisp/cl-generic.elc" . 7971)])) (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/4sqc1yyx22dax8qs94hnxkgyg1v6gqfn-emacs-snapshot/share/emacs/32.0.50/lisp/emacs-lisp/eieio-core.elc" . 38420)]) #s(cl--generic-generalizer cl--generic-t-generalizer 0 #[385 "\300\207" [nil] 3 ("emacs-lisp/cl-generic.elc" . 7946)] #[385 "\300\207" [(t)] 3 ("emacs-lisp/cl-generic.elc" . 7971)]))) (#s(cl--generic-method (srecode-template-inserter-include t) nil nil #[514 "\300\301\"\211\204�\302\303\300\304\"#\210\305\306 \"\307\310\311\"\312\204l�\204a�
\203a�\300@\313\"\262
\305\306 #\262\204Z�\314@\315\"\203Z�\300\211@\315\"\316\"\211\203Y�\305\306 $\262\210
A\262\202 �\204l�\305\306 \"\262\317\320#\266\300\320\"?\205\206�\302\321\300\304\"$\207" [eieio-oref secondname srecode-insert-report-error "Include macro `%s' needs a template name" object-name srecode-template-get-table srecode-table eieio-oref-default srecode-template active nil context slot-boundp table application eieio-oset includedtemplate "No template \"%s\" found for include macro `%s'"] 12 ("/nix/store/4sqc1yyx22dax8qs94hnxkgyg1v6gqfn-emacs-snapshot/share/emacs/32.0.50/lisp/cedet/srecode/insert.elc" . 34235)])) 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 ("emacs-lisp/cl-generic.elc" . 40085)]