Add failing test for ocaml#1720

emillon · emillon · commit 3929d0bdeba5 · 2019-01-02T15:05:06.000+01:00
diff --git a/test/blackbox-tests/test-cases/configurator/import-define/run.ml b/test/blackbox-tests/test-cases/configurator/import-define/run.ml
@@ -15,6 +15,7 @@ let () =
       ; "CONFIGURATOR_TESTING", C_define.Type.String
       ; "NEGATIVE_INT", C_define.Type.Int
       ; "ZERO", C_define.Type.Int
+      ; "sizeof(char)", C_define.Type.Int
       ]
     |> List.iter (fun (n, v) ->
       Printf.printf "%s=%s\n"
diff --git a/test/blackbox-tests/test-cases/configurator/run.t b/test/blackbox-tests/test-cases/configurator/run.t
@@ -14,3 +14,4 @@ Importing #define's from code is successful
   CONFIGURATOR_TESTING=foobar
   NEGATIVE_INT=-345
   ZERO=0
+  sizeof(char)=1

Original file line number	Diff line number	Diff line change
`@@ -15,6 +15,7 @@ let () =`
`15`	`15`	`; "CONFIGURATOR_TESTING", C_define.Type.String`
`16`	`16`	`; "NEGATIVE_INT", C_define.Type.Int`
`17`	`17`	`; "ZERO", C_define.Type.Int`
	`18`	`+ ; "sizeof(char)", C_define.Type.Int`
`18`	`19`	`]`
`19`	`20`	`\|> List.iter (fun (n, v) ->`
`20`	`21`	`Printf.printf "%s=%s\n"`