Function: semanticdb-create-table

semanticdb-create-table is a byte-compiled function without a source file.

Signature

(semanticdb-create-table ARG &rest ARGS)

Implementations

(semanticdb-create-table (DB semanticdb-project-database) FILE) in `semantic/db.el'.

Create a new table in DB for FILE and return it. The class of DB contains the class name for the type of table to create. If the table for FILE exists, return it. If the table for FILE does not exist, create one.

;; 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 (semanticdb-project-database t) nil nil #[514 "\300\"\211\204#�\301\302\"\303!\304\303!#\262
\305
\306#\210\307\310\311$\210\207" [semanticdb-file-table eieio-oref new-table-class file-name-nondirectory :file eieio-oset parent-db object-add-to-list tables t] 8 ("/nix/store/3pgbnkfjhy1s648d8ssbcblxm5x9kacn-emacs-30-2/share/emacs/30.2/lisp/cedet/semantic/db.elc" . 18355)])) nil #s(cl--generic semanticdb-create-table ((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 (semanticdb-project-database t) nil nil #[514 "\300\"\211\204#�\301\302\"\303!\304\303!#\262
\305
\306#\210\307\310\311$\210\207" [semanticdb-file-table eieio-oref new-table-class file-name-nondirectory :file eieio-oset parent-db object-add-to-list tables t] 8 ("/nix/store/3pgbnkfjhy1s648d8ssbcblxm5x9kacn-emacs-30-2/share/emacs/30.2/lisp/cedet/semantic/db.elc" . 18355)])) 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)"]