Don Tomato's questions

Estou tentando usar o Entity Framework e o MongoDB.

Este é meu docker compose:

services:
  mongo-db:
    container_name: mongo-db
    image: mongo
    restart: always
    ports:
      - "27017:27017"

Entidade e contexto:

public class Order
{
    public string Id { get; set; }
    public string Name { get; set; }
}

public class OrdersDbContext(DbContextOptions options) : DbContext(options)
{
    public DbSet<Order> Orders { get; set; }

    protected override void OnModelCreating(ModelBuilder modelBuilder)
    {
        base.OnModelCreating(modelBuilder);
        modelBuilder.Entity<Order>().ToCollection("orders");
    }
}

É assim que estou tentando usá-lo:

var order = new Order
{
    Id = Helpers.GetNewId(),
    Name = "Some order"
};

var mongoClient = new MongoClient("mongodb://localhost:27017");
var dbContextOptions =
    new DbContextOptionsBuilder<OrdersDbContext>().UseMongoDB(mongoClient, "orders");
var ordersDb = new OrdersDbContext(dbContextOptions.Options);
ordersDb.Orders.Add(order);
ordersDb.SaveChanges();

Ao chamar SaveChanges, recebo este erro:

Exceção não tratada. MongoDB.Driver.MongoIncompatibleDriverException: O servidor em localhost:27017 relata a versão 4 do wire, mas esta versão do driver requer pelo menos a 7 (MongoDB 4.0.0).

em MongoDB.Driver.MongoIncompatibleDriverException.ThrowIfNotSupported(descrição do ClusterDescription)
em MongoDB.Driver.Core.Clusters.Cluster.SelectServerHelper.SelectServer()
em MongoDB.Driver.Core.Clusters.Cluster.SelectServer(seletor IServerSelector, CancellationToken cancellationToken)
em MongoDB.Driver.Core.Clusters.IClusterExtensions.SelectServerAndPinIfNeeded(cluster IClusterInternal, sessão ICoreSessionHandle, seletor IServerSelector, IReadOnlyCollection 1 deprioritizedServers, CancellationToken cancellationToken) at MongoDB.Driver.Core.Bindings.WritableServerBinding.GetWriteChannelSource(IReadOnlyCollection1 deprioritizedServers, CancellationToken cancellationToken)
em MongoDB.Driver.Core.Bindings.WritableServerBinding.GetWriteChannelSource(CancellationToken cancellationToken) em MongoDB.Driver.Core.Bindings.ReadWriteBindingHandle.GetWriteChannelSource(Token de cancelamentoToken de cancelamento)

Isso não faz sentido para mim, já que a versão atual do mongodb no container é 8.0.3. Alguma ideia de como consertar isso?

Digamos que eu tenha o script babashka common.clj:

#!/usr/bin/env bb

(ns common)

(defn my-function []
  (println "do something"))

Quando tento importá-lo de outro script:

#!/usr/bin/env bb

(ns example
  (:require [common :as c]))

(c/my-function)

Apesar de haver, common.cljrecebo um erro:

(:require [common :as c]))
^--- Could not locate common.bb, common.clj or common.cljc on classpath.

É possível consertar?

De acordo com a documentação que tenho que usar, into-arraymas não funciona.

(java.nio.file.Paths/get (into-array ["myfolder" "aaa.txt"]))
; Execution error (ClassCastException) at msm.config/eval10595 (form-init12148349852569231555.clj:153).
; class [Ljava.lang.String; cannot be cast to class java.net.URI ([Ljava.lang.String; and java.net.URI are in module java.base of loader 'bootstrap')

Então, não entendo completamente como fazer isso ...

Tenho uma macro (simplifiquei bastante tudo):

(defmacro m1 [error & messages]
  `(if ~error
     (str "Error: " ~@messages)
     (str ~@messages)))

Funciona muito bem. Mas agora quero reutilizá-lo em uma função com args [& messages]:

Se eu definir esta função da seguinte maneira:

(defn error [& messages]
  (m1 true messages))

Funciona, mas incorretamente, é claro. Se eu ligar, (error "msg")ele retorna"Error: (\"msg\")"

Mas se eu fizer algo como:

(defn error [& messages]
  (apply m1 true messages))

Causa um erro

; Erro de sintaxe ao compilar em .... ; Não é possível obter o valor de uma macro

Então a questão é como passar a lista de mensagens para uma macro variada?