File tree Expand file tree Collapse file tree 2 files changed +6
-1
lines changed
src/Haskell/Debug/Adapter/State/Init Expand file tree Collapse file tree 2 files changed +6
-1
lines changed Original file line number Diff line number Diff line change 1- 20250309 haskell-debug-adapter-0.0.42.0
1+ 20250316 haskell-debug-adapter-0.0.42.0
22 * [ PR] Use hie-bios to generalize build command #37
33
44
Original file line number Diff line number Diff line change @@ -154,6 +154,11 @@ startGHCi req = do
154154
155155 -- Use hie-bios when Cmd is exactly "ghci-dap"
156156 flags <- if cmdStr /= " ghci-dap" then addWithGHC cmdOpts else do
157+ isExist <- U. liftIOE $ D. doesFileExist startup_file
158+ when (False == isExist) $ do
159+ U. sendErrorEventLF $ " file not found. [" ++ startup_file ++ " ]"
160+ -- throwError $ "file not found. [" ++ startup_file ++ "]"
161+
157162 explicitCradle <- U. liftIOE $ HIE. findCradle startup_file
158163 cradle <- U. liftIOE $ maybe (HIE. loadImplicitCradle mempty startup_file)
159164 (HIE. loadCradle mempty ) explicitCradle
You can’t perform that action at this time.
0 commit comments