From 90d4139c4757388a6db73bda8edf1ba3b5e27df0 Mon Sep 17 00:00:00 2001 From: Claudio Sacerdoti Coen Date: Tue, 4 Dec 2007 11:02:16 +0000 Subject: [PATCH] Reindented. --- .../components/cic_disambiguation/disambiguate.crit4.ml | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/helm/software/components/cic_disambiguation/disambiguate.crit4.ml b/helm/software/components/cic_disambiguation/disambiguate.crit4.ml index 0f5c3facd..0a966ba3a 100644 --- a/helm/software/components/cic_disambiguation/disambiguate.crit4.ml +++ b/helm/software/components/cic_disambiguation/disambiguate.crit4.ml @@ -110,13 +110,13 @@ type 'a test_result = let refine_term metasenv context uri term ugraph ~localization_tbl = (* if benchmark then incr actual_refinements; *) - assert (uri=None); + assert (uri=None); debug_print (lazy (sprintf "TEST_INTERPRETATION: %s" (CicPp.ppterm term))); try let term', _, metasenv',ugraph1 = CicRefine.type_of_aux' metasenv context term ugraph ~localization_tbl in debug_print (lazy (sprintf "OK!!!")); - Ok (term', metasenv',ugraph1) + Ok (term', metasenv',ugraph1) with exn -> let rec process_exn loc = -- 2.39.2