Fix #5776: Allow explicitly adding a parent that is added by desugaring

Author: smarter

compiler/src/dotty/tools/dotc/typer/Typer.scala

@@ -1601,6 +1601,11 @@ class Typer extends Namer
       var result = if (isTreeType(tree)) typedType(tree)(superCtx) else typedExpr(tree)(superCtx)
       val psym = result.tpe.dealias.typeSymbol
       if (seenParents.contains(psym) && !cls.isRefinementClass) {
+        // Desugaring can adds parents to classes, but we don't want to emit an
+        // error if the same parent was explicitly added in user code.
+        if (!tree.span.isSourceDerived)
+          return EmptyTree
+
         if (!ctx.isAfterTyper) ctx.error(i"$psym is extended twice", tree.sourcePos)
       }
       else seenParents += psym
@@ -1635,7 +1640,7 @@ class Typer extends Namer
 
     completeAnnotations(cdef, cls)
     val constr1 = typed(constr).asInstanceOf[DefDef]
-    val parentsWithClass = ensureFirstTreeIsClass(parents mapconserve typedParent, cdef.nameSpan)
+    val parentsWithClass = ensureFirstTreeIsClass(parents.mapconserve(typedParent).filterConserve(!_.isEmpty), cdef.nameSpan)
     val parents1 = ensureConstrCall(cls, parentsWithClass)(superCtx)
 
     var self1 = typed(self)(ctx.outer).asInstanceOf[ValDef] // outer context where class members are not visible

tests/neg/duplicate-parents.scala

@@ -0,0 +1,2 @@
+case class Foo1(x: Int) extends Serializable with Serializable // error
+case class Foo2(x: Int) extends scala.Serializable with Serializable // error

tests/pos/duplicate-parents.scala

@@ -0,0 +1,14 @@
+case class Foo1(x: Int) extends Serializable
+case class Foo2(x: Int) extends scala.Serializable
+case class Foo3(x: Int) extends Product
+
+case object Foo4 extends Serializable
+
+object Scope {
+  class Serializable
+  case class Foo5(x: Int) extends Serializable
+
+  val f = Foo5(1)
+  f: Scope.Serializable
+  f: scala.Serializable
+}