master 4f3e95bed5 2/2: CEDET: Try and (re)fix bug#56902, in a better way

[Stefan Monnier]

branch: master
commit 4f3e95bed523be11f3be7b791c6ae909ffa77a8d
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>

    CEDET: Try and (re)fix bug#56902, in a better way
    
    * lisp/cedet/semantic/complete.el (semantic-displayer-abstract):
    Move definition before first use (in `semantic-displayer-focus-abstract`).
---
 lisp/cedet/semantic/complete.el | 31 ++++++++++++++++---------------
 1 file changed, 16 insertions(+), 15 deletions(-)

diff --git a/lisp/cedet/semantic/complete.el b/lisp/cedet/semantic/complete.el
index 2597a431e1..dc270603a0 100644
--- a/lisp/cedet/semantic/complete.el
+++ b/lisp/cedet/semantic/complete.el
@@ -314,6 +314,22 @@ HISTORY is a symbol representing a variable to story the 
history in."
 
 
 ;; Abstract baseclass for any displayer which supports focus
+
+(defclass semantic-displayer-abstract ()
+  ((table :type (or null semanticdb-find-result-with-nil)
+         :initform nil
+         :protection :protected
+         :documentation "List of tags this displayer is showing.")
+   (last-prefix :type string
+               :protection :protected
+               :documentation "Prefix associated with slot `table'.")
+   )
+  "Abstract displayer baseclass.
+Manages the display of some number of tags.
+Provides the basics for a displayer, including interacting with
+a collector, and tracking tables of completion to display."
+  :abstract t)
+
 (defclass semantic-displayer-focus-abstract (semantic-displayer-abstract)
   ((focus :type number
          :protection :protected
@@ -1317,21 +1333,6 @@ Uses semanticdb for searching all tags in the current 
project."
 ;; * semantic-displayer-scroll-request
 ;; * semantic-displayer-focus-request
 
-(defclass semantic-displayer-abstract ()
-  ((table :type (or null semanticdb-find-result-with-nil)
-         :initform nil
-         :protection :protected
-         :documentation "List of tags this displayer is showing.")
-   (last-prefix :type string
-               :protection :protected
-               :documentation "Prefix associated with slot `table'.")
-   )
-  "Abstract displayer baseclass.
-Manages the display of some number of tags.
-Provides the basics for a displayer, including interacting with
-a collector, and tracking tables of completion to display."
-  :abstract t)
-
 (define-obsolete-function-alias 'semantic-displayor-cleanup
   #'semantic-displayer-cleanup "27.1")
 (cl-defmethod semantic-displayer-cleanup ((_obj semantic-displayer-abstract))