|
|
@ -6,6 +6,8 @@
|
|
|
|
* This source code is licensed under the BSD style license found in the
|
|
|
|
* This source code is licensed under the BSD style license found in the
|
|
|
|
* LICENSE file in the root directory of this source tree. An additional grant
|
|
|
|
* LICENSE file in the root directory of this source tree. An additional grant
|
|
|
|
* of patent rights can be found in the PATENTS file in the same directory.
|
|
|
|
* of patent rights can be found in the PATENTS file in the same directory.
|
|
|
|
|
|
|
|
* vim: set ft=rust:
|
|
|
|
|
|
|
|
* vim: set ft=reason:
|
|
|
|
*/
|
|
|
|
*/
|
|
|
|
|
|
|
|
|
|
|
|
open! Utils;
|
|
|
|
open! Utils;
|
|
|
@ -412,4 +414,4 @@ let pp_name_list = pp_comma_seq pp_name;
|
|
|
|
let make_ident_primed id =
|
|
|
|
let make_ident_primed id =
|
|
|
|
if id.kind == kprimed then assert false
|
|
|
|
if id.kind == kprimed then assert false
|
|
|
|
else { id with kind = kprimed }
|
|
|
|
else { id with kind = kprimed }
|
|
|
|
*/
|
|
|
|
*/
|
|
|
|