Function: srecode-inserter-prin-example

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

Signature

(srecode-inserter-prin-example ARG &rest ARGS)

Implementations

(srecode-inserter-prin-example (INS (subclass srecode-template-inserter)) ESCAPE-START ESCAPE-END) in `srecode/insert.el'.

Insert an example using inserter INS. Arguments ESCAPE-START and ESCAPE-END are the current escape sequences in use.

(srecode-inserter-prin-example (INS (subclass srecode-template-inserter-include-wrap)) ESCAPE-START ESCAPE-END) in `srecode/insert.el'.

Insert an example using inserter INS. Arguments ESCAPE-START and ESCAPE-END are the current escape sequences in use.

(srecode-inserter-prin-example (INS (subclass srecode-template-inserter-include)) ESCAPE-START ESCAPE-END) in `srecode/insert.el'.

Insert an example using inserter INS. Arguments ESCAPE-START and ESCAPE-END are the current escape sequences in use.

(srecode-inserter-prin-example (INS (subclass srecode-template-inserter-subtemplate)) ESCAPE-START ESCAPE-END) in `srecode/insert.el'.

Undocumented

(srecode-inserter-prin-example (INS (subclass srecode-template-inserter-point)) ESCAPE-START ESCAPE-END) in `srecode/insert.el'.

Insert an example using inserter INS. Arguments ESCAPE-START and ESCAPE-END are the current escape sequences in use.

(srecode-inserter-prin-example (INS (subclass srecode-template-inserter-width)) ESCAPE-START ESCAPE-END) in `srecode/insert.el'.

Insert an example using inserter INS. Arguments ESCAPE-START and ESCAPE-END are the current escape sequences in use.

