From f2cdaab5fd7f648c1037c504e289e881ce8bbf47 Mon Sep 17 00:00:00 2001 From: Jon French Date: Fri, 12 Apr 2019 14:43:17 +0100 Subject: Interpreter: remove debug printing (oops) --- src/interpreter.ml | 1 - 1 file changed, 1 deletion(-) (limited to 'src') diff --git a/src/interpreter.ml b/src/interpreter.ml index bf60cc60..1ebfdeff 100644 --- a/src/interpreter.ml +++ b/src/interpreter.ml @@ -422,7 +422,6 @@ let rec step (E_aux (e_aux, annot) as orig_exp) = fail "Wrong number of parameters to barrier intrinsic" end | _ -> - prerr_endline ("calling get_primop for '" ^ extern ^ "' with args (" ^ String.concat ", " (List.map string_of_exp evaluated) ^ ")"); get_primop extern >>= fun op -> try return (exp_of_value (op (List.map value_of_exp evaluated))) -- cgit v1.2.3