From fdae0317be1d5c9b1cd833f7aa06f7007324f186 Mon Sep 17 00:00:00 2001 From: Christoph Knittel Date: Wed, 21 Oct 2026 17:46:31 +0000 Subject: [PATCH] Pass env and signature in the partial application Lambda tests #8904 added both to Translmod.transl_implementation while #8936 added a new caller, so the ounit build on master fails. Co-Authored-By: Claude Opus 5.5 Claude-Session: https://claude.ai/code/session_01Fc7LEuyEfynjaKCVEBPmTF Signed-off-by: Christoph Knittel --- tests/ounit_tests/ounit_partial_application_tests.ml | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/tests/ounit_tests/ounit_partial_application_tests.ml b/tests/ounit_tests/ounit_partial_application_tests.ml index baeb953391..94494e4f79 100644 --- a/tests/ounit_tests/ounit_partial_application_tests.ml +++ b/tests/ounit_tests/ounit_partial_application_tests.ml @@ -7,11 +7,11 @@ let binding_lambda ~name source = ~display_filename:"PartialApplication.res" ~source in OUnit.assert_bool "source parses" (not parsed.invalid); - let typed, _, _ = + let typed, signature, env = Typemod.type_structure (Env.initial_safe_string ()) parsed.parsetree in let implementation = - Translmod.transl_implementation "PartialApplication" + Translmod.transl_implementation "PartialApplication" env signature (typed, Typedtree.Tcoerce_none) in let found = ref None in