quill_lift_failure

val partitionsTableSchema = quote {
    querySchema[Partition](
      entity = "partitions",
      _.id -> "id",
      _.datasetId -> "dataset",
      _.partitionTime -> "partition_time",
      _.deletedAt -> "deleted_at"
    )
  }

  val revisionsTableSchema = quote {
    querySchema[Revision](
      entity = "revisions",
      _.id -> "id",
      _.partitionId -> "partition_id",
      _.url -> "url",
      _.publishedAt -> "published_at",
      _.metadata -> "metadata"
    )
  }
  
  // Fails with confusing error without proper message (scalas: Error while emitting DatasetRepository.scala value p)
  def retrievePartitions(datasetId: DatasetId) = {
    val quoted = quote {
      for {
        p <-  partitionsTableSchema.filter(p => p.datasetId == lift(datasetId))
        r <- latestRevision(p.id)
      } yield (p, r)
    }

    databaseClient.run(quoted)
  }

  private def latestRevision(partitionId: Long) = quote {
    revisionsTableSchema.join(r => r.partitionId == lift(partitionId))
      // Filter only latest revision
      .filter { r =>
        revisionsTableSchema
          .filter(_.partitionId == lift(partitionId))
          .map(_.id)
          .max.contains(r.id)
      }
  }