File tree Expand file tree Collapse file tree 1 file changed +3
-3
lines changed Expand file tree Collapse file tree 1 file changed +3
-3
lines changed Original file line number Diff line number Diff line change 1
1
open Ppxlib
2
- open Ocaml_common
3
2
open Parsetree
4
3
open Graphql_compiler
4
+ open Output_utils
5
5
6
6
let function_expression_uncurried ?(loc = Location. none) ~arity funExpr =
7
7
let arity_to_attributes ~loc arity : Parsetree.attribute list =
8
8
[
9
9
{
10
- attr_name = Location. mknoloc " res.arity" ;
10
+ attr_name = mknoloc " res.arity" ;
11
11
attr_payload =
12
12
Parsetree. PStr
13
13
[
@@ -21,7 +21,7 @@ let function_expression_uncurried ?(loc = Location.none) ~arity funExpr =
21
21
in
22
22
Ast_helper.Exp. construct ~loc
23
23
~attrs: (arity_to_attributes ~loc arity)
24
- (Location. mknoloc (Longident. Lident " Function$" ))
24
+ (mknoloc (Longident. Lident " Function$" ))
25
25
(Some funExpr)
26
26
27
27
let wrap_function_exp_uncurried ?(arity = 1 ) expr =
You can’t perform that action at this time.
0 commit comments