File tree Expand file tree Collapse file tree 1 file changed +2
-28
lines changed
Expand file tree Collapse file tree 1 file changed +2
-28
lines changed Original file line number Diff line number Diff line change @@ -106,34 +106,8 @@ actual Emacs buffer of the module being loaded."
106106 (with-current-buffer (haskell-interactive-mode-splices-buffer session)
107107 (erase-buffer )))
108108 (let* ((ok (cond
109- ((haskell-process-consume
110- process
111- " Ok, \\ (?:[0-9]+\\ ) modules? loaded\\ .$" )
112- t )
113- ((haskell-process-consume
114- process
115- " Ok, \\ (?:[a-z]+\\ ) modules? loaded\\ .$" ) ; ; for ghc 8.4
116- t )
117- ((haskell-process-consume
118- process
119- " Failed, \\ (?:[0-9]+\\ ) modules? loaded\\ .$" )
120- nil )
121- ((haskell-process-consume
122- process
123- " Failed, \\ (?:[a-z]+\\ ) modules? loaded\\ .$" ) ; ; ghc 8.6.3 says so
124- nil )
125- ((haskell-process-consume
126- process
127- " Ok, modules loaded: \\ (.+\\ )\\ .$" )
128- t )
129- ((haskell-process-consume
130- process
131- " Failed, modules loaded: \\ (.+\\ )\\ .$" )
132- nil )
133- ((haskell-process-consume
134- process
135- " Failed, no modules loaded\\ .$" ) ; ; for ghc 8.4
136- nil )
109+ ((haskell-process-consume process " Ok, .*$" ) t )
110+ ((haskell-process-consume process " Failed, .*$" ) nil )
137111 (t
138112 (error (message " Unexpected response from haskell process. " )))))
139113 (modules (haskell-process-extract-modules buffer))
You can’t perform that action at this time.
0 commit comments