From 9d6f19dd94f44a96cc5a9b61f22943ce457ce51c Mon Sep 17 00:00:00 2001
From: Maxime Dénès <mail@maximedenes.fr>
Date: Thu, 26 Apr 2018 17:08:20 +0200
Subject: Less confusing debug printing of setfield bytecode instruction

---
 kernel/cbytecodes.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'kernel')

diff --git a/kernel/cbytecodes.ml b/kernel/cbytecodes.ml
index 5ed9b6c67..599856b64 100644
--- a/kernel/cbytecodes.ml
+++ b/kernel/cbytecodes.ml
@@ -309,7 +309,7 @@ let rec pp_instr i =
 	     prlist_with_sep spc pp_lbl (Array.to_list lblb))
   | Kpushfields n -> str "pushfields " ++ int n
   | Kfield n -> str "field " ++ int n
-  | Ksetfield n -> str "set field" ++ int n
+  | Ksetfield n -> str "setfield " ++ int n
 
   | Kstop -> str "stop"
 
-- 
cgit v1.2.3