diff --git a/src/HERMIT/GHCI/Client.hs b/src/HERMIT/GHCI/Client.hs
index 702dfa5..a1c0b0d 100644
--- a/src/HERMIT/GHCI/Client.hs
+++ b/src/HERMIT/GHCI/Client.hs
@@ -31,7 +31,7 @@ session :: JSONRPC.Session
 session = JSONRPC.session
         $ (if debug 
            then traceSessionAPI "HERMIT-remote-json"
-           else id)
+           else id :: (forall a . f a -> g a) -> (forall a . f a ~> g a))
         $ sendr
  where
         sendr :: SessionAPI a -> IO a