mirror of
https://github.com/hasura/graphql-engine.git
synced 2024-11-13 09:17:21 +03:00
Add missing PROFILING CPP pragma
GitOrigin-RevId: b50acc16cd7194e5a778a34592d44cf21c969d52
This commit is contained in:
parent
d4d5c53468
commit
bcf251a469
@ -297,7 +297,9 @@ createServerApp (WSServer logger@(L.Logger writeLog) serverStatus) wsHandlers !i
|
||||
-- Requires a fork of 'wai-websockets' and 'websockets', it looks like.
|
||||
-- Adding `package` stanzas with -Xstrict -XStrictData for those two packages
|
||||
-- helped, cutting the number of thunks approximately in half.
|
||||
# ifndef PROFILING
|
||||
liftIO $ $assertNFHere wsConn -- so we don't write thunks to mutable vars
|
||||
# endif
|
||||
|
||||
let whenAcceptingInsertConn = liftIO $ STM.atomically $ do
|
||||
status <- STM.readTVar serverStatus
|
||||
|
Loading…
Reference in New Issue
Block a user