;ELC ;;; Compiled ;;; in Emacs version 29.4 ;;; with all optimizations. (byte-code "\300\301!\210\300\302!\210\300\303!\210\304\305\306\307!\"\210\304\310\311\307!\"\210\304\312\310\"\210\313\312\314\315#\210\316\307\317\310#\320\307\321\322\323$\207" [require semantic/db semantic/analyze/fcn semantic/ctxt defalias semantic-scope-cache-p eieio-make-class-predicate semantic-scope-cache semantic-scope-cache--eieio-childp eieio-make-child-predicate semantic-scope-cache-child-p make-obsolete "use (cl-typep ... 'semantic-scope-cache) instead" "25.1" define-symbol-prop cl-deftype-satisfies eieio-defclass-internal (semanticdb-abstract-cache) ((tag :initform nil :documentation "The tag this scope was calculated for.") (scopetypes :initform nil :documentation "The list of types currently in scope.\nFor C++, this would contain anonymous namespaces known, and\nanything labeled by a `using' statement.") (parents :initform nil :documentation "List of parents in scope w/in the body of this function.\nPresumably, the members of these parent classes are available for access\nbased on private:, or public: style statements.") (parentinheritance :initform nil :documentation "Alist of parents by inheritance.\nEach entry is ( PARENT . PROTECTION ), where PARENT is a type, and\nPROTECTION is a symbol representing the level of inheritance, such as 'private, or 'protected.") (scope :initform nil :documentation "Items in scope due to the scopetypes or parents.") (fullscope :initform nil :documentation "All the other stuff on one master list you can search.") (localargs :initform nil :documentation "The arguments to the function tag.") (localvar :initform nil :documentation "The local variables.") (typescope :initform nil :documentation "Slot to save intermediate scope while metatypes are dereferenced.")) (:documentation "Cache used for storage of the current scope by the Semantic Analyzer.\nSaves scoping information between runs of the analyzer.")] 6)#@77 Create a new object of class type `semantic-scope-cache'. (fn &rest SLOTS) (defalias 'semantic-scope-cache #[128 "\300\301\302#\207" [apply make-instance semantic-scope-cache] 5 (#$ . 1972)]) (byte-code "\300\301\302\303#\300\207" [function-put semantic-scope-cache compiler-macro semantic-scope-cache--anon-cmacro] 4)#@26 (fn WHOLE &rest SLOTS) (defalias 'semantic-scope-cache--anon-cmacro #[385 "\211@;\204\207\300\301\302@@#@\303@DABB\304\211@%\207" [macroexp-warn-and-return format "Obsolete name arg %S to constructor %S" identity nil] 8 (#$ . 2298)]) (byte-code "\300\301\302\303\302\304%\210\300\305\302\306\302\307%\210\300\310\302\311\302\312%\207" [cl-generic-define-method semantic-reset nil ((obj semantic-scope-cache)) #[257 "\300\301\302#\210\300\303\302#\210\300\304\302#\210\300\305\302#\210\300\306\302#\210\300\307\302#\210\300\310\302#\210\300\311\302#\210\300\312\302#\207" [eieio-oset tag nil scopetypes parents parentinheritance scope fullscope localargs localvar typescope] 5 "Reset OBJ back to it's empty settings.\n\n(fn OBJ)"] semanticdb-synchronize ((cache semantic-scope-cache) _new-tags) #[514 "\300!\207" [semantic-reset] 4 "Synchronize a CACHE with some NEW-TAGS.\n\n(fn CACHE NEW-TAGS)"] semanticdb-partial-synchronize ((cache semantic-scope-cache) new-tags) #[514 "\300!\301\203!@\211A@\262\302=\203@B\262A\262\202\211\237\266\202\204x\300!\301\203I@\211A@\262\303=\203B@B\262A\262\202,\211\237\266\202\204x\300!\301\203q@\211A@\262\304=\203j@B\262A\262\202T\211\237\266\202\205{\305!\207" [semantic-something-to-tag-table nil include type using semantic-reset] 6 "Synchronize a CACHE with some changed NEW-TAGS.\n\n(fn CACHE NEW-TAGS)"]] 6)#@45 Get the current cached scope, and reset it. (defalias 'semantic-scope-reset-cache #[0 "\205 \301\302\"\303!\262\207" [semanticdb-current-table semanticdb-cache-get semantic-scope-cache semantic-reset] 3 (#$ . 3718)]) (cl-generic-define-method 'semantic-scope-set-typecache nil '((cache semantic-scope-cache) types-in-scope) nil #[514 "\300\211\203\"\211@\301\211\302\303\3048\262\"\266\203\"\262A\266\202\202\210\305\306#\207" [nil append :members plist-get 2 eieio-oset typescope] 13 "Set the :typescope property on CACHE to some types.\nTYPES-IN-SCOPE is a list of type tags whose members are\ncurrently in scope. For each type in TYPES-IN-SCOPE,\nadd those members to the types list.\nIf nil, then the typescope is reset.\n\n(fn CACHE TYPES-IN-SCOPE)"])#@151 Clone TAG, and return it. Add SCOPETAGS as a tag-local scope. Stores the SCOPETAGS as a set of tag properties on the cloned tag. (fn TAG SCOPETAGS) (defalias 'semantic-scope-tag-clone-with-scope #[514 "\300\211\206 \211@\262\211A@\262\301\3028\262!\301\3038\262!\3048\262\257\266\202\305\306#\207" [nil copy-sequence 2 3 4 semantic--tag-put-property scope] 11 (#$ . 4501)])#@72 Get from TAG the list of tags comprising the scope from TAG. (fn TAG) (defalias 'semantic-scope-tag-get-scope #[257 "\211\300\301\3028\262\"\207" [scope plist-get 3] 7 (#$ . 4900)])#@153 Return a list of types currently in scope at POSITION. This is based on what tags exist at POSITION, and any associated types available. (fn POSITION) (defalias 'semantic-analyze-scoped-types #[257 "\303\211\304\305\306!\304\204\"\211\262\204\" \262\n\205 \307\n\"\262\203M\211\204M\302N\203<\307\302N\"\211\262\204\"\211\310N\206F\211\311N\262\262\202\"\266\203\211\262\205a\211\203_N\205aJ\266\203\206\326\211\211\312N\262\205\326\211\211\312N\262\304\305\306!\304\204\225\211\262\204\225 \262\n\205\223\307\n\"\262\203\300\211\204\300\302N\203\257\307\302N\"\211\262\204\225\211\310N\206\271\211\311N\262\262\202\225\266\203\211\262\205\324\211\203\322N\205\324J\266\203\262\211\203\340\211!\207\313!\207" [mode-local-active-mode major-mode mode-local-symbol-table semantic-analyze-scoped-types nil override-flag symbol-name intern-soft mode-local-parent derived-mode-parent mode-local--overload-obsolete semantic-analyze-scoped-types-default] 13 (#$ . 5093)]) (put 'semantic-analyze-scoped-types 'mode-local-overload t)#@119 Return a list of types currently in scope at POSITION. Use `semantic-ctxt-scoped-types' to find types. (fn POSITION) (defalias 'semantic-analyze-scoped-types-default #[257 "\302\303!\210\212\211b\210\304\305 \211\203\333\211@;\203J\306@!\206\312\307\310!!\304\203A@@\211@\262\230\203:@B\262A\262\202$\211\237\266\202)@\202\312\211@\3111y\211:\205s\211@;\205s\211A@9\205s\211A@\205s\3128<\205s\3138<0\262\202}\210\304\262\203\311\314@!\203\304\306@\211@\262!\206\312\307\310!!\304\203\273@\211@\262@\211@\262\230\203\264@B\262A\262\202\232\211\237\266\202)@\202\312\211@\202\312\304\211\203\323\211B\262\210\211A\262\202 \210\211\237\262\211\205\350\315\304\")\207" [semantic-case-fold case-fold-search require semantic/db-typecache nil semantic-ctxt-scoped-types semanticdb-typecache-find semantic-something-to-tag-table semantic-flatten-tags-table (error) 2 3 semantic-tag-prototype-p semanticdb-typecache-merge-streams] 8 (#$ . 6198)])#@298 Return a list of types in order of nesting for the context of POSITION. If POSITION is in a method with a named parent, find that parent, and identify it's scope via overlay instead. Optional SCOPETYPES are additional scoped entities in which our parent might be found. (fn POSITION SCOPEDTYPES) (defalias 'semantic-analyze-scope-nested-tags #[514 "\303\211\304\305\306!\304\204\"\211\262\204\" \262\n\205 \307\n\"\262\203M\211\204M\302N\203<\307\302N\"\211\262\204\"\211\310N\206F\211\311N\262\262\202\"\266\203\211\262\205a\211\203_N\205aJ\266\203\206\326\211\211\312N\262\205\326\211\211\312N\262\304\305\306!\304\204\225\211\262\204\225 \262\n\205\223\307\n\"\262\203\300\211\204\300\302N\203\257\307\302N\"\211\262\204\225\211\310N\206\271\211\311N\262\262\202\225\266\203\211\262\205\324\211\203\322N\205\324J\266\203\262\211\203\341\211\"\207\313\"\207" [mode-local-active-mode major-mode mode-local-symbol-table semantic-analyze-scope-nested-tags nil override-flag symbol-name intern-soft mode-local-parent derived-mode-parent mode-local--overload-obsolete semantic-analyze-scope-nested-tags-default] 14 (#$ . 7206)]) (put 'semantic-analyze-scope-nested-tags 'mode-local-overload t)#@400 Return a list of types in order of nesting for the context of POSITION. If POSITION is in a method with a named parent, find that parent, and identify it's scope via overlay instead. Optional SCOPETYPES are additional scoped entities in which our parent might be found. This only finds ONE immediate parent by name. All other parents returned are from nesting data types. (fn POSITION SCOPETYPES) (defalias 'semantic-analyze-scope-nested-tags-default #[514 "\300\301!\210\212\203\fb\210\302\303`!!\211@A@\304\2036\305\211A@\262=\266\202\2046A\262A@\262\202\235\203HA\262A@\262\2026\203\263\306!\203\263\307!\210\303`!\262\302\310\311\"!\304\203~\312\302!!\211\262\203~\211B\262A\262\202c\204\261\302!\262\203\255@\211A@\262\305=\203\255@\235\204\246@B\262A\262\202\210\237\262\266\211A@\262\313=\203\211\211\314\315\3168\262\"\266\204\211\203 \211;\203\332\211\202$\211\3171\211:\205\211@;\205\211A@9\205\211A@\205\3168<\205\3208<0\262\202\f\210\304\262\203\211\211@\262\202$\211<\205$\211@;\205$\211@\321!\211:\2030\211\2022\211C\304\322 \304\203\323\310\311\n\"@C\"\262\312!\262\211\203^\211\305\211A@\262=\266\202\204\205\324\323\310\325 @B\"\"\326\327 #\210\326\330#\210\326\331#\210\332\305#\266\202\211\203\211\3171\267\211:\205\261\211@;\205\261\211A@9\205\261\211A@\205\261\3168<\205\261\3208<0\262\202\273\210\304\262\204\370\211@\3171\355\211:\205\347\211@;\205\347\211A@9\205\347\211A@\205\347\3168<\205\347\3208<0\262\202\361\210\304\262\203\370\211@\262\323C\"\262A\262\2026\262\266\210)\207" [require semantic/analyze reverse semantic-find-tag-by-overlay nil type semantic-tag-with-position-p semantic-go-to-tag mapcar semantic-tag-name semanticdb-typecache-find function :parent plist-get 2 (error) 3 semantic-analyze-split-name semantic-scope-cache append apply semantic-tag-type-members eieio-oset parents scope fullscope semantic-analyze-find-tag] 19 (#$ . 8480)])#@304 Return the full lineage of tags from PARENTS. The return list is of the form ( TAG . PROTECTION ), where TAG is a tag, and PROTECTION is the level of protection offered by the relationship. Optional SCOPETYPES are additional scoped entities in which our parent might be found. (fn PARENTS SCOPEDTYPES) (defalias 'semantic-analyze-scope-lineage-tags #[514 "\303\211\304\305\306!\304\204\"\211\262\204\" \262\n\205 \307\n\"\262\203M\211\204M\302N\203<\307\302N\"\211\262\204\"\211\310N\206F\211\311N\262\262\202\"\266\203\211\262\205a\211\203_N\205aJ\266\203\206\326\211\211\312N\262\205\326\211\211\312N\262\304\305\306!\304\204\225\211\262\204\225 \262\n\205\223\307\n\"\262\203\300\211\204\300\302N\203\257\307\302N\"\211\262\204\225\211\310N\206\271\211\311N\262\262\202\225\266\203\211\262\205\324\211\203\322N\205\324J\266\203\262\211\203\341\211\"\207\313\"\207" [mode-local-active-mode major-mode mode-local-symbol-table semantic-analyze-scope-lineage-tags nil override-flag symbol-name intern-soft mode-local-parent derived-mode-parent mode-local--overload-obsolete semantic-analyze-scope-lineage-tags-default] 14 (#$ . 10538)]) (put 'semantic-analyze-scope-lineage-tags 'mode-local-overload t)#@303 Return the full lineage of tags from PARENTS. The return list is of the form ( TAG . PROTECTION ), where TAG is a tag, and PROTECTION is the level of protection offered by the relationship. Optional SCOPETYPES are additional scoped entities in which our parent might be found. (fn PARENTS SCOPETYPES) (defalias 'semantic-analyze-scope-lineage-tags-default #[514 "\300C\301 \302\303#\210\302\304#\210\302\305#\210\211\2030\211@\306\307\310##\210A\266\202\202\210\242\207" [nil semantic-scope-cache eieio-oset parents scope fullscope semantic-analyze-scoped-inherited-tag-map make-closure #[257 "\211\211@\262\302\300\"\211\303=\203\304\202\211\301B\301\242B\240\207" [V0 V1 semantic-tag-type-superclass-protection public protected] 7 "\n\n(fn NEWPARENT)"]] 12 (#$ . 11823)])#@299 Return accessible tags when TYPELIST and PARENTLIST is in scope. Tags returned are not in the global name space, but are instead scoped inside a class or namespace. Such items can be referenced without use of "object.function()" style syntax due to an implicit "object". (fn TYPELIST PARENTLIST) (defalias 'semantic-analyze-scoped-tags #[514 "\303\211\304\305\306!\304\204\"\211\262\204\" \262\n\205 \307\n\"\262\203M\211\204M\302N\203<\307\302N\"\211\262\204\"\211\310N\206F\211\311N\262\262\202\"\266\203\211\262\205a\211\203_N\205aJ\266\203\206\326\211\211\312N\262\205\326\211\211\312N\262\304\305\306!\304\204\225\211\262\204\225 \262\n\205\223\307\n\"\262\203\300\211\204\300\302N\203\257\307\302N\"\211\262\204\225\211\310N\206\271\211\311N\262\262\202\225\266\203\211\262\205\324\211\203\322N\205\324J\266\203\262\211\203\341\211\"\207\313\"\207" [mode-local-active-mode major-mode mode-local-symbol-table semantic-analyze-scoped-tags nil override-flag symbol-name intern-soft mode-local-parent derived-mode-parent mode-local--overload-obsolete semantic-analyze-scoped-tags-default] 14 (#$ . 12630)]) (put 'semantic-analyze-scoped-tags 'mode-local-overload t)#@351 Return accessible tags when TYPELIST and HALFSCOPE is in scope. HALFSCOPE is the current scope partially initialized. Tags returned are not in the global name space, but are instead scoped inside a class or namespace. Such items can be referenced without use of "object.function()" style syntax due to an implicit "object". (fn TYPELIST HALFSCOPE) (defalias 'semantic-analyze-scoped-tags-default #[514 "\300\211\301\302\"\2032@\211\303\304\3058\262\"\266\203\211;\203*\211\306\230\203*@B\262\210A\262\202\203T\307\310#\210\307\311#\210\312\313@\"\"\262A\262\2022\211\203v\307\310#\210\307\311#\210\312\313@\"\"\262\211A\262\202T\300\211\203\215\211@\312\314!\"\262A\266\202\202x\210\312\"\262\210\207" [nil eieio-oref parents :type plist-get 2 "namespace" eieio-oset scope fullscope append semantic-analyze-scoped-type-parts semantic-analyze-type-constants] 12 (#$ . 13882)])#@302 Calculate the access class for TYPE as defined by the current SCOPE. Access is related to the :parents in SCOPE. If type is a member of SCOPE then access would be `private'. If TYPE is inherited by a member of SCOPE, the access would be `protected'. Otherwise, access is `public'. (fn TYPE SCOPE) (defalias 'semantic-analyze-scope-calculate-access #[514 "\303\211\304\305\306!\304\204\"\211\262\204\" \262\n\205 \307\n\"\262\203M\211\204M\302N\203<\307\302N\"\211\262\204\"\211\310N\206F\211\311N\262\262\202\"\266\203\211\262\205a\211\203_N\205aJ\266\203\206\326\211\211\312N\262\205\326\211\211\312N\262\304\305\306!\304\204\225\211\262\204\225 \262\n\205\223\307\n\"\262\203\300\211\204\300\302N\203\257\307\302N\"\211\262\204\225\211\310N\206\271\211\311N\262\262\202\225\266\203\211\262\205\324\211\203\322N\205\324J\266\203\262\211\203\341\211\"\207\313\"\207" [mode-local-active-mode major-mode mode-local-symbol-table semantic-analyze-scope-calculate-access nil override-flag symbol-name intern-soft mode-local-parent derived-mode-parent mode-local--overload-obsolete semantic-analyze-scope-calculate-access-default] 14 (#$ . 14820)]) (put 'semantic-analyze-scope-calculate-access 'mode-local-overload t)#@87 Calculate the access class for TYPE as defined by the current SCOPE. (fn TYPE SCOPE) (defalias 'semantic-analyze-scope-calculate-access-default #[514 "\300!\203\273\301\302\"\301\303\"\3042\272\211\203-\211@\305\"\203&\306\304\307\"\210A\266\202\202\210\211\211\203S\211@\211@A\305\"\203J\306\304\310\311\"A\"\210\266A\266\202\202/\210\312\211\313\314\3158\262\"\266\203!\316\203\202@\211A@\262\317=\203{@B\262A\262\202e\211\237\266\202\211\211\203\266\211@\211\203\256\211@\211@\262\211@\262\230\203\247\306\304\307\"\210A\266\202\202\216\210A\266\202\202\207\266\3200\207\320\207" [semantic-scope-cache-p eieio-oref parents parentinheritance moose semantic-tag-similar-p throw private assoc ((public . private) (protected . protected) (private . public)) semantic-something-to-tag-table :members plist-get 2 nil friend public] 13 (#$ . 16118)])#@207 Return a list of slots that are valid completions from the list of SLOTS. If a tag in SLOTS has a named parent, then that implies that the tag is not something you can complete from within TYPE. (fn TYPE) (defalias 'semantic-completable-tags-from-type #[257 "\300!\301\211\203\236\211@\211\302\211A@\262=\266\202\203q\303\211@\262\211@\262D!\304\211@\262!\2064\304!\211\205;\305!\203l\306!\203d\211\211\203_\211@\307\301# B\262 A\266\202\202G\266\202\227\310\"\262\210\266\202\227\211\311\211A@\262=\266\202\203\222\211\211\211\312\313\3148\262\"\266\204\204\227\211B\262A\266\202\202\210\211\237\207" [semantic-tag-components nil using semantic-analyze-unsplit-name semanticdb-typecache-find semantic-tag-file-name semantic-completable-tags-from-type semantic-tag-copy append function :parent plist-get 2] 15 (#$ . 17025)])#@272 Return all parts of TYPE, a tag representing a TYPE declaration. SCOPE is the scope object. NOINHERIT turns off searching of inherited tags. PROTECTION specifies the type of access requested, such as `public' or `private'. (fn TYPE &optional SCOPE NOINHERIT PROTECTION) (defalias 'semantic-analyze-scoped-type-parts #[1025 "\205\\\300\"\301!\302#\303!?\205\"\304#\305 !\204V\306\211\203P\211@\303!\203?\211B\262\202I\307\306#B\262A\266\202\202+\210\211\237\262\210\310\"\266\205\207" [semantic-analyze-scope-calculate-access semantic-completable-tags-from-type semantic-find-tags-by-scope-protection semantic-tag-file-name semantic-analyze-scoped-inherited-tags semantic-tag-in-buffer-p nil semantic-tag-copy append] 16 (#$ . 17908)])#@524 Return all tags that TYPE inherits from. Argument SCOPE specify additional tags that are in scope whose tags can be searched when needed, OR it may be a scope object. ACCESS is the level of access we filter on child supplied tags. For languages with protection on specific methods or slots, it should strip out those not accessible by methods of TYPE. An ACCESS of `public' means not in a method of a subclass of type. A value of `private' means we can access private parts of the originating type. (fn TYPE SCOPE ACCESS) (defalias 'semantic-analyze-scoped-inherited-tags #[771 "\300C\301\302\303\n%#\210\211\242\207" [nil semantic-analyze-scoped-inherited-tag-map make-closure #[257 "\211\211@\262\304\303\"\301\305=\205\211\305=??\205#\300\211\242\306\302\307$\244\240\207" [V0 V1 V2 V3 semantic-tag-type-superclass-protection public semantic-analyze-scoped-type-parts t] 10 "\n\n(fn P)"]] 12 (#$ . 18688)])#@211 Map all parents of TYPE to FCN. Return tags of all the types. Argument SCOPE specify additional tags that are in scope whose tags can be searched when needed, OR it may be a scope object. (fn TYPE FCN SCOPE) (defalias 'semantic-analyze-scoped-inherited-tag-map #[771 "\300\301!\210\302!\303\211\212\203Y\304!\203Y\212\305!\210\306 \262\307`!B\310`\"\303\311\312#\210\311\313#\210\204?\203K\314\"\262\311\315#\210\311\316\317##)\266\211\203\354\211@\211;\203i\211\202\270\211\3201\227\211:\205\221\211@;\205\221\211A@9\205\221\211A@\205\221\3218<\205\221\3228<0\262\202\233\210\303\262\203\254\323!\203\254\211\211@\262\202\270\211<\205\270\211@;\205\270\211\262\3241\320\325\326#\206\314\325\326 #0\202\322\210\303\262\203\345!\210\327  #\210A\266\202\202Z)\210\303\207" [require semantic/analyze semantic-tag-type-superclasses nil semantic-tag-with-position-p semantic-go-to-tag semantic-scope-cache semantic-analyze-scoped-types semantic-analyze-scope-nested-tags eieio-oset scopetypes parents semantic-analyze-scoped-tags scope fullscope append (error) 2 3 semantic-tag-prototype-p (error) semantic-analyze-find-tag type semantic-analyze-scoped-inherited-tag-map] 17 (#$ . 19621)])#@201 Calculate the scope at POINT. If POINT is not provided, then use the current location of point. The class returned from the scope calculation is variable `semantic-scope-cache'. (fn &optional POINT) (defalias 'semantic-calculate-scope #[256 "\302\303!\205\370\205\370\304\305!\210\211\204`\262\306\307!\203!\310 \210\311 \210\212\211b\210\312 \313 \314\"\315\316\317\"\"\2049\320!\210\316\317\"\203S\3211O\322\323\324 #0\210\202\340\210\202\340\325!\326\"\327\"\322\317#\210\322\330#\210\322\331#\210\322\332#\210\204\205\203\333\"\334 \3351\217\324 0\202\221\210\336\204\274\327\337\"\"\262\203\274\322\332#\210\204\264\205\272\333\"\262\322\340#\210\322\341\337 \n##\210\322\342#\210\322\323#\266\343!\210\306\307!\203\362\304\344!\210\345!\210\346!\266\202)\207" [semanticdb-current-database semanticdb-current-table featurep semantic/db require semantic/db-typecache called-interactively-p any semantic-fetch-tags semantic-scope-reset-cache semantic-current-tag semanticdb-cache-get semantic-scope-cache semantic-equivalent-tag-p eieio-oref tag semantic-reset (error) eieio-oset localvar semantic-get-all-local-variables semantic-analyze-scoped-types semantic-analyze-scope-nested-tags semantic-analyze-scope-lineage-tags scopetypes parents parentinheritance semantic-analyze-scoped-tags semantic-get-local-arguments (error) nil append scope fullscope localargs semanticdb-typecache-add-dependant eieio-datadebug data-debug-show clone] 16 (#$ . 20888) nil])#@232 Find the tag with NAME, and optional CLASS in the current SCOPE-IN. Searches various elements of the scope for NAME. Return ALL the hits in order, with the first tag being in the closest scope. (fn NAME &optional CLASS SCOPE-IN) (defalias 'semantic-scope-find #[769 "\211\206\302 \303\304!\203\247\305\306\307\"!\303\2033@\211@\262\230\203,@B\262A\262\202\211\237\266\202)\305\306\310\"!\303\203^@\211@\262\230\203W@B\262A\262\202A\211\237\266\202)\306\311\"\305!\303\203\212 @\211@\262\230\203\203@B\262A\262\202m\211\237\266\202)\306\312\"\305!\303\203\267 @\211@\262\230\203\260@B\262A\262\202\232\211\237\266\202) \203\362\305\313$!\303\203\353 @\211A@\262=\203\344@B\262A\262\202\315\211\237\266\202\202\372\313$\262\204\244\204 \203\244\314 !\211:\203\243\211\203\224\313\305!\303\203:@@\211@\262\230\2033@B\262A\262\202\211\237\266\202)\305!\303\203c@@\211@\262\230\203\\@B\262A\262\202F\211\237\266\202)\"\262\204v\303\262\202\215\211A\203\215@\211\315\316\3178\262\"\266\203\262\211A\262\202\320 \312\313\306\312\"\"#\210\210\207\203\317\305!\303\203\314@\211A@\262=\203\305@B\262A\262\202\257\211\237\207\207" [semantic-case-fold case-fold-search semantic-calculate-scope nil semantic-scope-cache-p semantic-something-to-tag-table eieio-oref localargs localvar fullscope typescope append semantic-analyze-split-name :members plist-get 2 eieio-oset] 20 (#$ . 22440)]) (byte-code "\300\301\302\303\302\304%\210\305\306!\207" [cl-generic-define-method semantic-analyze-show nil ((context semantic-scope-cache)) #[257 "\300\301!\210\302\303\304\"\305\"\210\302\303\306\"\307\"\210\302\303\310\"\311\"\210\302\303\312\"\313\"\210\302\303\314\"\315\"\207" [require semantic/analyze semantic-analyze-princ-sequence eieio-oref scopetypes "-> ScopeTypes: " parents "-> Parents: " scope "-> Scope: " localargs "-> Local Args: " localvar "-> Local Vars: "] 5 "Insert CONTEXT into the current buffer in a nice way.\n\n(fn CONTEXT)"] provide semantic/scope] 6)