Migrate lib-obj test to ocamltest

testsuite/tests/lib-obj/Makefile

@@ -1,21 +0,0 @@
-#**************************************************************************
-#*                                                                        *
-#*                                OCaml                                   *
-#*                                                                        *
-#*                 Xavier Clerc, SED, INRIA Rocquencourt                  *
-#*                                                                        *
-#*   Copyright 2010 Institut National de Recherche en Informatique et     *
-#*     en Automatique.                                                    *
-#*                                                                        *
-#*   All rights reserved.  This file is distributed under the terms of    *
-#*   the GNU Lesser General Public License version 2.1, with the          *
-#*   special exception on linking described in the file LICENSE.          *
-#*                                                                        *
-#**************************************************************************
-
-BASEDIR=../..
-MODULES=
-MAIN_MODULE=reachable_words
-
-include $(BASEDIR)/makefiles/Makefile.one
-include $(BASEDIR)/makefiles/Makefile.common

testsuite/tests/lib-obj/ocamltests

@@ -0,0 +1 @@
+reachable_words.ml

testsuite/tests/lib-obj/reachable_words.ml

@@ -1,8 +1,11 @@
+(* TEST
+*)
+
 let native =
-  match Filename.basename Sys.argv.(0) with
-  | "program.byte" | "program.byte.exe" -> false
-  | "program.native" | "program.native.exe" -> true
-  | s -> print_endline s; assert false
+  match Sys.backend_type with
+  | Sys.Native -> true
+  | Sys.Bytecode -> false
+  | Sys.Other s -> print_endline s; assert false
 
 
 let size x = Obj.reachable_words (Obj.repr x)