Quel est l'idiome d'une chaîne de promesses?

Question

Comment exécuter deux promesses, l'une après l'autre?

Par exemple, en JavaScript je peux

var promise1 = new Promise(); 
var promise2 = new Promise(); 

// await returns a result2 from promise2 
await promise1.then(() => promise2); 

Comment puis-je faire la même chose en Perl 6?

my $promise1 = Promise.new(); 
my $promise2 = Promise.new(); 

// Here I get only Promise2 object, not its result 
await promise1.then({ $promise2 }); 

Dois-je attendre un $ promise2 comme ça?

await promise1.then({ await $promise2 }); 

Answer 1

Si vous voulez faire deux opérations asynchrones l'un après l'autre, alimentant le résultat de la première dans la seconde, alors ce serait juste un cas de faire deux await s:

my $result = await something-that-returns-a-Promise(); await something-else-returning-a-Promise-using($result);

ou sans la variable intermédiaire:

await something-else-returning-a-Promise-using(await something-that-returns-a-Promise());

Pas besoin de .then du tout.