From 2413229d0b79f8afd7ee804d207ba41679a8b878 Mon Sep 17 00:00:00 2001
From: Brice Dobry <brice@hiro.so>
Date: Thu, 3 Nov 2022 10:09:42 -0400
Subject: [PATCH] feat: add `AnalysisFetchContractEntry`

This is used in Clarity 2 when retrieving contracts to do trait type
checks.
---
 src/generators.rs | 15 ++++++++++++++-
 1 file changed, 14 insertions(+), 1 deletion(-)

diff --git a/src/generators.rs b/src/generators.rs
index 51b7bd0b1..a986bf512 100644
--- a/src/generators.rs
+++ b/src/generators.rs
@@ -2192,6 +2192,17 @@ fn gen_analysis_get_function_entry(input_size: u64) -> GenOutput {
     GenOutput::new(None, body, input_size)
 }
 
+/// cost_function: AnalysisFetchContractEntry
+/// input_size: count of public and read-only functions in contract
+///     `contract_analysis_size(&contract)`
+fn gen_analysis_fetch_contract_entry(input_size: u64) -> GenOutput {
+    let dummy_fns = (0..input_size)
+        .map(|i| format!("(define-public (dummy-fn-{} (a uint) (b uint))", i))
+        .collect();
+
+    GenOutput::new(None, dummy_fns, input_size)
+}
+
 /// cost_function: InnerTypeCheckCost
 /// input_size: type signature size of argument
 ///     `arg_type.size()`
@@ -2474,7 +2485,9 @@ pub fn gen(function: ClarityCostFunction, scale: u16, input_size: u64) -> GenOut
 
         /// reviewed: @pavitthrap
         /// This cost function is not used anywhere.
-        ClarityCostFunction::AnalysisFetchContractEntry => unimplemented!(), // not used anywhere
+        ClarityCostFunction::AnalysisFetchContractEntry => {
+            gen_analysis_fetch_contract_entry(input_size)
+        }
 
 
         /// Ast ////////////////////////////////