From e16539acc8c146b7a4fb9e5b6fbe180204859cdd Mon Sep 17 00:00:00 2001 From: Alex AUVOLAT Date: Mon, 16 Dec 2013 23:49:49 +0100 Subject: =?UTF-8?q?Abandon=20de=20l'h=C3=A9ritage=20multiple=20;=20h=C3=A9?= =?UTF-8?q?ritage=20simple=20mis=20en=20place.?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- src/pretty.ml | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'src/pretty.ml') diff --git a/src/pretty.ml b/src/pretty.ml index 4420ac1..6144cf3 100644 --- a/src/pretty.ml +++ b/src/pretty.ml @@ -146,8 +146,7 @@ let print_class_decl c = (List.fold_left (fun x t -> x ^ " public " ^ t) "" s)) ^ " {\n"); List.iter (function | CVar(t, i) -> print_string (" " ^ i ^ " : " ^ (var_type_str t) ^ "\n") - | CMethod(p) -> print_string (" " ^ (proto_str p) ^ "\n") - | CVirtualMethod(p) -> print_string (" virtual " ^ (proto_str p) ^ "\n") + | CMethod(p, v) -> print_string ((if v then " virtual " else " ") ^ (proto_str p) ^ "\n") ) c.c_members; print_string "}\n" -- cgit v1.2.3