Function: srecode-template-table-in-project-p
srecode-template-table-in-project-p is a byte-compiled function
without a source file.
Signature
(srecode-template-table-in-project-p ARG &rest ARGS)
Implementations
(srecode-template-table-in-project-p (TAB srecode-template-table)) in `srecode/find.el'.
Return non-nil if the table TAB can be used in the current project. If TAB has a :project set, check that the directories match. If TAB is nil, then always return t.
;; Could not find source code, showing raw function object. #[385 "\304\203 �\305!\202\f�\306\307\300\"\2066�\310\303\311\302\301\312\313\n\203&�\305 !\202'�\306!\314\315!\"%\316\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 (srecode-template-table) nil nil #[257 "\301\302\"\211\204\n�\303\207\304!\305\306!!\307\310P\"??\207" [default-directory eieio-oref project t expand-file-name regexp-quote directory-file-name string-match "^"] 7 "Return non-nil if the table TAB can be used in the current project.\nIf TAB has a :project set, check that the directories match.\nIf TAB is nil, then always return t.\n\n(fn TAB)"])) nil #s(cl--generic srecode-template-table-in-project-p ((0 #s(cl--generic-generalizer eieio--generic-generalizer 50 cl--generic-struct-tag #[385 "\301N\302!>\205�\303\304\305!\"\207" [cl-struct-eieio--class-tags cl--class type-of mapcar eieio--class-name eieio--class-precedence-list] 7 "\n\n(fn TAG &rest _)"]) #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 (srecode-template-table) nil nil #[257 "\301\302\"\211\204\n�\303\207\304!\305\306!!\307\310P\"??\207" [default-directory eieio-oref project t expand-file-name regexp-quote directory-file-name string-match "^"] 7 "Return non-nil if the table TAB can be used in the current project.\nIf TAB has a :project set, check that the directories match.\nIf TAB is nil, then always return t.\n\n(fn TAB)"])) nil) apply type-of null gethash cl--generic-cache-miss 0 append #[385 "\301N\302!>\205�\303\304\305!\"\207" [cl-struct-eieio--class-tags cl--class type-of mapcar eieio--class-name eieio--class-precedence-list] 7 "\n\n(fn TAG &rest _)"] #[385 "\300\207" [(t)] 3 "\n\n(fn TAG &rest _)"] nil puthash] 13 "\n\n(fn ARG &rest ARGS)"]