Avoid unnecessary toString

Author: odersky

compiler/src/dotty/tools/dotc/core/TypeComparer.scala

@@ -1020,7 +1020,7 @@ class TypeComparer(@constructorOnly initctx: Context) extends ConstraintHandling
               case info2: TypeBounds =>
                 compareLower(info2, tyconIsTypeRef = true)
               case info2: ClassInfo =>
-                tycon2.name.toString.startsWith("Tuple") &&
+                tycon2.name.startsWith("Tuple") &&
                   defn.isTupleType(tp2) && recur(tp1, tp2.toNestedPairs) ||
                 tryBaseType(info2.cls)
               case _ =>

compiler/src/dotty/tools/dotc/transform/Instrumentation.scala

@@ -39,13 +39,13 @@ class Instrumentation extends MiniPhase { thisPhase =>
     ctx
 
   private def record(category: String, tree: Tree)(using Context): Tree = {
-    val key = Literal(Constant(s"$category${tree.sourcePos.show}"))
+    val key = Literal(Constant(s"$category@${tree.sourcePos.show}"))
     ref(defn.Stats_doRecord).appliedTo(key, Literal(Constant(1)))
   }
 
   override def transformApply(tree: Apply)(using Context): Tree = tree.fun match {
     case Select(nu: New, _) =>
-      cpy.Block(tree)(record(i"alloc/${nu.tpe}@", tree) :: Nil, tree)
+      cpy.Block(tree)(record(i"alloc/${nu.tpe}", tree) :: Nil, tree)
     case Select(_, name) if namesToRecord.contains(name) =>
       cpy.Block(tree)(record(i"alloc/$name", tree) :: Nil, tree)
     case _ =>