Avoid excessive Orchard dummies in `TestState::generate_next_block_sp…

…ending`

zcash_client_sqlite/src/testing.rs

@@ -791,6 +791,29 @@ pub(crate) trait TestFvk {
         initial_sapling_tree_size: u32,
         rng: &mut R,
     ) -> Self::Nullifier;
+
+    fn add_compact_action<P: consensus::Parameters, R: RngCore + CryptoRng>(
+        &self,
+        ctx: &mut CompactTx,
+        params: &P,
+        height: BlockHeight,
+        nf: Self::Nullifier,
+        req: AddressType,
+        value: NonNegativeAmount,
+        initial_sapling_tree_size: u32,
+        rng: &mut R,
+    ) -> Self::Nullifier {
+        self.add_compact_spend(ctx, nf, rng);
+        self.add_compact_output(
+            ctx,
+            params,
+            height,
+            req,
+            value,
+            initial_sapling_tree_size,
+            rng,
+        )
+    }
 }
 
 impl TestFvk for DiversifiableFullViewingKey {
@@ -912,6 +935,36 @@ impl TestFvk for orchard::keys::FullViewingKey {
 
         note.nullifier(self)
     }
+
+    // Override so we can merge the spend and output into a single action.
+    fn add_compact_action<P: consensus::Parameters, R: RngCore + CryptoRng>(
+        &self,
+        ctx: &mut CompactTx,
+        _: &P,
+        _: BlockHeight,
+        nf: Self::Nullifier,
+        req: AddressType,
+        value: NonNegativeAmount,
+        _: u32,
+        rng: &mut R,
+    ) -> Self::Nullifier {
+        let (j, scope) = match req {
+            AddressType::DefaultExternal => (0u32.into(), zip32::Scope::External),
+            AddressType::DiversifiedExternal(idx) => (idx, zip32::Scope::External),
+            AddressType::Internal => (0u32.into(), zip32::Scope::Internal),
+        };
+
+        let (cact, note) = compact_orchard_action(
+            nf,
+            self.address_at(j, scope),
+            value,
+            self.orchard_ovk(scope),
+            rng,
+        );
+        ctx.actions.push(cact);
+
+        note.nullifier(self)
+    }
 }
 
 #[allow(dead_code)]
@@ -1099,24 +1152,22 @@ fn fake_compact_block_spending<P: consensus::Parameters, Fvk: TestFvk>(
     let mut rng = OsRng;
     let mut ctx = fake_compact_tx(&mut rng);
 
-    // Create a fake spend
-    fvk.add_compact_spend(&mut ctx, nf, &mut rng);
-
-    // Create a fake Note for the payment
-    ctx.outputs
-        .push(compact_sapling_output(params, height, to, value, fvk.sapling_ovk(), &mut rng).0);
-
-    // Create a fake Note for the change
-    fvk.add_compact_output(
+    // Create a fake spend and a fake Note for the change
+    fvk.add_compact_action(
         &mut ctx,
         params,
         height,
+        nf,
         AddressType::Internal,
         (in_value - value).unwrap(),
         initial_sapling_tree_size,
         &mut rng,
     );
 
+    // Create a fake Note for the payment
+    ctx.outputs
+        .push(compact_sapling_output(params, height, to, value, fvk.sapling_ovk(), &mut rng).0);
+
     fake_compact_block_from_compact_tx(ctx, height, prev_hash, initial_sapling_tree_size, 0)
 }