From 8fa3c26adb1bc2c0201a61adede278a0e889eef4 Mon Sep 17 00:00:00 2001 From: Pierre-Marie Pédrot Date: Thu, 23 Nov 2017 14:48:05 +0100 Subject: Move the call to the computation of bytecode inside Cemitcodes. This shouldn't matter because the tcode_of_code function is pure, its only effect being allocating a string and filling it with the translated bytecode. --- kernel/cemitcodes.mli | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) (limited to 'kernel/cemitcodes.mli') diff --git a/kernel/cemitcodes.mli b/kernel/cemitcodes.mli index a2ff2d3019..aa055dcb02 100644 --- a/kernel/cemitcodes.mli +++ b/kernel/cemitcodes.mli @@ -9,9 +9,7 @@ type reloc_info = type patches type emitcodes -val length : emitcodes -> int - -val patch : emitcodes -> patches -> (reloc_info -> int) -> emitcodes +val patch : emitcodes -> patches -> (reloc_info -> int) -> Vmvalues.tcode type to_patch = emitcodes * patches * fv -- cgit v1.2.3