add factory methods for EType and descendents

The older pattern of making embeddable companion objects into
`ETypes` (e.g., `case class Email extends EType[Email]`) still works,
but now you can just mention the `EType` directly, when building your
subdomain. (E.g., `Subdomain(???, ???, ETypePool(EType[Email]))`).

Author: sullivan-

CHANGELOG.md

@@ -1,7 +1,13 @@
-# Longevity Change Log
+# Longevity Changelog
 
-## [0.11-SNAPSHOT]
+## [0.11.0] - 2016.08.29 - API Simplifications
 
+- 2016.08.29 - Add factory methods for `EType` and all its
+  descendents. The older pattern of making embeddable companion
+  objects into `ETypes` (e.g., `case class Email extends
+  EType[Email]`) still works, but now you can just mention the `EType`
+  directly, when building your subdomain. (E.g., `Subdomain(???, ???,
+  ETypePool(EType[Email]))`).
 - 2016.08.28 - Get rid of `DerivedType.polyType` and
   `DerivedPType.polyPType`. `DerivedType` and `DerivedPType` are now
   abstract classes instead of traits, so users may need to reorder

src/main/scala/longevity/subdomain/embeddable/DerivedType.scala

@@ -5,8 +5,17 @@ import emblem.TypeKey
 /** one of the derived types in a family of domain entity types. mix this in to
  * your [[EType]] when it represents a concrete subtype of a [[PolyType]].
  */
-abstract class DerivedType[P <: Embeddable : TypeKey, Poly >: P <: Embeddable : TypeKey] extends EType[P] {
+abstract class DerivedType[E <: Embeddable : TypeKey, Poly >: E <: Embeddable : TypeKey] extends EType[E] {
 
   private[longevity] val polyTypeKey: TypeKey[Poly] = implicitly[TypeKey[Poly]]
 
 }
+
+/** contains a factory method for creating `DerivedTypes` */
+object DerivedType {
+
+  /** create and return an `DerivedType` for types `E` and `Poly` */
+  def apply[E <: Embeddable : TypeKey, Poly >: E <: Embeddable : TypeKey] = new DerivedType[E, Poly] {
+  }
+
+}

src/main/scala/longevity/subdomain/embeddable/EType.scala

@@ -12,3 +12,12 @@ abstract class EType[E <: Embeddable : TypeKey] {
   val eTypeKey: TypeKey[E] = typeKey[E]
 
 }
+
+/** contains a factory method for creating `ETypes` */
+object EType {
+
+  /** create and return an `EType` for type `E` */
+  def apply[E <: Embeddable : TypeKey] = new EType[E] {
+  }
+
+}

src/main/scala/longevity/subdomain/embeddable/EntityType.scala

@@ -4,3 +4,12 @@ import emblem.TypeKey
 
 /** a type class for a [[Entity domain entity]] */
 abstract class EntityType[E <: Entity : TypeKey] extends EType[E]
+
+/** contains a factory method for creating `EntityTypes` */
+object EntityType {
+
+  /** create and return an `EntityType` for type `E` */
+  def apply[E <: Entity : TypeKey] = new EntityType[E] {
+  }
+
+}

src/main/scala/longevity/subdomain/embeddable/PolyType.scala

@@ -1,7 +1,18 @@
 package longevity.subdomain.embeddable
 
+import emblem.TypeKey
+
 /** the base type for a family of domain entity types. mix this in to your
  * [[EType]] when it represents an abstract embeddable type with concrete
  * subtypes.
  */
 trait PolyType[Poly <: Embeddable] extends EType[Poly]
+
+/** contains a factory method for creating `PolyTypes` */
+object PolyType {
+
+  /** create and return an `PolyType` for type `Poly` */
+  def apply[Poly <: Embeddable : TypeKey] = new PolyType[Poly] {
+  }
+
+}

src/main/scala/longevity/subdomain/embeddable/ValueType.scala

@@ -4,3 +4,12 @@ import emblem.TypeKey
 
 /** a value type. functionally equivalent to an [[EntityType]] */
 abstract class ValueType[A <: ValueObject : TypeKey] extends EType[A]
+
+/** contains a factory method for creating `ValueTypes` */
+object ValueType {
+
+  /** create and return an `ValueType` for type `A` */
+  def apply[A <: ValueObject : TypeKey] = new ValueType[A] {
+  }
+
+}

src/test/scala/longevity/integration/subdomain/complexConstraint/Email.scala

@@ -1,10 +1,7 @@
 package longevity.integration.subdomain.complexConstraint
 
 import longevity.subdomain.embeddable.ValueObject
-import longevity.subdomain.embeddable.ValueType
 
 case class Email(email: String) extends ValueObject {
   if (!email.contains('@')) throw new ConstraintValidationException("no '@' in email")
 }
-
-object Email extends ValueType[Email]

src/test/scala/longevity/integration/subdomain/complexConstraint/package.scala

@@ -1,12 +1,13 @@
 package longevity.integration.subdomain
 
-import emblem.emblematic.traversors.sync.CustomGeneratorPool
 import emblem.emblematic.traversors.sync.CustomGenerator
+import emblem.emblematic.traversors.sync.CustomGeneratorPool
 import longevity.context.Cassandra
 import longevity.context.LongevityContext
 import longevity.context.Mongo
 import longevity.subdomain.Subdomain
 import longevity.subdomain.embeddable.ETypePool
+import longevity.subdomain.embeddable.ValueType
 import longevity.subdomain.ptype.PTypePool
 
 /** covers a root entity with a simple shorthand constraint */
@@ -15,7 +16,7 @@ package object complexConstraint {
   val subdomain = Subdomain(
     "Complex Constraint",
     PTypePool(ComplexConstraint),
-    ETypePool(Email))
+    ETypePool(ValueType[Email]))
 
   val emailGenerator = CustomGenerator.simpleGenerator[Email] { generator =>
     Email(s"{generator.generate[String]}@{generate.generate[String]")

src/test/scala/longevity/integration/subdomain/component/Component.scala

@@ -1,8 +1,5 @@
 package longevity.integration.subdomain.component
 
 import longevity.subdomain.embeddable.Entity
-import longevity.subdomain.embeddable.EntityType
 
 case class Component(id: String, tag: String) extends Entity
-
-object Component extends EntityType[Component]

src/test/scala/longevity/integration/subdomain/component/package.scala

@@ -4,13 +4,14 @@ import longevity.context.Cassandra
 import longevity.context.LongevityContext
 import longevity.context.Mongo
 import longevity.subdomain.embeddable.ETypePool
+import longevity.subdomain.embeddable.EntityType
 import longevity.subdomain.Subdomain
 import longevity.subdomain.ptype.PTypePool
 
 /** covers a root entity with a single component entity */
 package object component {
 
-  val subdomain = Subdomain("Component", PTypePool(WithComponent), ETypePool(Component))
+  val subdomain = Subdomain("Component", PTypePool(WithComponent), ETypePool(EntityType[Component]))
   val mongoContext = LongevityContext(subdomain, Mongo)
   val cassandraContext = LongevityContext(subdomain, Cassandra)