diff options
| author | Luc Maranget <luc.maranget@inria.fr> | 2014-03-13 12:44:09 +0000 |
|---|---|---|
| committer | Luc Maranget <luc.maranget@inria.fr> | 2014-03-13 12:44:09 +0000 |
| commit | 1f5876189e29730e9b8f40c2808d1d7b84a37af0 (patch) | |
| tree | 948ec02afaa09b40f4e8e8344cd99463ad96add8 /testsuite/tests/letrec/mixing_value_closures_1.ml | |
| parent | f69e779f366e356ffb03a9d334465dc073ee6c08 (diff) | |
| download | ocaml-1f5876189e29730e9b8f40c2808d1d7b84a37af0.tar.gz | |
Merge with ocaml trunk 12778 -> 13774
git-svn-id: http://caml.inria.fr/svn/ocaml/branches/jocamltrunk@14456 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'testsuite/tests/letrec/mixing_value_closures_1.ml')
| -rw-r--r-- | testsuite/tests/letrec/mixing_value_closures_1.ml | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/testsuite/tests/letrec/mixing_value_closures_1.ml b/testsuite/tests/letrec/mixing_value_closures_1.ml index e79f79ecbe..6e274346a3 100644 --- a/testsuite/tests/letrec/mixing_value_closures_1.ml +++ b/testsuite/tests/letrec/mixing_value_closures_1.ml @@ -1,3 +1,15 @@ +(***********************************************************************) +(* *) +(* OCaml *) +(* *) +(* Gabriel Scherer, projet Gallium, INRIA Rocquencourt *) +(* *) +(* Copyright 2012 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed *) +(* under the terms of the Q Public License version 1.0. *) +(* *) +(***********************************************************************) + (* mixing values and closures may exercise interesting code paths *) type t = A of (int -> int) let test = |