@@ -192,6 +192,18 @@ instance
192192 tagType (Argument (buildFrom @(captureType)))
193193 V.:& reifiedEndpointArguments @endpoint
194194
195+-- caching for merge
196+-- instance
197+-- ( BuildFrom (IfLenient String mods captureType)
198+-- , ToReifiedEndpoint endpoint) =>
199+-- ToReifiedEndpoint (Capture' mods name captureType :> endpoint)
200+-- where
201+-- type EndpointArgs (Capture' mods name captureType :> endpoint) = IfLenient String mods captureType ': EndpointArgs endpoint
202+-- type EndpointRes (Capture' mods name captureType :> endpoint) = EndpointRes endpoint
203+-- reifiedEndpointArguments =
204+-- tagType (Argument (buildFrom @(IfLenient String mods captureType)))
205+-- V.:& reifiedEndpointArguments @endpoint
206+
195207instance
196208 ( BuildFrom (IfLenient String mods requestType)
197209 , ToReifiedEndpoint endpoint) =>