jane_asttypes.ml1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26(*_ This file is manually imported from the Jane Street version of the OCaml compiler. Don't make changes directly to this file. *) [@@@ocaml.warning "-missing-record-field-pattern"] open! Shadow_compiler_distribution (**************************************************************************) (* *) (* OCaml *) (* *) (* Nick Roberts, Jane Street, New York *) (* *) (* Copyright 2023 Jane Street Group LLC *) (* *) (* All rights reserved. This file is distributed under the terms of *) (* the GNU Lesser General Public License version 2.1, with the *) (* special exception on linking described in the file LICENSE. *) (* *) (**************************************************************************) type const_jkind = string let jkind_of_string x = x let jkind_to_string x = x type jkind_annotation = const_jkind Location.loc