release-0.0.33.0.

Changelog.md

@@ -1,3 +1,7 @@
+20200209 haskell-debug-adapter-0.0.33.0
+  * [INFO] support ghci-dap-0.0.14.0.
+
+
 20200105 haskell-debug-adapter-0.0.32.0
   * [INFO] support haskell-dap-0.0.14.0.
   * [INFO] support ghci-dap-0.0.13.0.

haskell-debug-adapter.cabal

@@ -4,10 +4,10 @@ cabal-version: 1.12
 --
 -- see: https://github.com/sol/hpack
 --
--- hash: d69229cdfadfc89c56f8cb6901f1a949e27c23988da6beee5487576c39623064
+-- hash: da77e0a33d754f6f5d7c7f1c43908127b950c2399a352febb7a7d8203d324a5d
 
 name:           haskell-debug-adapter
-version:        0.0.32.0
+version:        0.0.33.0
 synopsis:       Haskell Debug Adapter.
 description:    Please see README.md
 category:       Development
@@ -75,7 +75,7 @@ library
     , directory
     , filepath
     , fsnotify
-    , ghci-dap >=0.0.13.0
+    , ghci-dap >=0.0.14.0
     , haskell-dap >=0.0.14.0
     , hslogger
     , lens
@@ -112,7 +112,7 @@ executable haskell-debug-adapter
     , directory
     , filepath
     , fsnotify
-    , ghci-dap >=0.0.13.0
+    , ghci-dap >=0.0.14.0
     , haskell-dap >=0.0.14.0
     , haskell-debug-adapter
     , hslogger
@@ -153,7 +153,7 @@ test-suite haskell-debug-adapter-test
     , directory
     , filepath
     , fsnotify
-    , ghci-dap >=0.0.13.0
+    , ghci-dap >=0.0.14.0
     , haskell-dap >=0.0.14.0
     , haskell-debug-adapter
     , hslogger

package.yaml

@@ -1,5 +1,5 @@
 name: haskell-debug-adapter
-version: '0.0.32.0'
+version: '0.0.33.0'
 synopsis: Haskell Debug Adapter.
 description: Please see README.md
 category: Development
@@ -91,7 +91,7 @@ dependencies:
 - fsnotify
 - optparse-applicative
 - haskell-dap >=0.0.14.0
-- ghci-dap >=0.0.13.0
+- ghci-dap >=0.0.14.0
 
 library:
   source-dirs: src

src/Haskell/Debug/Adapter/Control.hs

@@ -21,9 +21,32 @@ import qualified Haskell.Debug.Adapter.Watch as W
 
 
 -- |
---   start HDA.
+--   Start HDA.
+--   Default implementation is using STDIN/STDOUT handle.
 --
-run :: ArgData -- ^command line arguments type.
+--   Here is an example for using TCP Socket.
+--
+-- > import Network.Socket
+-- >
+-- > sock <- socket AF_INET Stream defaultProtocol
+-- > let host = tupleToHostAddress (0, 0, 0, 0)
+-- >     port = 9999
+-- >     reqQ = 5
+-- >
+-- > bind sock $ SockAddrInet port host
+-- > listen sock reqQ
+-- >
+-- > (conn, _) <- accept sock
+-- > hdl <- socketToHandle conn ReadWriteMode
+-- >
+-- > run def hdl hdl
+-- >
+--
+--   Port 9999 could be specified in the launch.json with "debugServer" attribute.
+--
+-- > "debugServer : 9999"
+--
+run :: ArgData -- ^command line arguments.
     -> Handle  -- ^IN handle. used to get request from the debug adapter client.
     -> Handle  -- ^OUT handle. used to response to the debug adapter client.
     -> IO ()