clarified signature: prefer enum types;
authorwenzelm
Tue, 29 Aug 2023 16:49:17 +0200
changeset 78601 604a7377725c
parent 78600 afb83ba8d24c
child 78602 92b6958e8787
clarified signature: prefer enum types;
src/Pure/Thy/latex.scala
--- a/src/Pure/Thy/latex.scala	Tue Aug 29 16:42:08 2023 +0200
+++ b/src/Pure/Thy/latex.scala	Tue Aug 29 16:49:17 2023 +0200
@@ -93,9 +93,7 @@
   /* tags */
 
   object Tags {
-    object Op extends Enumeration {
-      val fold, drop, keep = Value
-    }
+    enum Op { case fold, drop, keep }
 
     val standard = "document,theory,proof,ML,visible,-invisible,important,unimportant"
 
@@ -103,7 +101,7 @@
 
     def apply(spec: String): Tags =
       new Tags(spec,
-        (explode(standard) ::: explode(spec)).foldLeft(TreeMap.empty[String, Op.Value]) {
+        (explode(standard) ::: explode(spec)).foldLeft(TreeMap.empty[String, Op]) {
           case (m, tag) =>
             tag.toList match {
               case '/' :: cs => m + (cs.mkString -> Op.fold)
@@ -116,10 +114,10 @@
     val empty: Tags = apply("")
   }
 
-  class Tags private(spec: String, map: TreeMap[String, Tags.Op.Value]) {
+  class Tags private(spec: String, map: TreeMap[String, Tags.Op]) {
     override def toString: String = spec
 
-    def get(name: String): Option[Tags.Op.Value] = map.get(name)
+    def get(name: String): Option[Tags.Op] = map.get(name)
 
     def sty(comment_latex: Boolean): File.Content = {
       val path = Path.explode("isabelletags.sty")