This repository was archived by the owner on Jun 15, 2023. It is now read-only.
File tree 1 file changed +3
-3
lines changed
1 file changed +3
-3
lines changed Original file line number Diff line number Diff line change @@ -751,7 +751,7 @@ let transformStructureItem ~config mapper item =
751
751
in
752
752
(* type props<'x, 'y> = { x: 'x, y?: 'y, ... } *)
753
753
let propsRecordType =
754
- makePropsRecordType " props" Location. none namedTypeList
754
+ makePropsRecordType " props" pstr_loc namedTypeList
755
755
in
756
756
(* can't be an arrow because it will defensively uncurry *)
757
757
let newExternalType =
@@ -975,7 +975,7 @@ let transformStructureItem ~config mapper item =
975
975
let vbMatchList = List. map vbMatch namedArgWithDefaultValueList in
976
976
(* type props = { ... } *)
977
977
let propsRecordType =
978
- makePropsRecordType " props" emptyLoc namedTypeList
978
+ makePropsRecordType " props" pstr_loc namedTypeList
979
979
in
980
980
let innerExpression =
981
981
Exp. apply
@@ -1197,7 +1197,7 @@ let transformSignatureItem ~config _mapper item =
1197
1197
(makePropsTypeParams namedTypeList)
1198
1198
in
1199
1199
let propsRecordType =
1200
- makePropsRecordTypeSig " props" Location. none
1200
+ makePropsRecordTypeSig " props" psig_loc
1201
1201
((* If there is Nolabel arg, regard the type as ref in forwardRef *)
1202
1202
(if ! hasForwardRef then [(true , " ref" , [] , refType Location. none)]
1203
1203
else [] )
You can’t perform that action at this time.
0 commit comments