@@ -597,7 +597,7 @@ type sca_match_kind = [
597597 * access third-party code for further investigation
598598 * (similar to (LockfileOnlyMatch Transitive))
599599 *)
600- | TransitiveUndetermined
600+ | TransitiveUndetermined of transitive_undetermined
601601] < ocaml repr="classic">
602602
603603type transitive_reachable = {
@@ -612,6 +612,10 @@ type transitive_unreachable = {
612612 explanation: string option;
613613}
614614
615+ type transitive_undetermined = {
616+ explanation: string option;
617+ }
618+
615619type dependency_match = {
616620 dependency_pattern: sca_pattern;
617621 found_dependency: found_dependency;
@@ -2329,6 +2333,12 @@ type transitive_finding = {
23292333 *)
23302334}
23312335
2336+ type transitive_reachability_filter_params = {
2337+ rules_path: fpath;
2338+ findings: transitive_finding list;
2339+ dependencies: (found_dependency * downloaded_dependency option) list;
2340+ }
2341+
23322342(* ----------------------------- *)
23332343(* SCA part 4: Symbol analysis *)
23342344(* ----------------------------- *)
@@ -2387,7 +2397,7 @@ type function_call <python decorator="dataclass(frozen=True)"> = [
23872397 | CallGetTargets of scanning_roots
23882398 (* for now, the transitive reachability filter takes only a single dependency graph as input.
23892399 * it is up to the caller to call it several times, one for each subproject *)
2390- | CallTransitiveReachabilityFilter of ((found_dependency * downloaded_dependency list) * transitive_finding list)
2400+ | CallTransitiveReachabilityFilter of transitive_reachability_filter_params
23912401]
23922402
23932403(* ----------------------------- *)
0 commit comments