From 1c77992a2802934f3a8964ca66a44c5177c960db Mon Sep 17 00:00:00 2001
From: Rudi Grinberg <rudi.grinberg@gmail.com>
Date: Wed, 21 Mar 2018 16:04:33 +0800
Subject: [PATCH] Add test for #637 regression

---
 test/unit-tests/ocaml-config/gh637.ml | 51 +++++++++++++++++++++++++++
 test/unit-tests/ocaml-config/jbuild   | 10 ++++++
 2 files changed, 61 insertions(+)
 create mode 100644 test/unit-tests/ocaml-config/gh637.ml
 create mode 100644 test/unit-tests/ocaml-config/jbuild

diff --git a/test/unit-tests/ocaml-config/gh637.ml b/test/unit-tests/ocaml-config/gh637.ml
new file mode 100644
index 00000000..dbb7783d
--- /dev/null
+++ b/test/unit-tests/ocaml-config/gh637.ml
@@ -0,0 +1,51 @@
+open Stdune
+
+let valid_ocaml_config =
+{|version: 4.02.3
+standard_library_default: /usr/lib/ocaml
+standard_library: /usr/lib/ocaml
+standard_runtime: /usr/bin/ocamlrun
+ccomp_type: cc
+bytecomp_c_compiler: gcc -O -fno-defer-pop -Wall -D_FILE_OFFSET_BITS=64 -D_REENTRANT -O -fPIC
+bytecomp_c_libraries: -lm  -ldl -lcurses -lpthread
+native_c_compiler: gcc -O -Wall -D_FILE_OFFSET_BITS=64 -D_REENTRANT
+native_c_libraries: -lm  -ldl
+native_pack_linker: ld -r  -o 
+ranlib: ranlib
+cc_profile: -pg
+architecture: none
+model: default
+system: unknown
+asm: 
+asm_cfi_supported: false
+with_frame_pointers: false
+ext_obj: .o
+ext_asm: .s
+ext_lib: .a
+ext_dll: .so
+os_type: Unix
+default_executable_name: a.out
+systhread_supported: true
+host: mips-unknown-linux-gnu
+target: mips-unknown-linux-gnu
+exec_magic_number: Caml1999X011
+cmi_magic_number: Caml1999I017
+cmo_magic_number: Caml1999O010
+cma_magic_number: Caml1999A011
+cmx_magic_number: Caml1999Y014
+cmxa_magic_number: Caml1999Z013
+ast_impl_magic_number: Caml1999M016
+ast_intf_magic_number: Caml1999N015
+cmxs_magic_number: Caml2007D002
+cmt_magic_number: Caml2012T004|}
+
+let () =
+  let open Result.O in
+  match
+    valid_ocaml_config
+    |> String.split_lines
+    |> Ocaml_config.Vars.of_lines
+    >>= Ocaml_config.make
+  with
+  | Error e -> failwith e
+  | Ok (_ : Ocaml_config.t) -> ()
diff --git a/test/unit-tests/ocaml-config/jbuild b/test/unit-tests/ocaml-config/jbuild
new file mode 100644
index 00000000..97c850a5
--- /dev/null
+++ b/test/unit-tests/ocaml-config/jbuild
@@ -0,0 +1,10 @@
+(jbuild_version 1)
+
+(executable
+ ((name gh637)
+  (libraries (ocaml_config))))
+
+(alias
+ ((name runtest)
+  (deps (./gh637.exe))
+  (action (run ${<}))))