fix: adding locks to accounts in metadata

components/ledger/internal/machine/vm/machine.go

@@ -13,6 +13,7 @@ import (
 	"encoding/binary"
 	"fmt"
 	"math/big"
+	"slices"
 
 	"github.com/formancehq/ledger/internal/machine"
 
@@ -574,6 +575,9 @@ func (m *Machine) ResolveResources(ctx context.Context, store Store) ([]string,
 			if err != nil {
 				return nil, nil, err
 			}
+			if val.GetType() == machine.TypeAccount {
+				involvedAccountsMap[machine.Address(idx)] = string(val.(machine.AccountAddress))
+			}
 		case program.VariableAccountBalance:
 			acc, _ := m.getResource(res.Account)
 			address := string((*acc).(machine.AccountAddress))
@@ -617,6 +621,8 @@ func (m *Machine) ResolveResources(ctx context.Context, store Store) ([]string,
 		writeLockAccounts = append(writeLockAccounts, involvedAccountsMap[machineAddress])
 	}
 
+	slices.Sort(readLockAccounts)
+	slices.Sort(writeLockAccounts)
 	return readLockAccounts, writeLockAccounts, nil
 }
 

components/ledger/internal/machine/vm/machine_test.go

@@ -1034,9 +1034,6 @@ func TestNeededBalances2(t *testing.T) {
 	}
 
 	m := NewMachine(*p)
-	if err != nil {
-		t.Fatalf("did not expect error on SetVars, got: %v", err)
-	}
 	_, involvedSources, err := m.ResolveResources(context.Background(), EmptyStore)
 	require.NoError(t, err)
 	require.Equal(t, []string{"a"}, involvedSources)
@@ -1058,9 +1055,6 @@ send $balance (
 	}
 
 	m := NewMachine(*p)
-	if err != nil {
-		t.Fatalf("did not expect error on SetVars, got: %v", err)
-	}
 	rlAccounts, wlAccounts, err := m.ResolveResources(context.Background(), EmptyStore)
 	require.NoError(t, err)
 	require.Equal(t, []string{"a"}, wlAccounts)
@@ -1072,6 +1066,43 @@ send $balance (
 	require.Equal(t, []string{"acc", "a"}, store.RequestedAccounts)
 }
 
+func TestNeededBalancesBalanceOfMeta(t *testing.T) {
+	p, err := compiler.Compile(`vars {
+	account $src = meta(@x, "k")
+}
+
+send [COIN 1] (
+	source = $src
+	destination = @dest
+)`)
+
+	if err != nil {
+		t.Fatalf("did not expect error on Compile, got: %v", err)
+	}
+	m := NewMachine(*p)
+
+	staticStore := StaticStore{
+		"x": &AccountWithBalances{
+			Account: ledger.Account{
+				Address: "x",
+				Metadata: metadata.Metadata{
+					"k": "src",
+				},
+			},
+			Balances: map[string]*big.Int{},
+		},
+	}
+	rlAccounts, wlAccounts, err := m.ResolveResources(context.Background(), staticStore)
+	require.NoError(t, err)
+	require.Equal(t, []string{"src"}, wlAccounts)
+	require.Equal(t, []string{"dest"}, rlAccounts)
+
+	store := mockStore{}
+	err = m.ResolveBalances(context.Background(), &store)
+	require.NoError(t, err)
+	require.Equal(t, []string{"src"}, store.RequestedAccounts)
+}
+
 func TestSetTxMeta(t *testing.T) {
 	p, err := compiler.Compile(`
 	set_tx_meta("aaa", @platform)