YS
ну, в любом случае, мне нужно будет подготовить окружение и прочее, чтобы с кодом даже поработать
foo :: Application
foo = addHeadersMiddleware \req respond -> do
...
bar
where
bar = respond $ responseStream blah blah ...Size: a a a
2020 May 10
A
если там внутри requestBody, то лучше сделать так:
foo = do
reqBody <- ...
addHeadersMiddleware \req ...
foo = do
reqBody <- ...
addHeadersMiddleware \req ...
YS
если там внутри requestBody, то лучше сделать так:
foo = do
reqBody <- ...
addHeadersMiddleware \req ...
foo = do
reqBody <- ...
addHeadersMiddleware \req ...
Тут была проблема не в теле, а в заголовках
YS
Что в созданный в
where респонс не добавляются потом заголовки в addHeadersMiddlewareYS
Если респонс создавать не в
where - то заголовки добавляютсяYS
Надо(
YS
Займусь как нибудь
AA
Тепеь хочу сделать postfix оператор
-. так чтобы писать: f a b -: g c -: k l -. -> f a b -: (g c -: ( (-.) k l))постфикс операторы не работают без скобок
AV
Уже понял
AA
Я продозреваю, что почти весь код с ними где-то не работает
но почти весь код для дженерикостраданий с ними
2020 May 11
AV
А никто не подскажет ссылку на рабочий пример cabal shbang скрипты
AV
А идеально ещё и с никсом 🙂
AV
впрочем, что-то нагуглилось
YS
Блин
YS
responseFile не всегда работает
YS
responseStream работает, если в него засунуть байты файла
YS
х(