@@ -21,11 +21,10 @@ type SOCKSRecord =
21
21
users: obj list }
22
22
23
23
module SOCKSRecord =
24
- let inline _tag f p =
25
- f p.tag <&> fun x -> { p with tag = x }
24
+ let inline _tag f p = f p.tag <&> fun x -> { p with tag = x }
26
25
27
26
let inline _listen f p =
28
- f p.listen <&> fun x -> { p with listen = x}
27
+ f p.listen <&> fun x -> { p with listen = x }
29
28
30
29
let inline _listenPort f p =
31
30
f p.listenPort <&> fun x -> { p with listenPort = x }
@@ -40,7 +39,8 @@ module SOCKSRecord =
40
39
f p.sniff <&> fun x -> { p with sniff = x }
41
40
42
41
let inline _sniffOverrideDestination f p =
43
- f p.sniffOverrideDestination <&> fun x -> { p with sniffOverrideDestination = x }
42
+ f p.sniffOverrideDestination
43
+ <&> fun x -> { p with sniffOverrideDestination = x }
44
44
45
45
let inline _domainStrategy f p =
46
46
f p.domainStrategy <&> fun x -> { p with domainStrategy = x }
@@ -52,7 +52,10 @@ module SOCKSRecord =
52
52
f p.proxyProtocol <&> fun x -> { p with proxyProtocol = x }
53
53
54
54
let inline _proxyProtocolAcceptNoHeader f p =
55
- f p.proxyProtocolAcceptNoHeader <&> fun x -> { p with proxyProtocolAcceptNoHeader = x }
55
+ f p.proxyProtocolAcceptNoHeader
56
+ <&> fun x ->
57
+ { p with
58
+ proxyProtocolAcceptNoHeader = x }
56
59
57
60
let inline _detour f p =
58
61
f p.detour <&> fun x -> { p with detour = x }
@@ -80,8 +83,7 @@ type HttpRecord =
80
83
setSystemProxy: bool option }
81
84
82
85
module HttpRecord =
83
- let inline _tag f p =
84
- f p.tag <&> fun x -> { p with tag = x }
86
+ let inline _tag f p = f p.tag <&> fun x -> { p with tag = x }
85
87
86
88
let inline _listen f p =
87
89
f p.listen <&> fun x -> { p with listen = x }
@@ -99,7 +101,8 @@ module HttpRecord =
99
101
f p.sniff <&> fun x -> { p with sniff = x }
100
102
101
103
let inline _sniffOverrideDestination f p =
102
- f p.sniffOverrideDestination <&> fun x -> { p with sniffOverrideDestination = x }
104
+ f p.sniffOverrideDestination
105
+ <&> fun x -> { p with sniffOverrideDestination = x }
103
106
104
107
let inline _domainStrategy f p =
105
108
f p.domainStrategy <&> fun x -> { p with domainStrategy = x }
@@ -111,16 +114,18 @@ module HttpRecord =
111
114
f p.proxyProtocol <&> fun x -> { p with proxyProtocol = x }
112
115
113
116
let inline _proxyProtocolAcceptNoHeader f p =
114
- f p.proxyProtocolAcceptNoHeader <&> fun x -> { p with proxyProtocolAcceptNoHeader = x }
117
+ f p.proxyProtocolAcceptNoHeader
118
+ <&> fun x ->
119
+ { p with
120
+ proxyProtocolAcceptNoHeader = x }
115
121
116
122
let inline _detour f p =
117
123
f p.detour <&> fun x -> { p with detour = x }
118
124
119
125
let inline _users f p =
120
126
f p.users <&> fun x -> { p with users = x }
121
127
122
- let inline _tls f p =
123
- f p.tls <&> fun x -> { p with tls = x }
128
+ let inline _tls f p = f p.tls <&> fun x -> { p with tls = x }
124
129
125
130
let inline _setSystemProxy f p =
126
131
f p.setSystemProxy <&> fun x -> { p with setSystemProxy = x }
@@ -141,11 +146,10 @@ type MixedRecord =
141
146
detour: string option
142
147
143
148
users: obj list option
144
- setSystemProxy: bool option }
149
+ setSystemProxy: bool option }
145
150
146
151
module MixedRecord =
147
- let inline tag_ f p =
148
- f p.tag <&> fun x -> { p with tag = x }
152
+ let inline tag_ f p = f p.tag <&> fun x -> { p with tag = x }
149
153
150
154
let inline _listen f p =
151
155
f p.listen <&> fun x -> { p with listen = x }
@@ -163,18 +167,23 @@ module MixedRecord =
163
167
f p.sniff <&> fun x -> { p with sniff = x }
164
168
165
169
let inline _sniffOverrideDestination f p =
166
- f p.sniffOverrideDestination <&> fun x -> { p with sniffOverrideDestination = x }
170
+ f p.sniffOverrideDestination
171
+ <&> fun x -> { p with sniffOverrideDestination = x }
167
172
168
173
let inline _domainStrategy f p =
169
174
f p.domainStrategy <&> fun x -> { p with domainStrategy = x }
175
+
170
176
let inline _udpTimeout f p =
171
177
f p.udpTimeout <&> fun x -> { p with udpTimeout = x }
172
178
173
179
let inline _proxyProtocol f p =
174
180
f p.proxyProtocol <&> fun x -> { p with proxyProtocol = x }
175
181
176
182
let inline _proxyProtocolAcceptNoHeader f p =
177
- f p.proxyProtocolAcceptNoHeader <&> fun x -> { p with proxyProtocolAcceptNoHeader = x }
183
+ f p.proxyProtocolAcceptNoHeader
184
+ <&> fun x ->
185
+ { p with
186
+ proxyProtocolAcceptNoHeader = x }
178
187
179
188
let inline _detour f p =
180
189
f p.detour <&> fun x -> { p with detour = x }
@@ -227,8 +236,7 @@ type TunRecord =
227
236
detour: string option }
228
237
229
238
module TunRecord =
230
- let inline _tag f p =
231
- f p.tag <&> fun x -> { p with tag = x }
239
+ let inline _tag f p = f p.tag <&> fun x -> { p with tag = x }
232
240
233
241
let inline _interfaceName f p =
234
242
f p.interfaceName <&> fun x -> { p with interfaceName = x }
@@ -288,7 +296,8 @@ module TunRecord =
288
296
f p.sniff <&> fun x -> { p with sniff = x }
289
297
290
298
let inline _sniffOverrideDestination f p =
291
- f p.sniffOverrideDestination <&> fun x -> { p with sniffOverrideDestination = x }
299
+ f p.sniffOverrideDestination
300
+ <&> fun x -> { p with sniffOverrideDestination = x }
292
301
293
302
let inline _domainStrategy f p =
294
303
f p.domainStrategy <&> fun x -> { p with domainStrategy = x }
@@ -297,7 +306,10 @@ module TunRecord =
297
306
f p.proxyProtocol <&> fun x -> { p with proxyProtocol = x }
298
307
299
308
let inline _proxyProtocolAcceptNoHeader f p =
300
- f p.proxyProtocolAcceptNoHeader <&> fun x -> { p with proxyProtocolAcceptNoHeader = x }
309
+ f p.proxyProtocolAcceptNoHeader
310
+ <&> fun x ->
311
+ { p with
312
+ proxyProtocolAcceptNoHeader = x }
301
313
302
314
let inline _detour f p =
303
315
f p.detour <&> fun x -> { p with detour = x }
0 commit comments