(srecode-inserter-prin-example (INS (subclass srecode-template-inserter-comment)) ESCAPE-START ESCAPE-END) in `srecode/insert.el'.

Insert an example using inserter INS. Arguments ESCAPE-START and ESCAPE-END are the current escape sequences in use.

;; Could not find source code, showing raw function object. #[385 "\3049\205 �\305N\306
\300\"\2060�\307\303\310\302\301\311\312\n9\205!�\n\305N!\313\314!\"%\315\300#\210\211\262
\262
#\207" [#s(hash-table size 65 test eql rehash-size 1.5 rehash-threshold 0.8125 data ()) (#s(cl--generic-method ((subclass srecode-template-inserter) t t) nil nil #[771 "\300\301!\210\300!\210\302\303\"\203!�\304\303\"\203!�\300\305\306\304\303\"\"!\210\300\307!\210\300
!\210\310 \207" [princ " " slot-exists-p key eieio-oref format "%c" "VARNAME" terpri] 9 "Insert an example using inserter INS.\nArguments ESCAPE-START and ESCAPE-END are the current escape sequences in use.\n\n(fn INS ESCAPE-START ESCAPE-END)"]) #s(cl--generic-method ((subclass srecode-template-inserter-include-wrap) t t) nil nil #[771 "\300\301!\210\300!\210\300\302!\210\300
!\210\303 \210\300\304!\210\303 \210\300\301!\210\300!\210\300\305!\210\300
!\210\303 \207" [princ " " "<DICTNAME:contextname:templatename" terpri " Template Text to insert at ^ macro" "/DICTNAME"] 5 "Insert an example using inserter INS.\nArguments ESCAPE-START and ESCAPE-END are the current escape sequences in use.\n\n(fn INS ESCAPE-START ESCAPE-END)"]) #s(cl--generic-method ((subclass srecode-template-inserter-include) t t) nil nil #[771 "\300\301!\210\300!\210\300\302!\210\300
!\210\303 \207" [princ " " ">DICTNAME:contextname:templatename" terpri] 5 "Insert an example using inserter INS.\nArguments ESCAPE-START and ESCAPE-END are the current escape sequences in use.\n\n(fn INS ESCAPE-START ESCAPE-END)"]) #s(cl--generic-method ((subclass srecode-template-inserter-subtemplate) t t) nil curried #[257 "\300
!\210\301\302\303\"\207" [cl--generic-isnot-nnm-p nil make-closure #[128 "\301\302\300#\303\304#\207" [V0 make-closure #[128 "\302\301\206�\300\"\207" [V0 V1 apply] 4 "\n\n(fn &rest ARGS)"] apply #[1028 " \210\300\301!\210\302 \210\300\303!\210\300!\210\300\304!\210\300
!\210\302 \207" [princ " Template Text to control" terpri " " "/VARNAME"] 6 "\n\n(fn CL--CNM INS ESCAPE-START ESCAPE-END)"]] 6 "Insert an example using inserter INS.\nArguments ESCAPE-START and ESCAPE-END are the current escape sequences in use.\n\n(fn INS ESCAPE-START ESCAPE-END)"]] 5 "\n\n(fn CL--NM)"]) #s(cl--generic-method ((subclass srecode-template-inserter-point) t t) nil nil #[771 "\300\301!\210\300!\210\300\302!\210\300
!\210\303 \207" [princ " " "^" terpri] 5 "Insert an example using inserter INS.\nArguments ESCAPE-START and ESCAPE-END are the current escape sequences in use.\n\n(fn INS ESCAPE-START ESCAPE-END)"]) #s(cl--generic-method ((subclass srecode-template-inserter-width) t t) nil nil #[771 "\300\301!\210\300!\210\300\302!\210\300
!\210\303 \207" [princ " " "|A:10:right" terpri] 5 "Insert an example using inserter INS.\nArguments ESCAPE-START and ESCAPE-END are the current escape sequences in use.\n\n(fn INS ESCAPE-START ESCAPE-END)"]) #s(cl--generic-method ((subclass srecode-template-inserter-comment) t t) nil nil #[771 "\300\301!\210\300!\210\300\302!\210\300
!\210\303 \207" [princ " " "! Miscellaneous text commenting in your template. " terpri] 5 "Insert an example using inserter INS.\nArguments ESCAPE-START and ESCAPE-END are the current escape sequences in use.\n\n(fn INS ESCAPE-START ESCAPE-END)"])) nil #s(cl--generic srecode-inserter-prin-example ((2 #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 _)"])) (1 #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 eieio--generic-subclass-generalizer 60 #[385 "\300\301D\302DE\207" [and symbolp cl--find-class] 6 "\n\n(fn NAME &rest _)"] eieio--generic-subclass-specializers) #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 ((subclass srecode-template-inserter) t t) nil nil #[771 "\300\301!\210\300!\210\302\303\"\203!�\304\303\"\203!�\300\305\306\304\303\"\"!\210\300\307!\210\300
!\210\310 \207" [princ " " slot-exists-p key eieio-oref format "%c" "VARNAME" terpri] 9 "Insert an example using inserter INS.\nArguments ESCAPE-START and ESCAPE-END are the current escape sequences in use.\n\n(fn INS ESCAPE-START ESCAPE-END)"]) #s(cl--generic-method ((subclass srecode-template-inserter-include-wrap) t t) nil nil #[771 "\300\301!\210\300!\210\300\302!\210\300
!\210\303 \210\300\304!\210\303 \210\300\301!\210\300!\210\300\305!\210\300
!\210\303 \207" [princ " " "<DICTNAME:contextname:templatename" terpri " Template Text to insert at ^ macro" "/DICTNAME"] 5 "Insert an example using inserter INS.\nArguments ESCAPE-START and ESCAPE-END are the current escape sequences in use.\n\n(fn INS ESCAPE-START ESCAPE-END)"]) #s(cl--generic-method ((subclass srecode-template-inserter-include) t t) nil nil #[771 "\300\301!\210\300!\210\300\302!\210\300
!\210\303 \207" [princ " " ">DICTNAME:contextname:templatename" terpri] 5 "Insert an example using inserter INS.\nArguments ESCAPE-START and ESCAPE-END are the current escape sequences in use.\n\n(fn INS ESCAPE-START ESCAPE-END)"]) #s(cl--generic-method ((subclass srecode-template-inserter-subtemplate) t t) nil curried #[257 "\300
!\210\301\302\303\"\207" [cl--generic-isnot-nnm-p nil make-closure #[128 "\301\302\300#\303\304#\207" [V0 make-closure #[128 "\302\301\206�\300\"\207" [V0 V1 apply] 4 "\n\n(fn &rest ARGS)"] apply #[1028 " \210\300\301!\210\302 \210\300\303!\210\300!\210\300\304!\210\300
!\210\302 \207" [princ " Template Text to control" terpri " " "/VARNAME"] 6 "\n\n(fn CL--CNM INS ESCAPE-START ESCAPE-END)"]] 6 "Insert an example using inserter INS.\nArguments ESCAPE-START and ESCAPE-END are the current escape sequences in use.\n\n(fn INS ESCAPE-START ESCAPE-END)"]] 5 "\n\n(fn CL--NM)"]) #s(cl--generic-method ((subclass srecode-template-inserter-point) t t) nil nil #[771 "\300\301!\210\300!\210\300\302!\210\300
!\210\303 \207" [princ " " "^" terpri] 5 "Insert an example using inserter INS.\nArguments ESCAPE-START and ESCAPE-END are the current escape sequences in use.\n\n(fn INS ESCAPE-START ESCAPE-END)"]) #s(cl--generic-method ((subclass srecode-template-inserter-width) t t) nil nil #[771 "\300\301!\210\300!\210\300\302!\210\300
!\210\303 \207" [princ " " "|A:10:right" terpri] 5 "Insert an example using inserter INS.\nArguments ESCAPE-START and ESCAPE-END are the current escape sequences in use.\n\n(fn INS ESCAPE-START ESCAPE-END)"]) #s(cl--generic-method ((subclass srecode-template-inserter-comment) t t) nil nil #[771 "\300\301!\210\300!\210\300\302!\210\300
!\210\303 \207" [princ " " "! Miscellaneous text commenting in your template. " terpri] 5 "Insert an example using inserter INS.\nArguments ESCAPE-START and ESCAPE-END are the current escape sequences in use.\n\n(fn INS ESCAPE-START ESCAPE-END)"])) nil) apply cl--class gethash cl--generic-cache-miss 0 append eieio--generic-subclass-specializers #[385 "\300\207" [(t)] 3 "\n\n(fn TAG &rest _)"] nil puthash] 13 "\n\n(fn ARG &rest ARGS)"]