ID fields can sometimes be generated with ForeignRefs #1615

    EntityDef
        { entityHaskell = EntityNameHS{unEntityNameHS = "ExplicitPrimaryKey"}
        , entityDB = EntityNameDB{unEntityNameDB = "explicit_primary_key"}
        , entityId =
            EntityIdField
                ( FieldDef
                    { fieldHaskell = FieldNameHS{unFieldNameHS = "Id"}
                    , fieldDB = FieldNameDB{unFieldNameDB = "id"}
                    , fieldType = FTTypeCon Nothing "Text"
                    , fieldSqlType = SqlString
                    , fieldAttrs = [FieldAttrOther "Text"]
                    , fieldStrict = False
                    , fieldReference =
                        ForeignRef (EntityNameHS{unEntityNameHS = "ExplicitPrimaryKey"})
                    , fieldCascade = FieldCascade{fcOnUpdate = Nothing, fcOnDelete = Nothing}
                    , fieldComments = Nothing
                    , fieldGenerated = Nothing
                    , fieldIsImplicitIdColumn = True
                    }
                )
        , [...]
        }