Permalink
Browse files

fix Tests.ml{,.principal}.reference

git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@14845 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
  • Loading branch information...
1 parent e0b1dab commit 78315ea89cf1541d09d4e3db343a0e484e78640b @gasche gasche committed May 12, 2014
@@ -295,12 +295,12 @@ Warning 10: this expression should have type unit.
unit -> object method private m : int method n : int method o : int end
# - : int * int = (1, 1)
# class c : unit -> object method m : int end
-# - : int = 99
-# - : int = 100
+# - : int = 100
# - : int = 101
-# - : int * int * int = (102, 103, 104)
-# - : int * int * int * int * int = (105, 106, 107, 33, 33)
-# - : int * int * int * int * int = (108, 109, 110, 33, 33)
+# - : int = 102
+# - : int * int * int = (103, 104, 105)
+# - : int * int * int * int * int = (106, 107, 108, 33, 33)
+# - : int * int * int * int * int = (109, 110, 111, 33, 33)
# Characters 42-69:
class a = let _ = new b in object end
^^^^^^^^^^^^^^^^^^^^^^^^^^^
@@ -294,12 +294,12 @@ Warning 10: this expression should have type unit.
unit -> object method private m : int method n : int method o : int end
# - : int * int = (1, 1)
# class c : unit -> object method m : int end
-# - : int = 99
-# - : int = 100
+# - : int = 100
# - : int = 101
-# - : int * int * int = (102, 103, 104)
-# - : int * int * int * int * int = (105, 106, 107, 33, 33)
-# - : int * int * int * int * int = (108, 109, 110, 33, 33)
+# - : int = 102
+# - : int * int * int = (103, 104, 105)
+# - : int * int * int * int * int = (106, 107, 108, 33, 33)
+# - : int * int * int * int * int = (109, 110, 111, 33, 33)
# Characters 42-69:
class a = let _ = new b in object end
^^^^^^^^^^^^^^^^^^^^^^^^^^^

0 comments on commit 78315ea

Please sign in to comment.