Configurator: handle negative numbers (ocaml#1334)

Signed-off-by: Christophe Troestler <[email protected]>

Author: Chris00

CHANGES.md

@@ -4,6 +4,9 @@ next
 - Do not fail if the output of `ocamlc -config` doesn't include
   `standard_runtime` (#...., @diml)
 
+- Let `Configurator.V1.C_define.import` handle negative integers
+  (@Chris00)
+
 1.3.0 (23/09/2018)
 ------------------
 

src/configurator/v1.ml

@@ -366,10 +366,14 @@ module C_define = struct
         pr {|
 const char s%i[] = {
   'B', 'E', 'G', 'I', 'N', '-', %s'-',
+#if %s >= 0
   D9((%s)),
+#else
+  '-', D9((- %s)),
+#endif
   '-', 'E', 'N', 'D'
 };
-|} i c_arr_i name
+|} i c_arr_i name name name
       | String ->
         pr {|const char *s%i = "BEGIN-%i-" %s "-END";|} i i name;
       | Switch ->