diff options
| author | Gabriel Scherer <gabriel.scherer@gmail.com> | 2014-05-12 15:37:43 +0000 |
|---|---|---|
| committer | Gabriel Scherer <gabriel.scherer@gmail.com> | 2014-05-12 15:37:43 +0000 |
| commit | fb906370951e559dba66fd821bbe6a99c613ff33 (patch) | |
| tree | 674486e0002e0a6cb99338c7d64f51eb7bbda0da /stdlib | |
| parent | e0ed68b8420d5fc7a5e64e8c2ccbcabcb24dd617 (diff) | |
sets up a 'legacy mode'
When the OCAML_LEGACY_FORMAT environment variable is set, the compiler
will try to emulate the behaviour of the previous implementation of
format.
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@14813 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'stdlib')
| -rw-r--r-- | stdlib/camlinternalFormat.ml | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/stdlib/camlinternalFormat.ml b/stdlib/camlinternalFormat.ml index 1cdf856a2..60c82b603 100644 --- a/stdlib/camlinternalFormat.ml +++ b/stdlib/camlinternalFormat.ml @@ -1,5 +1,8 @@ open CamlinternalFormatBasics +let legacy_behavior = + try Sys.getenv "OCAML_LEGACY_FORMAT" <> "" with _ -> false + (******************************************************************************) (* Types *) |