Function: ede-object-menu

ede-object-menu is a byte-compiled function defined in base.el.gz.

Signature

(ede-object-menu ARG &rest ARGS)

Implementations

(ede-object-menu (THIS ede-project)) in `ede/base.el'.

Retrieve the slot `menu' from an object of class `ede-project'.

(ede-object-menu (THIS (subclass ede-project))) in `ede/base.el'.

Retrieve the class slot `menu' from a class `ede-project'. This method is obsolete.

(ede-object-menu (THIS ede-target)) in `ede/base.el'.

Retrieve the slot `menu' from an object of class `ede-target'.

(ede-object-menu (THIS (subclass ede-target))) in `ede/base.el'.

Retrieve the class slot `menu' from a class `ede-target'. This method is obsolete.

Source Code

;; Defined in /usr/src/emacs/lisp/cedet/ede/base.el.gz
;; Could not find source code, showing raw function object.
#[385
  "\3049\203\f�\305N\206�\306!\307
\300\"\2069�\310\303\311\302\301\312\313\n9\205'�\n\305N!\314\306\f!!\315\316!#%\317\300#\210\262
#\207"
  [#s(hash-table)
     (#s(cl--generic-method (ede-project) nil nil
			    #[257 "\300
\301\"\207" [slot-value menu]
				  4
				  ("/nix/store/y8rifw71hjgsl2qjn1l0vrwq2c3593aw-emacs-30-2/share/emacs/30.2/lisp/cedet/ede/base.elc"
				   . 7173)])
	#s(cl--generic-method ((subclass ede-project)) nil nil
			      #[257
				"\300
\301\"\205�\302
\301\"\207"
				[slot-boundp menu eieio-oref-default]
				4
				("/nix/store/y8rifw71hjgsl2qjn1l0vrwq2c3593aw-emacs-30-2/share/emacs/30.2/lisp/cedet/ede/base.elc"
				 . 7073)])
	#s(cl--generic-method (ede-target) nil nil
			      #[257 "\300
\301\"\207"
				    [slot-value menu] 4
				    ("/nix/store/y8rifw71hjgsl2qjn1l0vrwq2c3593aw-emacs-30-2/share/emacs/30.2/lisp/cedet/ede/base.elc"
				     . 182)])
	#s(cl--generic-method ((subclass ede-target)) nil nil
			      #[257
				"\300
\301\"\205�\302
\301\"\207"
				[slot-boundp menu eieio-oref-default]
				4
				("/nix/store/y8rifw71hjgsl2qjn1l0vrwq2c3593aw-emacs-30-2/share/emacs/30.2/lisp/cedet/ede/base.elc"
				 . 83)]))
     nil
     #s(cl--generic ede-object-menu
		    ((0
		      #s(cl--generic-generalizer
			 eieio--generic-subclass-generalizer 60
			 #[385 "\300\301D\302DE\207"
			       [and symbolp cl--find-class] 6
			       ("/nix/store/y8rifw71hjgsl2qjn1l0vrwq2c3593aw-emacs-30-2/share/emacs/30.2/lisp/emacs-lisp/eieio-core.elc"
				. 37643)]
			 eieio--generic-subclass-specializers)
		      #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/y8rifw71hjgsl2qjn1l0vrwq2c3593aw-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 (ede-project) nil nil
					   #[257 "\300
\301\"\207"
						 [slot-value menu] 4
						 ("/nix/store/y8rifw71hjgsl2qjn1l0vrwq2c3593aw-emacs-30-2/share/emacs/30.2/lisp/cedet/ede/base.elc"
						  . 7173)])
		       #s(cl--generic-method ((subclass ede-project))
					     nil nil
					     #[257
					       "\300
\301\"\205�\302
\301\"\207"
					       [slot-boundp menu
							    eieio-oref-default]
					       4
					       ("/nix/store/y8rifw71hjgsl2qjn1l0vrwq2c3593aw-emacs-30-2/share/emacs/30.2/lisp/cedet/ede/base.elc"
						. 7073)])
		       #s(cl--generic-method (ede-target) nil nil
					     #[257 "\300
\301\"\207"
						   [slot-value menu] 4
						   ("/nix/store/y8rifw71hjgsl2qjn1l0vrwq2c3593aw-emacs-30-2/share/emacs/30.2/lisp/cedet/ede/base.elc"
						    . 182)])
		       #s(cl--generic-method ((subclass ede-target))
					     nil nil
					     #[257
					       "\300
\301\"\205�\302
\301\"\207"
					       [slot-boundp menu
							    eieio-oref-default]
					       4
					       ("/nix/store/y8rifw71hjgsl2qjn1l0vrwq2c3593aw-emacs-30-2/share/emacs/30.2/lisp/cedet/ede/base.elc"
						. 83)]))
		    nil)
     apply cl--class cl-type-of gethash cl--generic-cache-miss 0
     append eieio--generic-subclass-specializers
     #[385 "
\301N\302
!>\205�\303
!\207"
	   [cl-struct-eieio--class-tags cl--class type-of
					cl--class-allparents]
	   5
	   ("/nix/store/y8rifw71hjgsl2qjn1l0vrwq2c3593aw-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]
  14 "\n\n(fn ARG &rest ARGS)"]