extend support for Name usage with Spec based Suites

The 'testcase.AsSuite' spec option allows you to provide a name to enhance convenience while using a Spec as a testing suite.

Spec.go

@@ -102,7 +102,9 @@ type Spec struct {
 	seed     int64
 	isTest   bool
 	sync     bool
-	isSuite  bool
+
+	isSuite   bool
+	suiteName string
 }
 
 type (
@@ -647,6 +649,7 @@ func (spec *Spec) AsSuite() SpecSuite { return SpecSuite{S: spec} }
 
 type SpecSuite struct{ S *Spec }
 
+func (suite SpecSuite) Name() string           { return suite.S.suiteName }
 func (suite SpecSuite) Test(t *testing.T)      { suite.S.Spec(NewSpec(t)) }
 func (suite SpecSuite) Benchmark(b *testing.B) { suite.S.Spec(NewSpec(b)) }
 func (suite SpecSuite) Spec(s *Spec)           { suite.S.Spec(s) }

Spec_test.go

@@ -6,6 +6,7 @@ import (
 	"runtime"
 	"sort"
 	"strconv"
+	"strings"
 	"sync"
 	"testing"
 	"time"
@@ -1527,3 +1528,19 @@ func TestSpec_AsSuite(t *testing.T) {
 		assert.True(t, ran)
 	})
 }
+
+func TestRunSuite_spectAsSuite(t *testing.T) {
+	var name1, name2 string
+
+	suite1 := testcase.NewSpec(nil, testcase.AsSuite("Suite-namE-1"))
+	suite1.Test("tst1", func(t *testcase.T) { name1 = t.Name() })
+
+	suite2 := testcase.NewSpec(nil, testcase.AsSuite("Suite-namE-2"))
+	suite2.Test("tst2", func(t *testcase.T) { name2 = t.Name() })
+
+	dtb := &doubles.TB{}
+	testcase.RunSuite(dtb, suite1, suite2.AsSuite())
+
+	assert.True(t, strings.HasSuffix(name1, "Suite-namE-1/tst1"))
+	assert.True(t, strings.HasSuffix(name2, "Suite-namE-2/tst2"))
+}

Suite.go

@@ -2,16 +2,20 @@ package testcase
 
 import (
 	"fmt"
+	"strings"
 	"testing"
 
 	"github.com/adamluzsi/testcase/internal"
 )
 
 // AsSuite will flag the Spec as a Suite.
 // Calling AsSuite will delay test until the Spec.Spec function is called
-func AsSuite() SpecOption {
+func AsSuite(name ...string) SpecOption {
 	return specOptionFunc(func(s *Spec) {
 		s.isSuite = true
+		if 0 < len(name) {
+			s.suiteName = strings.Join(name, " ")
+		}
 	})
 }
 
@@ -89,6 +93,8 @@ func getSuiteName(c interface{}) (name string) {
 	switch c := c.(type) {
 	case interface{ Name() string }:
 		return c.Name()
+	case *Spec:
+		return c.suiteName
 	default:
 		return internal.SymbolicName(c)
 	}